PPT连接access数据库,怎样做密码验证的登录界面? access 2010 里的数据怎么连接到ppt 里面?比如...
以下实例以连接sql数据库,只要将代码中的连接数据库代码改成连接access数据库即可:
conn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;" _
+ "User ID=sa;password=123;Initial Catalog=denglu;Data Source=127.0.0.1" '连接数据库代码
改为:
conn.ConnectionString = "Provider=Microsoft.Ace.OLEDB.12.0;Data Source=" & ThisWorkbook.Path & "\BPO.accdb"即可
添加引用
一、界面设计
各控件名称属性分别为:label1 、text1 、label2、text2、commandok、cmdcancel
登录成功后显示的窗体:
代码设计如下:
'首先添加一个模块,写上以下通用声明和Sub main():
Public conn As ADODB.Connection '通用(声明)
Sub main()
Set conn = New ADODB.Connection '通用(main)
conn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;" _
+ "User ID=sa;password=123;Initial Catalog=denglu;Data Source=127.0.0.1" '连接数据库代码
conn.Open
frmLogin.Show '首先显示登录界面。也可以在工程属性中设置启动对象为Sub main()或者frmlogin窗体
End Sub
'在Frmlogin 代码窗口,为cmdok控件写以下代码:
Private Sub cmdok_Click()
If text1.Text = "" Then
MsgBox "用户名不能为空!", vbOKOnly + vbInformation, "友情提示"
text1.SetFocus
Exit Sub '若用户名文本框内为空,则出现提示框
End If
If text2.Text = "" Then
MsgBox "密码不能为空!", vbOKOnly + vbInformation, "友情提示"
text2.SetFocus
Exit Sub '若输入密码文本框为空,也出现提示框
End If
Dim strSQl As String
strSQl = "select * from User1 where username='" & Trim$(text1.Text) & "' and pwd='" & Trim$(text2.Text) & "' "
'书写SQL代码,查询User1表中是否存在窗体中用户输入的信息。
Dim str As New ADODB.Recordset
Set str = New ADODB.Recordset
str.CursorLocation = adUseClient
str.Open strSQl, conn, adOpenStatic, adLockReadOnly
With str
If .State = adStateOpen Then .Close
.Open strSQl
If .EOF Then
Try_times = Try_times + 1
If Try_times >= 3 Then
MsgBox "您已连续三次输入错误,系统将自动关闭", vbOKOnly + vbCritical, "警告"
Unload Me '若用户连续输入3次错误密码,则系统关闭
Else
MsgBox "对不起,用户名不存在或密码错误 !", vbOKOnly + vbQuestion, "警告"
text1.SetFocus
text1.Text = ""
text2.Text = ""
End If
Else
Unload Me '若登录成功,则隐藏当前窗体
Form2.Show '然后显示Form窗体
End If
End With
End Sub
Private Sub cmdCancel_Click()
End '若单击Cmdcel按钮,则结束应用程序
End Sub
运行中存在的问题:
代码中有Dim conn As adodb.connection,运行时显示"用户定义类型未定义"
解决方法:点击“工程”--“引用”找到“Microsoft ActiveX Data Object 2.6”
然后就就可以正常运行了。
PPT和Access数据库链接问题,求大神帮助?~
1、从Access数据库里查找并提取一些信息然后以表格的形式显示在PPT里
这个无非就是一个读写的过程,从数据库读取数据,写到某个文件上,建议用Excel,因为网上提供Excel的方法比较多,实现起来比较方便
2、然后每一次更新数据库,打开PPT点击某个按钮就能跟着更新
可以再库里面设置一个标识字段,用于判断是否需要更新的数据
希望思路可以给你带来帮助。
可以把数据复制到EXCEL里面去做!
PPT连接access数据库,怎样做密码验证的登录界面?
答:以下实例以连接sql数据库,只要将代码中的连接数据库代码改成连接access数据库即可:conn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;" _+ "User ID=sa;password=123;Initial Catalog=denglu;Data Source=127.0.0.1" '连接数据库代码 改为:conn.ConnectionString = "P...
如何连接access数据库
答:然后我们在Access中添加一个数据表(tb_test),随便加几列内容,如下所示:4 打开Visual Studio,新建一个Winform窗体,在窗体上放一个button按钮,剩下的就是书写点击按钮后的方法了 5 点击button按钮后我们要做的就是连接数据库,然后查询数据库中我们刚才新建的表,将其赋值给一个DataSet。我们先来看...
tp怎么连接access数据库
答:按 Win + R 键, 在运行里 输入 services.msc 找到SQL SERVER(MSSQLSERVER),看看这个服务开启了没,没开的话手动开启一下,再连接。
pb如何连接access数据库?
答:pb连接access数据库有两种方法:1、用odbc连接,就是在系统的odbc中配置好连接,然后在程序中引用即可。2、采取oledb方式连接,用pb自带的数据驱动程序用oledb的方式进行连接。
如何远程调用Access数据库方法详解
答:远程连接access数据库的几个方法:1.建立VPN(Virtual Private Network),这样你的电脑和主机的连接就与局域网无异,然后把服务器中mdb文件所在的Folder共享即可。ADO连接如下: 以下为引用的内容:oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ServerNameDatabaseFolderDatabase.mdb;Jet ...
C语言连接Access数据库如何实现???标准的c语言
答:2、举个例子,连接SQL:// 打开数据库strDBClass.Format(_T("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Jet OLEDB:Database Password=%s"), m_strUnEntryptMdbFilePath,m_strMDBPassword);// 创建连接HRESULT hr = m_pConnection.CreateInstance(_uuidof(Connection));_ConnectionPtr m_...
教你如何解决access数据库连接错误
答:步骤一:请检查conn.asp中的连接字符是否正确,如果没有错误,还提示数据库连接出错,往下看access数据库连接错误。步骤二:把数据库下载到本地(默认数据库 database/#newasp.mdb),用ACCESS打开,压缩修复数据库(打开ACCESS -- 工具 -- 数据库实用工具 -- 压缩和修复数据库);然后重新上传access...
access如何链接access如何链接表格
答:在FlexSim中与数据库建立连接,如果是Access或者Oracle等通常使用ODBC,具体方法和步骤如下:1、建立一个ODBCAlias(数据源)建立方法是(1)在系统盘下面找到odbcad32.exe的执行文件并双击打开(64位系统的默认地址为C:WindowsSysWOW64);(2)在默认的“用户DSN”选项卡中添加一个数据源(添加选项中可以...
网页如何连接到ACCESS 数据库
答:第一种 - 这种方法用在ACCESS中最多 strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" _& Server.MapPath("aspfree.mdb")set conn = server.createobject("adodb.connection")conn.open strconn 第二种-这种方法用在SQL SERVER中多 strconn = "Driver={SQL Server};Description=sql...
如何进行C#连接Access数据库的细节操作
答:连接access数据库需要导入额外的命名空间,所以有了最前面的两条using命令,这是必不可少的!strconnection这个变量里存放的是连接数据库所需要的连接字符串,他指定了要使用的数据提供者和要使用的数据源."provider=microsoft.jet.oledb.4.0;"是指数据提供者,这里使用的是microsoft jet引擎,也就是access中的数据引擎,...