1187
社区成员
虚心求教！！！！！！
我想写一段程序是从MDB数据库中提取user表中的内容,用一个datacombo控件列出用户称供选择,一个TEXTBOX供用户输入密码,大概思路如此,希望高手赐教写出代码，谢谢！！！！
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
Wang_xiaoni 2003-04-01
Dim rs As New ADODB.Recordset
Dim cnn As String
Dim sql As String
Private Sub Command1_Click()
sql = "select * from login where user='" & Combo1.Text & "' and pwd='" & Text1.Text & "'" '查询用户
rs.Requery
If rs.RecordCount = 0 Then
MsgBox "密码不正确"
Else
'DO.....
End If
End Sub
Private Sub Form_Load()
Dim i
cnn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\program\VB98\NWIND.MDB;Persist Security Info=False" 'Data Source换为你的数据库
sql = "select user from login"
rs.Open sql, cnn
While rs.EOF
Combo1.AddItem rs!user '初始化Combo
Wend
End Sub
Dim cnn As String
Dim sql As String
Private Sub Command1_Click()
sql = "select * from login where user='" & Combo1.Text & "' and pwd='" & Text1.Text & "'" '查询用户
rs.Requery
If rs.RecordCount = 0 Then
MsgBox "密码不正确"
Else
'DO.....
End If
End Sub
Private Sub Form_Load()
Dim i
cnn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\program\VB98\NWIND.MDB;Persist Security Info=False" 'Data Source换为你的数据库
sql = "select user from login"
rs.Open sql, cnn
While rs.EOF
Combo1.AddItem rs!user '初始化Combo
Wend
End Sub
虚心求教！初次接触Python文本预处理 当拿到一个文本后，首先从文本正则化（text normalization）处理开始。常见的文本正则化步骤包括： 将文本中出现的所有字母转换为小写或大写 将文本中的数字转换为单词或删除这些数字 ...
求助大神！ 一条求助博客！...但我根据网友的推荐 设置了配置数据 将29改成了25 结果也确实能够写·代码里了 但当我运行了 模拟器弹出来的就是一个什么都没有的程序 不知道哪里出错了 求助大神网友 虚心求教 感谢！ ...
Greeting! Everyone 最后本人真心地希望和大家进行交流，虽然是开博客，但是主要目的是向大家虚心求教，所有的评论我都会仔细阅读，认真回复所有评论。写的不清楚以及错误的地方希望大家能够指出，说不定在和您讨论的时候双方都可以搞...
csdn的<>，精彩连载！ 正文第一章 大学 作为一个真正的程序员，首先应该尊重编程，热爱你所写下的程序，他是你的伙伴，而不是工具。 /* */ 我放弃清华计算机专业的保送资格而选择参加高考的消息震撼了全校，从校长到班主任到各科目...
CSS定位，赶快收藏备战金九银十！ 我们在面试过程中，一定不要和面试官进行争论或者反问面试官（虚心求教还是可以的）。如果面试官的水平或者度量还好的话可能没什么关系，但是也不能排除哪些个水平一般或者度量较小的面试官，你和他争论是没有任何...
MMKV集成与原理，成功跳槽阿里！ 我们在面试过程中，一定不要和面试官进行争论或者反问面试官（虚心求教还是可以的）。如果面试官的水平或者度量还好的话可能没什么关系，但是也不能排除哪些个水平一般或者度量较小的面试官，你和他争论是没有任何...
干货！考博英语，这样复习可以事半功倍 此外，在英语复习时，不懂的问题一定要及时向他人求教，基础较为薄弱的考生要向英语基础较好的同学虚心请教英语学习方法，并在借鉴的基础上形成适合自身的复习策略。同时，复习的心态要调整好，戒骄戒躁，克服浮躁...
原型图设计，动手前的工作！ 回想第一次做原型图，找到一个对应的模板就开始照搬，全部照搬完又画...，如果你不想，那放弃吧，放弃此次审核，我申请错了… 菜鸟记录的一次经验，虽然还不够细致或许也还有许多问题，但注重积累，虚心求教，准没错！
50道JS面试题（如有错误，虚心求教） 1.javascript的typeof返回哪些数据类型. 答案：string,boolean,number,undefined,function,object 2.例举3种强制类型转换和2种隐式类型转换? 答案：强制（parseInt,parseFloat,number） 隐式（== ===） ...
CSS的三种定位，100%好评！ 我们在面试过程中，一定不要和面试官进行争论或者反问面试官（虚心求教还是可以的）。如果面试官的水平或者度量还好的话可能没什么关系，但是也不能排除哪些个水平一般或者度量较小的面试官，你和他争论是没有任何...
无向图的邻接矩阵问题，虚心求教。 此程序为邻接矩阵存储无向图，求其是否连通，并构建最小生成树求最短路径，请问为什么邻接矩阵值的值在输入后没有成功保存为之前输入的值？ #include<stdio.h> #include<stdlib.h> ...
虚心求教 嗯,这些日子狠是迷茫.虽说学了计算机应用技术已经足有三年了,可是什么好像都没学会.对于,前途更是一片迷茫.不知道是否可以走下去,我问过自己是否真心喜欢,答案是中立的,当初选择读这个的时候是家人给选择的,一晃,...
好公司和烂公司就一张图识别！ 姑且不说身为领导的老师往往不喜欢笨小孩这一惨痛的教训，事实上团队中任何人都可成为你的老师，只要你虚心求教，而不是为了达成曲线救国的其它目的。因为你需要的只是知识，而不是老师。 第11条铁规：做事三要素，...
JavaScript的算数运算符与比较运算符，直通大厂！ 我们在面试过程中，一定不要和面试官进行争论或者反问面试官（虚心求教还是可以的）。如果面试官的水平或者度量还好的话可能没什么关系，但是也不能排除哪些个水平一般或者度量较小的面试官，你和他争论是没有任何...
安卓开发环境配置出现问题，虚心求教 建了一个HelloWorld安卓项目后，噼里啪啦一堆错误，劳烦各位前辈指点一二： [2014-12-06 14:42:17 - appcompat_v7] WARNING: unable to write jarlist cache file F:\workspace\appcompat_v7\bin\...
JavaScript的算数运算符与比较运算符，一文说清！ 我们在面试过程中，一定不要和面试官进行争论或者反问面试官（虚心求教还是可以的）。如果面试官的水平或者度量还好的话可能没什么关系，但是也不能排除哪些个水平一般或者度量较小的面试官，你和他争论是没有任何...
