iamdavid
06-14-2011, 05:40 PM
HERES THE SCRIPT THAT DON'T WORK:
Dim myConn, rs, mysql
SET myConn = CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.recordset")
MyConn = "Provider=SQLOLEDB;Data Source=tcp:*******2.discountasp.net;Initial Catalog=SQL2008_******s;User ID=SQL2008_******_fhs_user;Password=******;"
[ignore the **** in MyConn of course.]
cid = request.form("rec_id")
mysql = "DELETE FROM " & Request.Form("Table_Name") & " WHERE id = '" & cid & "';"
MyConn.Execute mysql
AFTER FORM SUBMISSION THIS IS WHAT IS RETURNED:
table = Visitors record id = 39 [<-from response.write request.form("table_name") & " record id = " & cid]
DELETE FROM Visitors WHERE id = '39';[<-- from request.write mysql]
HERES THE ERROR PRODUCED:
Microsoft VBScript runtime error '800a01a8'
Object required: 'Provider=SQLOLEDB;Da'
/delete_record.asp, line 46
The connection string MyConn works for every thing else like INSERT, SELECT but not DELETE. Anyone have a clue?:confused:
Dim myConn, rs, mysql
SET myConn = CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.recordset")
MyConn = "Provider=SQLOLEDB;Data Source=tcp:*******2.discountasp.net;Initial Catalog=SQL2008_******s;User ID=SQL2008_******_fhs_user;Password=******;"
[ignore the **** in MyConn of course.]
cid = request.form("rec_id")
mysql = "DELETE FROM " & Request.Form("Table_Name") & " WHERE id = '" & cid & "';"
MyConn.Execute mysql
AFTER FORM SUBMISSION THIS IS WHAT IS RETURNED:
table = Visitors record id = 39 [<-from response.write request.form("table_name") & " record id = " & cid]
DELETE FROM Visitors WHERE id = '39';[<-- from request.write mysql]
HERES THE ERROR PRODUCED:
Microsoft VBScript runtime error '800a01a8'
Object required: 'Provider=SQLOLEDB;Da'
/delete_record.asp, line 46
The connection string MyConn works for every thing else like INSERT, SELECT but not DELETE. Anyone have a clue?:confused: