| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 495 人关注过本帖
标题:求助!登录不能实现功能,求高手指教!!!
只看楼主 加入收藏
琴瑟萧弦
Rank: 1
来 自:四川
等 级:新手上路
帖 子:3
专家分:3
注 册:2013-6-17
收藏
 问题点数:0 回复次数:0 
求助!登录不能实现功能,求高手指教!!!
“/web”应用程序中的服务器错误。
--------------------------------------------------------------------------------

至少一个参数没有被指定值。
说明: 执行当前 Web 请求期间,出现未处理的异常。请检查堆栈跟踪信息,以了解有关该错误以及代码中导致错误的出处的详细信息。

异常详细信息: System.Data.OleDb.OleDbException: 至少一个参数没有被指定值。

源错误:


行 49:         conn1.Open()
行 50:         Dim cmd1 As New OleDbCommand(strsql1, conn1)
行 51:         Dim dr1 As OleDbDataReader = cmd1.ExecuteReader()
行 52:         If dr1.Read() Then
行 53:
 

源文件: C:\Users\admin\Desktop\作业\txl\web\Default.aspx.vb    行: 51

堆栈跟踪:


[OleDbException (0x80040e10): 至少一个参数没有被指定值。]
   System.Data.OleDb.OleDbCommand.ExecuteCommandTextErrorHandling(OleDbHResult hr) +992156
   System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult) +255
   System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult) +188
   System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult) +58
   System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method) +161
   System.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior) +116
   System.Data.OleDb.OleDbCommand.ExecuteReader() +6
   _Default.Button1_Click(Object sender, EventArgs e) in C:\Users\admin\Desktop\作业\txl\web\Default.aspx.vb:51
   System.Web.UI.WebControls.Button.OnClick(EventArgs e) +111
   System.Web.UI.WebControls.Button.RaisePostBackEvent(String eventArgument) +110
   System.Web.UI.WebControls.Button.System.Web.UI.IPostBackEventHandler.RaisePostBackEvent(String eventArgument) +10
   System.Web.UI.Page.RaisePostBackEvent(IPostBackEventHandler sourceControl, String eventArgument) +13
   System.Web.UI.Page.RaisePostBackEvent(NameValueCollection postData) +36
   System.Web.UI.Page.ProcessRequestMain(Boolean includeStagesBeforeAsyncPoint, Boolean includeStagesAfterAsyncPoint) +1565


以上是出错的提示,我的代码如下,求高手指教,谢谢!!!




 Dim name1 As String = TextBox1.Text
        Dim pass1 As String = TextBox2.Text

        Dim strcon1 As String
        strcon1 = "provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("txl.mdb")
        Dim conn1 As New OleDbConnection(strcon1)
        Dim strsql1 As String = "select * from 用户表 where username='" + name1 + "' and password='" + pass1 + "'"
        conn1.Open()
        Dim cmd1 As New OleDbCommand(strsql1, conn1)
        Dim dr1 As OleDbDataReader = cmd1.ExecuteReader()
        If dr1.Read() Then

            Response.Redirect("find1.aspx")
        ElseIf Session("name") = "admin" And Session("pass1") = "123456" Then
            Response.Redirect("main.aspx")
        Else

            Label1.Text = "请输入正确的用户名!!!"
        End If
搜索更多相关主题的帖子: 应用程序 详细信息 服务器 
2013-06-17 17:35
快速回复:求助!登录不能实现功能,求高手指教!!!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013908 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved