if trim(user)&"x"="x" or trim(pass)&"x"="x" then
&表示字符串连接符,trim(user)与x连接后字符串还为x说明user为空,pass同理
set rs=serverCreateObject("adodbrecordset")
创建数据库记录集,下面的rsopen,rsaddnew
rs("user")=user
rs("pass")=pass
rsupdate
rsclose
等都用到它
responsewrite("注册重名") 是因为
sqlstr="select from user where user='"&user&"'"
从数据库里取user与数据库中的user相同的记录
rsopen sqlstr,conn,1,3
if rseof then 如果到达表尾,表示没有记录,就可以注册
否则就表示没到表尾,即表里有与user相同的记录,即该用户名已经注册了
<html>
<head>
<title>产品销售</title>
<meta >
你这很容易啊, >
晕,你是用VB写的吗?ASP服务端是禁用inputbox和msgbox的。帮你改下吧
<script language="vbscript">
<!--
sub inputsomething()
dim a,b,r
a=0
b=0
a=inputbox("请输入一个实数值","输入数据",0)
b=inputbox("请输入一个实数值","输入数据",0)
if a<b then
r=a
a=b
b=r
end if
msgbox a & " " & b
end sub
-->
</script>
<html>
<body onload="inputsomething()">
</body>
</html>
以上就是关于请大家给看看这个最简单的ASP程序,帮忙给解释一下,感激不尽全部的内容,包括:请大家给看看这个最简单的ASP程序,帮忙给解释一下,感激不尽、帮改一段asp程序,应该很简单,我是新手、求写一个简单的asp程序等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)