我在做一个管理系统的登录对话框"用户名称"我用的是DATACOMBO控件和一个ADODC2绑定用于显示表中的"用户"字段,用户可以直接在DATACOMBO中选择用户名,而后在下面的"密码"COMMANDTEXT中输入密码进行登录,这个COMMANDTEXT是和ADODC1绑定的,以下是我的代码验证用户密码部分。运行后总是显示"EOF或BOF中有一个是真的,或者当前记录已经被删除,所需的操作需要一个当前的记录"Adodc1.RecordSource = "select 用户名 from 系统用户 where 用户名='" &dbcUsername.TabIndex & "'"
Adodc1.Refresh
If txtPassword.Text = Adodc1.Recordset.Fields(0).Value Then
Me.Hide
frmMain.Show请问这是什么意思啊???而且使用DATACOMBO这样建立登录对话框是否需要两个ADODC,如果有好的方法请赐教!!!!!
Adodc1.Refresh
If txtPassword.Text = Adodc1.Recordset.Fields(0).Value Then
Me.Hide
frmMain.Show请问这是什么意思啊???而且使用DATACOMBO这样建立登录对话框是否需要两个ADODC,如果有好的方法请赐教!!!!!
解决方案 »
- 二维数组下标越界? 找不出原因,高手进来帮看看
- 如何实现用vb访问一个url?
- 如何在Vb 6.0程序中设置显示器的分辨率
- VB6.dll给我,马上给分,在线等
- 急在线等!!!在VB中怎么设置EXCEL中的单元格分隔线的问题
- 请教在用 dir$("c:\wenjian") 得到该目录下的所有文件时 总是提示:“类型声明与声明的数据类型不符合”,是怎么回事,该怎么解决,谢谢
- 初学者请进,高手别进。
- 在VB中如何获得从资源管理器上拖到文件名??
- 简单问题,我想将文本框的dataformat改为货币,小数4位怎么写呢?,datagrid中也是一样吗?
- 有谁能用VB做一个像金山游侠,FPE2000等修改游戏的软件
- 菜菜问,在vb中String类型提供了相关的处理函数吗?
- 请问winsock怎么抄送和密送邮件?
Adodc1.Refresh
If txtPassword.Text = Adodc1.Recordset.Fields(0).Value Then
Me.Hide
frmMain.Show
Adodc1.Refresh
If Adodc1.Recordset.RecordCount>0 then
If isNull(Adodc1.Recordset.Fields(0).Value)=False then
If UCase(Trim(txtPassword.Text)) = UCase(Trim(Adodc1.Recordset.Fields(0).Value)) Then
Me.Hide
frmMain.Show