ASP更新・変更ができない

毎々お世話になってます。
ASP（VBScript）で更新・変更ができないのです。
db.Execute(StrSQL)
部分でエラーになり、
//db.Execute(StrSQL)
を使用しない状態にするとエラーは出ませんが、更新・変更ができません。
<%
//DB接続
Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
"DBQ=" & Server.Mappath("dbname.mdb")

//　1. SELECT文：SELECT * FROM テーブル名
//　2. INSERT文：INSERT INTO テーブル名 (フィールド名) VALUES (値)
//　3. UPDATE文：UPDATE テーブル名 SET フィールド名=値
//　4. DELETE文：DELETE * FROM テーブル名
//データ変更
//--- 追加する文字列を変数にセット ---
uID = Request.Form("uID")
uTYPE = Request.Form("uTYPE")
uNAME= Request.Form("uNAME")
uMNAME = Request.Form("uMNAME")

//--- データ変更SQL ---
SQLstr = "UPDATE " & tablename & " SET "
SQLstr = SQLstr & "[uID]=#" & uID & "#,"
SQLstr = SQLstr & "[uTYPE]=" & uTYPE & ","
SQLstr = SQLstr & "[uNAME]=" & uNAME & ","
SQLstr = SQLstr & "WHERE ID=" & uID
//--- データ追加実行 ---
db.Execute(StrSQL)
//DB接続解除

ObjConn.Close
Set ObjConn = Nothing

%>

No.2 回答者： chinensis 回答日時： 2006/03/29 09:50

db.Execute()でエラーになっていませんか？

ご提供いただいたURLの例題では
ObjConn.Execute(StrSQL)
と、ObjConnオブジェクトを使用していますので、
多分「db」オブジェクトが無いとされていると思います。

この回答への補足

chinensisさん
毎々有難うございます。感謝感謝です。
ずばりchinensisさんの言う通り、db.Execute()でエラーでエラーになっています。ObjConnをDBConnにするのでしょうか。
イマイチ分からずじまいです。もう少し教えてください。m(._.)m おねがいします

補足日時：2006/03/29 11:00

No.1 回答者： chinensis 回答日時： 2006/03/28 14:04

uNAMEとWHEREの間のカンマが不要？

一度お試しください。（ここに文法上カンマは無いはず）

この回答への補足

chinensisさん
有難うございます。
カンマをはずしてみましたが、うまくいきません。(T^T)
何か他におかしいのでしょうか。
http://asp.dataweb.ne.jp/text/new_page_23.htmのサイトの変更も試したのですが動かないです。（実行時エラー、オブジェクトがありません）
<%@LANGUAGE="VBSCRIPT"%>
<%

Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
"DBQ=" & Server.Mappath("dbname.mdb")
//=================================================
//-----　データ変更
//=================================================
//--- 追加する文字列を変数にセット ---

uID = Request.Form("uID")
uTYPE = Request.Form("uTYPE")
uNAME= Request.Form("uNAME")

//--- データ変更SQL ---
SQLstr = "UPDATE tablename SET "
SQLstr = SQLstr & "uID =" & uID &","
SQLstr = SQLstr & "uTYPE ='" & uTYPE & "',"
SQLstr = SQLstr & "uNAME ='" & uNAME & "'"
SQLstr = SQLstr & "WHERE uID =" & uID &";"
//--- データ追加実行 ---
db.Execute(SQLstr)

ObjConn.Close
Set ObjConn = Nothing
%>

補足日時：2006/03/28 17:10