access用户登录界面宏 我想知道哪里有错误 还有怎么修改！！！！求大神相助_百度知道
提问者采纳
登录界面的窗体不应该绑定数据。珐福粹凰诔好达瞳惮困正常的做法是：1）窗体上添加一个组合框控件，用于选择员工编号2）员工编号的组合框的行来源为员工信息表3）窗体上还应有一个文本框控件，用于输入密码4）点击登陆按钮时，执行以下代码：private sub 登陆按钮_click()
if me.密码文本框.value=dlookup(&密码&,&员工信息表&,&员工编号='& & me.员工编号组合框.value & &'&) then
docmd.openform &窗体1&
msgbox &密码错误&
end ifend sub
提问者评价
来自团队：
其他类似问题
为您推荐：
用户登录的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁access 中要做更新查询 将所有现有产品号前面加一个“0”，要怎么写啊，急求大侠相助。_百度知道
access 中要做更新查询 将所有现有产品号前面加一个“0”，要怎么写啊，急求大侠相助。
提问者采纳
&[产品号];&quot新建一个更新查询（表用要更新的表）;更新到&quot,在查询中的字段[产品号]下 &0& 填上----&gt，（表里的[产品号]数据类型为文本
提问者评价
其他类似问题
为您推荐：
您可能关注的推广
access的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁VB中掉access数据库后，用三个combo控件在datagrid中所有数据中指定一行，病对气进行计算。求VB高手相助！-中国学网-中国IT综合门户网站
> VB中掉access数据库后，用三个combo控件在datagrid中所有数据中指定一行，病对气进行计算。求VB高手相助！
VB中掉access数据库后，用三个combo控件在datagrid中所有数据中指定一行，病对气进行计算。求VB高手相助！
转载 编辑：李强
为了帮助网友解决“VB中掉access数据库后，用三个co”相关的问题，中国学网通过互联网对“VB中掉access数据库后，用三个co”相关的解决方案进行了整理,用户详细问题包括:RT,我想知道:VB中掉access数据库后，用三个combo控件在datagrid中所有数据中指定一行，病对气进行计算。求VB高手相助！，具体解决方案如下：解决方案1：楼主好像只告诉了datagrid中三个字段之一 "车型"，这里只好以"字段二" 、"字段三" 代表了
Combo1_Click()
On Error Resume Next
Adodc1.RecordSource = "select * from 配料工序 where 车型 like '" & Combo1.Text & "' and 字段二 like '" & Combo2.Text & "' and 字段三 like '" & Combo3.Text & "'"
Adodc1.Refresh
然后给Combo2和Combo3添加同样的代码通过对数据库的索引,我们还为您准备了：问：三个combo控件对应的是datagrid中的三个段，Private Sub Combo1_Click()...答：楼主好像只告诉了datagrid中三个字段之一 "车型"，这里只好以"字段二" 、"字段三" 代表了 Combo1_Click() On Error Resume Next Adodc1.RecordSource = "select * from 配料工序 where 车型 like '" & Combo1.Text & "' and 字段二 like '" & Co...===========================================问：我用的datagrid控件。想实现是，我在一个文本框输入编号后，单击确定按...答：如果你真心想学习编程的话，就不要用控件绑定的方式，这个只适合在入门时看下效果，一般还是用ADO来连接数据库吧，具体操作给你上段代码： 首先建立一个类模块，来建立全局的数据量连接 Public conn As New ADODB.Connection '获取数据库连接 da...===========================================问：我用的datagrid控件。想实现是，我在一个文本框输入编号后，单击确定按...答：VB与access的连接方法一 在菜单上找到 外接程序＞可视化数据管理器， 在弹出的窗口中：文件＞打开数据库＞选择 MCROSOFT ACCESS 然后找到你要用的数据库。 菜单上找到 实用程序＞数据窗口设计器 为要生成的新窗口起一个名，选中想在那个窗体中显...===========================================问：如图所示,： 用VB打开一个文件后缀名为.tsf的文件（该文件其实就是Acces...答：建立text1控件组，供填写id，建立text2控件组，供填写断链，添加ado控件 Dim adocn As New ADODB.Connection adocn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\aa.Persist Security Info=False" For i = 0 To 4 ...===========================================问：如图所示,： 用VB打开一个文件后缀名为.tsf的文件（该文件其实就是Acces...答：因为你没有说明你的目的，估计也不会有人争对你的要求做出很明确的答复，那我说一下思路： 第一步：你得先用VB去连接ACCESS库；查找你想修改或查寻的表；这里需要用到语句为：Sub AC()Dim cnn As New ConnectionDim rs As New RecordsetDim sql ...===========================================问：Private Sub Form_Load() Data3.DatabaseName = App.Path + "\tushu1.md...答：记住：在 Data3.DatabaseName = App.Path + "\tushu1.mdb" '这是设置data3控件数据库的路径 Data3.RecordSource = "denglu" '这个是选择数据库中的表 后面不要忘记刷新； Data3.Refresh 另外，你既然用了 Text1.Text = Data3.Recordset.Fields("...===========================================问：窗体上有两个文本框,数据库里面有两个字段,用户名和密码,加载窗体的时侯...答：我的程序中的一段代码： Adodc1.Recordset.AddNew Adodc1.Recordset.Fields("用户名称") = (Trim(Text1.Text)) Adodc1.Recordset.Fields("用户密码") =Trim(Text2.Text) Adodc1.Recordset.Fields("用户权限") = "普通用户" Adodc1.Recordset.Upd...===========================================问：form中有三个控件combo1,text1,text2,另有Access数据表JZ,表中有ID,jz,s...答：这个不难，没看代码，你想要什么？ 其实c#多好用啊！ 首先事件已经有了 然后就是下拉框改变内容时，刷新text1和text2 绑定数据库，SQL查询 select 字段1，字段2 from 表 where 字段=‘下拉框取出的字符串’ 然后将查询结果绑定到text1和text2上===========================================问：主要语句如下：strConnect = "Provider=Microsoft.Jet.OLEDB.3.51;Data ...答：这很正常呀。可以通过将： sRecordSet.Source = "Select * From 表1" 上句改为： sRecordSet.Source = "Select * From 表1 order by 时间" 排序后检索。===========================================楼主好像只告诉了datagrid中三个字段之一 "车型",这里只好以"字段二" 、"字段三" 代表了 Combo1_Click() On Error Resume Next Adodc1.RecordSource = "select * from 配料...===========================================DB Provider引擎连接ACCESS数据库,方法如下: 新建工程时选数据工程,此时VB6集成... 查询字段必须分别用(西文)逗号分开或就用一个*号代替,上述查询中排序语句建议最好...=========================================== 为了实现VB6.0与Access数据库的连接,在在"工程"菜单下的"部件…"选项中,添加Ado... Jet 4.0 OLE DB Provider--下一步--选择或输入数据库名称---找到要连接的数据库后,确定...=========================================== Option Explicit Dim conn As New Connection Private Sub Command1_Click() Dim strSQL As String On Error GoTo ErrHandle If conn.State = 0 Then conn.Conn...=========================================== 把下面的代码copy你的vb中的一个模块中就可以操作acess数据库了 '使用方法:1、调用... 'VB数据库编程的模块,演示如何用ADO连接Access数据库,以及 SQL 查询语言的运用。...=========================================== conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & path & ";Persist Security Info=False"=========================================== Option ExplicitDim conn As New ConnectionPrivate Sub Command1_Click() Dim strSQL As String On Error GoTo ErrHandle If conn.State = 0 Then conn.ConnectionString...===========================================引用DAO3.6private sub command1_click()dim dt as database,rs as recordestset dt = opendatabase(&E:\数据库.mdb&)set rs = dt.openrecordest(...===========================================我的程序中的一段代码: Adodc1.Recordset.AddNew Adodc1.Recordset.Fields("用户名称") = (Trim(Text1.Text)) Adodc1.Recordset.Fields("用户密码")...===========================================Set cn = New ADODB.Connection sqldata="Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.mappath("F:\vb数据\DataBase\DataBase2007.mdb...===========================================
本文欢迎转载，转载请注明：转载自中国学网： []
用户还关注
可能有帮助软件开发,程序错误,exception - 我的异常网各类解决方案WEB开发数据库移动开发企业软件/开发硬件/嵌入开发JAVA应用服务器软件工程/管理/测试.NETLinux/Unix多媒体开发语言/框架专题开发/技术/项目综合高性能开发硬件设备Windows培训认证热门搜索热门搜索
解决方案热门解决方案
最新解决方案
其他解决方案
友情链接要求权重和PR≥4，收录≥1万，Alexa排名2万以内，快照正常；联系QQ：
Copyright & &&版权所有&