收录日期:2019/01/17 21:44:09 时间:2016/06/06 22:13:46 标签:ASP.NET
错误行有指出
<% @ Page Language=VB Debug=true%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><html>
<% @ Import Namespace="System.Data" %>
<% @ Import Namespace="System.Data.OLEDB" %>
<html>
<head>
<title>用户登陆</title>
</head>
<body>
<script language=vb runat="server">
sub page_lode(ByVal Sender as Object,ByVal E as EventArgs)
end sub
sub Submit(Byval Sender as Object,Byval E as Eventargs)
   if TextBox1.Text=0 Or TextBox2.Text=0 then
     label3.text="账号密码不能为空,请输入正确的账号密码。"
   else
   dim s as string=TextBox1.Text
   dim q as string=TextBox2.Text
   Dim DBCon as OLEDBConnection
   Dim DBCom as OLEDBCommand 
   Dim r as Integer 
   DBCon=new OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data Source=l:\usersname.mdb;")      
    DBCom=New OLEDBCommand("select username,passw from usern where username=s and passw=q" ,DBCon)   
    dbcon.open() 
    r=dbCom.ExecuteScalar()  \\错误指向这一行提示“至少有一个参数未被返回值“
    if (r=1)
     Label3.text="恭喜你,登陆成功"
  else
     Label3.text="对不起,ID错误"
  End if
     DBCon.Close()
 end if
end sub
</script>
<form runat="server">
<font face="Tahoma">
<Asp:Label id="Label1"
   runat="server"
   text="输入ID"/>
<Asp:TextBox
   id="TextBox1"
   runat="server"
/>
<Asp:Label
 id="Label2"
 runat="server"
 text="输入密码"
/>
<Asp:TextBox
   id="TextBox2"
   runat="server"
   textmod="password"
   maxlength=10
   column=10
/>
<Asp:Button
   id="Submitbt"
   Text="确定"
   onClick="Submit"
   runat="server"
/>
<Asp:label
   id="label3"
   runat="server"
/>
</script>
</form>


改这句:
DBCom=New OLEDBCommand("select username,passw from usern where username='" & s & "' and passw='" & q & "'" ,DBCon)   
试过了,不行啊
呜————
改这句:
DBCom=New OLEDBCommand("select count(*) from usern where username='" & s & "' and passw='" & q & "'" ,DBCon)
dbCom.ExecuteScalar(),返回第一行第一列。
显然:select username,passw from usern where username='" & s & "' and passw='" & q & "'" ,有两个参数,PASSW未被返回。
up
ExecuteScalar()
只返回左上角第一个值。所以,另外一个就没有返回啦。
LZ可以用DataReader来取值。

First-chance exception 怎么处理? C#的客户端问题 请问控件和页面之间如何传递值 postgresql如何改变数据库编码啊? 请问ec_neg1是什么意思? 分类路径访问的问题 请问各位大虾,相关。NET 数据库中的列是个计算公式,如何插如数据 大家了解witkey吗? 最近Win2K里出现的奇怪问题,上Google搜索都没有找到答案 滚动条的设计代码 怎样用一个函数使多个iframe自动调整高度? 有做过sqlserver数据初始化经验的请指教,数据库需要一年一套,但数据表有一部分是基础数据不能被初始化,有具体说明,在线等。 【广告贴】【SQL 效率】选出10000000-10000010行的结果,怎么写?Oracle(Sql Server / Access 如能做到高效也有分) 请问谁有一些Web自定义控件的代码给我看看啊? 进入大四,非计算机专业找工作迷茫!! IIS访问出错:在默认的设置下 SQL Server 不允许进行远程连接可能会导致此失败。 跨网络即时通讯实现方式探讨 用LS代替@PickList的功能实现 VB访问mysql数据库(ODBC方式)更改端口的问题(在线给分!!!!!!!!!!!!!) p2p流媒体解决方案? 哥们,帮点下 怎么不搜索转义字符中的字符串 高手看看,如何在存储过程中随机获得5条记录 新手问个insert or delete 触发器的写法 求购p2p流媒体产品 俺相中了个小伙 【广告贴】【SQL 效率】选出10000000-10000010行的结果,怎么写?Oracle(Sql Server / Access 如能做到高效也有分) 【广告贴】【SQL 效率】选出10000000-10000010行的结果,怎么写?Oracle(Sql Server / Access 如能做到高效也有分) ipmsg速度原理