عبارت sql server [بایگانی]

jupiter3437

شنبه 28 آبان 1384, 08:32 صبح

من یک رشته رو از طریق querystring ارسال کردم و میخوام توسط دستورات sql اون رشته را پیدا و حذف کنم...ولی نمی دونم چرا نمیشه...لطفا من و راهنمایی کنید..کدها رو اینجا میزارم
<%
dim objrs,strsql,struser
struser=Request.QueryString("Username")

strsql = "select * from tbluser where Username Like 'struser'"

set objrs = server.createobject("ADODB.recordset")
objrs.open strsql,objconn,,3
objrs.delete

objrs.close
set objrs=nothing

objconn.close
set objconn = nothing

response.redirect "view.asp"
%>

و این error رو میده
ADODB.Recordset (0x800A0E78)
Operation is not allowed when the object is closed.

titbasoft

شنبه 28 آبان 1384, 11:36 صبح

پس connection تون کو ؟

dim objrs,objconn,strsql,struser

struser=Request.QueryString("Username")
strsql = "select * from tbluser where Username Like '" & struser & "'"

set objconn= server.createobject("adodb.connection")
objconn.connectionstring = "..."
objconn.open

set objrs = server.createobject("ADODB.recordset")
objrs.activeconnection=objconn
objrs.open strsql,objconn,,3
objrs.delete
objrs.close
objconn.close

set objrs=nothing
set objconn = nothing

response.redirect "view.asp

jupiter3437

یک شنبه 29 آبان 1384, 01:10 صبح

<%@ language=vbscript%>
<%option explicit%>
<html><head><title>delete user</title></head>
<body>


<%
dim objrs,strsql,struser
struser=Request.QueryString("Username")

strsql = "deleteuser"

set objrs = server.createobject("ADODB.recordset")
objrs.open strsql,objconn,,3

objrs.close
set objrs=nothing

objconn.close
set objconn = nothing

response.redirect "view.asp"
%>

</body>
</html>