四捨五入

四捨五入でroundを使用しない

• round(2.25,1) →　2.2
• formatnumber(2.25,1)　→ 2.3

データ追加と更新

※1　call DbOpen()  
　　MySQL="SELECT テーブル名.* FROM テーブル名 where 条件
　　MyREC.Open MySQL, MyRDB,3,3

　　If MyREC.EOF = true then 'レコードがなければ挿入　新規行を追加
　　　　MyREC.AddNew
　　　　MyREC.Fields("列名1").value=値

　　　　MyREC.Fields("列名2").value=値


　　else
　　　　MyREC.Fields("列名2").value=値
　　end if

 　　MyREC.Update  
※2  call b_DbClose
 

※部分はインクルードファイルの中で定義しておく

'===============================

'  ※1DB OPEN　（SQL　サーバ認証の場合）

'===============================

function DbOpen()

'##### コネクションオブジェクトの生成 #####

Set MyRDB = Server.CreateObject("ADODB.Connection")

'##### レコードセットオブジェクトの生成 #####

Set MyREC = Server.CreateObject("ADODB.Recordset")

　　    Set MyCMD = Server.CreateObject("ADODB.Command")

MyRDB.ConnectionString = "Provider=SQLOLEDB; Data Source='サーバー名'; Initial Catalog=データベース名;User ID=ログイン名;Pwd=パスワード;"

　　　　MyRDB.Open

end function

'===============================

'  ※2DB CLOSE

'===============================

function c_DbClose()

MyREC.Close

set MyREC = Nothing

MyRDB.close

set MyRDB = Nothing

end function

親ディレクトリーのインクルードファイルを参照させる

1. IISを開く
2. 該当のサイトを選択
3. IISの中の「ASP」をダブルクリック
4. 分類＜動作＞の中の親パスを有効にするをTrueにする。