Guest_imported
New member
- Jan 1, 1970
- 0
what is wrong with this code?
dim seepage
if request.querystring("seepage" = "" OR request.querystring("seepage" < 1 then
seepage = 1
else
seepage = request.querystring("seepage"
end if
id = Request.QueryString("msgID"
Set connectionToDatabase=Server.CreateObject("ADODB.Connection"
Set rs=Server.CreateObject("ADODB.Recordset"
connectionToDatabase.Open "DSN=dtDB;UID=scott;PWD=tiger"
Set rsadd = Server.CreateObject("ADODB.Recordset"
rsadd.Open "SELECT * FROM MsgBoard WHERE msgID=" & id, connectionToDatabase,1,2
rsadd("threadID" = rsadd("msgID"
rsadd.Update
%>
I am getting an error that:
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC driver does not support the requested properties.
This errror is on this line:
rsadd.Open "SELECT * FROM MsgBoard WHERE msgID=" & id, connectionToDatabase,1,2
thanks in advance
dim seepage
if request.querystring("seepage" = "" OR request.querystring("seepage" < 1 then
seepage = 1
else
seepage = request.querystring("seepage"
end if
id = Request.QueryString("msgID"
Set connectionToDatabase=Server.CreateObject("ADODB.Connection"
Set rs=Server.CreateObject("ADODB.Recordset"
connectionToDatabase.Open "DSN=dtDB;UID=scott;PWD=tiger"
Set rsadd = Server.CreateObject("ADODB.Recordset"
rsadd.Open "SELECT * FROM MsgBoard WHERE msgID=" & id, connectionToDatabase,1,2
rsadd("threadID" = rsadd("msgID"
rsadd.Update
%>
I am getting an error that:
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
ODBC driver does not support the requested properties.
This errror is on this line:
rsadd.Open "SELECT * FROM MsgBoard WHERE msgID=" & id, connectionToDatabase,1,2
thanks in advance