各们大哥现在好了过来给看下（小弟急用） - ASP技术论坛

jishiqian

等　级：新手上路
帖　子：27
专家分：0
注　册：2006-4-21

楼主

问题点数：0 回复次数：2

各们大哥现在好了过来给看下（小弟急用）

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<%
dim Duserid
Duserid=Request.form("userid")
if Duserid="" then
Remess="会员编号为空,删除失败!"
Response.Write(Remess)
else
set oConn=server.CreateObject("adodb.recordset")
sql1="delete from users where userid='"&Duserid&"'"
oConn.open sql1,gym_conn,1,3
Remess="成功删除会员编号为 "&Duserid&" 的记录！"
Response.Write(Remess)
oConn.Close
end if
%>

数据库连接没用那位大哥给改下谢谢

2006-04-21 15:36

yms123

等　级：版主
威　望：209
帖　子：12488
专家分：19042
注　册：2004-7-17

第 3 楼

得分:0

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<% dim Duserid
Duserid=Request.form("userid")
if Duserid="" then
Remess="会员编号为空,删除失败!"
Response.Write(Remess)
else
set oConn=server.CreateObject("adodb.recordset")
sql1="delete from users where userid='"&Duserid&"'"
oConn.open sql1,gym_conn,1,3
Remess="成功删除会员编号为 "&Duserid&" 的记录！"
Response.Write(Remess)
oConn.Close
end if%>数据库连接没用那位大哥给改下谢谢

oConn.open sql1,gym_conn,1,3
直接用Connection对象
gym_conn.Execute(sql1)
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<% dim Duserid
Duserid=Request.form("userid")
if Duserid="" then
Remess="会员编号为空,删除失败!"
Response.Write(Remess)
else
set oConn=server.CreateObject("adodb.recordset")
sql1="delete from users where userid='"&Duserid&"'"
gym_conn.Execute(sql1)
Remess="成功删除会员编号为 "&Duserid&" 的记录！"
Response.Write(Remess)
oConn.Close
end if%>
userid='"&Duserid&"'" 这里userid数据库里是什么类型？

2006-04-21 20:56