vb打开access

来源：百度知道 编辑：UC知道 时间：2024/06/06 02:03:08
在vb中建一个按钮，要求单击时打开名为“好”的access文件，类似于shell方法打开。exe文件，急急急急急，加分
Shell "cmd /c start " & App.Path & "\好.mdb" 打不开，说未找到c：/documents文件。用office里的access打开，另外：谁可以帮我做一个结合vb与access一起的职工工资信息系统，作为作业上交的，打包后发给我（799634417@qq.com），我剩下的积分全抛了，记得在此留名哦。谢谢

修改答案：

哦，dos不支持长路径，那你用这段代码吧

Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Const SW_SHOWNORMAL As Long = 1
Const SW_HIDE As Long = 0
'access文件扩展名应该是 MDB 吧？
Private Sub Command1_Click()
Call ShellExecute(Me.hWnd, "Open", "好.mdb", vbNullString, App.Path, SW_SHOWNORMAL)
End Sub

如果你没有生产exe文件，它的默认路径在“C:\Documents and Settings\new”
如果你的“好.mdb”没有在此文件夹中，最好是先生成exe文件再调试。

本程序在xp系统调试成功

你可以通过ado方法或通过adodc 控件将vb与access连接起来
例如：
Public Sub connection()
Public conn As New ADODB.connection
Public rs As New ADODB.Recordset
Dim strSQL As String
Dim str1 As String
Dim str2 As String
str1 = "Prov