初学者的困惑
日期：2014-05-17 浏览次数：20843 次
菜鸟的困惑
各位大虾们，帮忙看下这个代码：
<html>
<body>
<center>
<!--#include file= "conn.asp "-->
<%
set rstemp=server.createobject( "adodb.recordset ")
dim strname,strpassword,sql
strname=request.form( "name ")
strpassword=request.form( "password ")
sql "select * from User where Username= "& strname & " "
rstemp.open sql,conn,1,3
if strname= " "then
response.write "帐号不能为空 <p> </p> "
%>
<a href=javascript:history.back()> 上一页 </a>
<%
response.end
end if
if strpassword= " "then
response.write "密码不能为空 <p> </p> "
%>
<a href=javascript:history.back()> 上一页 </a>
<%
response.end
end if
if rstemp.RecordCount=1 then
if rstemp( "Userpassword ")=strpassword then
session( "name ")=strname
response.write "你好！ "
else
%>
<a href=javascript:history.back()> 密码错误 请重新输入 </a>
<%
end if
else
%>
<a href=javascript:history.back()> 帐号错误 请重新输入 </a>
<%
response.end
end if
rstemp.close
set rstemp=nothing
%>
</body>
</html>
还有conn.asp大代码是：
<%
dim mymdb:mymdb= "BBS.mdb "
set conn=server.createobject( "adodb.connection ")
conn.open "provider=microsoft.jet.oledb.4.0; " & "data source = " & server.mappath(mymdb)
%>
到底是那出错了，他总是提示：Microsoft VBScript 运行时错误 错误 '800a000d ' 类型不匹配 /login.asp，行 10
我上网找了一下，说是需要安装一个东西，但是我下载后，安装。他又提示说你需要安装server parc 1.在下初学，希望各位大侠们多多关照。
小弟在这先谢谢了`！
------解决方案--------------------
嗯，那就是另外一个文件的问题了~``你没给出来~
------解决方案--------------------
sql = "select * from [User] where [Username]= ' "& strname & " ' "
这样再错就....不知道了..
各位大虾们，帮忙看下这个代码：
<html>
<body>
<center>
<!--#include file= "conn.asp "-->
<%
set rstemp=server.createobject( "adodb.recordset ")
dim strname,strpassword,sql
strname=request.form( "name ")
strpassword=request.form( "password ")
sql "select * from User where Username= "& strname & " "
rstemp.open sql,conn,1,3
if strname= " "then
response.write "帐号不能为空 <p> </p> "
%>
<a href=javascript:history.back()> 上一页 </a>
<%
response.end
end if
if strpassword= " "then
response.write "密码不能为空 <p> </p> "
%>
<a href=javascript:history.back()> 上一页 </a>
<%
response.end
end if
if rstemp.RecordCount=1 then
if rstemp( "Userpassword ")=strpassword then
session( "name ")=strname
response.write "你好！ "
else
%>
<a href=javascript:history.back()> 密码错误 请重新输入 </a>
<%
end if
else
%>
<a href=javascript:history.back()> 帐号错误 请重新输入 </a>
<%
response.end
end if
rstemp.close
set rstemp=nothing
%>
</body>
</html>
还有conn.asp大代码是：
<%
dim mymdb:mymdb= "BBS.mdb "
set conn=server.createobject( "adodb.connection ")
conn.open "provider=microsoft.jet.oledb.4.0; " & "data source = " & server.mappath(mymdb)
%>
到底是那出错了，他总是提示：Microsoft VBScript 运行时错误 错误 '800a000d ' 类型不匹配 /login.asp，行 10
我上网找了一下，说是需要安装一个东西，但是我下载后，安装。他又提示说你需要安装server parc 1.在下初学，希望各位大侠们多多关照。
小弟在这先谢谢了`！
------解决方案--------------------
嗯，那就是另外一个文件的问题了~``你没给出来~
------解决方案--------------------
sql = "select * from [User] where [Username]= ' "& strname & " ' "
这样再错就....不知道了..
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
