0

渡された変数に基づいて行を削除または挿入する単純な ASP ページがあります。正常に機能する同様のファイルがありますが、これは機能しません...エラーがなく、response.writeチェックが正常に機能しているにもかかわらず。私は運がないリテラル値を使ってみました。何か案は？コードは次のとおりです。

<%  
dim tid
dim email
dim joinOrUnjoin
tid = UCase(Request.Form("thisID"))
email = UCase(Request.Form("email"))
joinOrUnjoin = UCase(Request.Form("joinOrUnjoin"))

dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=SQLOLEDB;Server=*********;Database=Reports;User Id=**********;Password=***********;"
objConn.mode = 3
objConn.Open

if LCase(joinOrUnjoin) = "join" then

    strSQL = "INSERT INTO SSOcomEmailDistribution (ID, Email) VALUES ('" & id & "', '" & email & "')"
    Response.write "Join"
else

    strSQL = "DELETE From SSOcomEmailDistribution WHERE ID='" & id & "' AND Email='" & email & "'"
    Response.write "Unjoin " & id & " " & email
end if

objConn.Execute(strSQL)
objConn.Close()

Response.write " Done"
%>
4

1 に答える 1

2

次のように「tid」という名前の変数を使用しています。

tid = UCase(Request.Form("thisID"))

ただし、次のように、SQL 文字列で「id」という名前の別のものを使用します。

strSQL = "INSERT INTO SSOcomEmailDistribution (ID, Email) VALUES ('" & id & "', '" & email & "')"

単なるタイプミスかもしれませんが、他に何か不足しているのではないでしょうか?

于 2013-08-20T16:27:13.887 に答える