主题:求解决
目的是连接数据库,并检测会员名是否可用
我做了两个文件:( #coon.asp checkname.asp)
#coon.asp 内容:
<%
dim conn
set conn=server.createobject( "ADODB.connection ")
con.open "PROVIDER=SQLOLEDB;DATA SOURCE=MICROSOF-21598A;UID=sa;PWD=sa;DATABASE=xiangmu
%>
checkname.asp内容:
<!--#include virtual="/config/#conn.asp"-->
<%
uname=Request.QueryString ("uname")
if uname="" then
Response.Write "请输入你的会员名!点击此处<a href='javascript:window.close();'>关闭此窗口</a>!"
conn.close:set conn=nothing
Response.End
end if
set rs=server.CreateObject ("adodb.recordset")
rs.Open "select username from member where username='"&uname&"'",conn,0,1
if not rs.EOF then
Response.Write "抱歉,你的会员名已被注册,请你另换会员名!<br>点击此处<a href='javascript:window.close();'>关闭此窗口</a>!"
else
Response.Write "恭喜你!该会员名可以使用!<br>点击此处<a href='javascript:window.close();'>关闭此窗口</a>!"
end if
rs.Close:set rs=nothing
conn.close:set conn=nothing
%>
没有成功,求高手帮忙看一下
我做了两个文件:( #coon.asp checkname.asp)
#coon.asp 内容:
<%
dim conn
set conn=server.createobject( "ADODB.connection ")
con.open "PROVIDER=SQLOLEDB;DATA SOURCE=MICROSOF-21598A;UID=sa;PWD=sa;DATABASE=xiangmu
%>
checkname.asp内容:
<!--#include virtual="/config/#conn.asp"-->
<%
uname=Request.QueryString ("uname")
if uname="" then
Response.Write "请输入你的会员名!点击此处<a href='javascript:window.close();'>关闭此窗口</a>!"
conn.close:set conn=nothing
Response.End
end if
set rs=server.CreateObject ("adodb.recordset")
rs.Open "select username from member where username='"&uname&"'",conn,0,1
if not rs.EOF then
Response.Write "抱歉,你的会员名已被注册,请你另换会员名!<br>点击此处<a href='javascript:window.close();'>关闭此窗口</a>!"
else
Response.Write "恭喜你!该会员名可以使用!<br>点击此处<a href='javascript:window.close();'>关闭此窗口</a>!"
end if
rs.Close:set rs=nothing
conn.close:set conn=nothing
%>
没有成功,求高手帮忙看一下