0
첫 번째로 나는 VB6에 관해서는 알지 못한다는 것을 지적하고 싶습니다. 나는 그녀의 오래된 XP 컴퓨터에서 그녀의 새로운 윈도우 8 컴퓨터로 모든 것을 옮겨서 친구를 도우려고 노력하고있다. 나는 그녀의 VB6 데이터베이스를 제외하고 거의 모든 것을 가지고있다. 누구든지 나를 도울 수 있습니까?VB6 데이터베이스를 Windows 8로 마이그레이션
데이터베이스가있는 VB6 폴더로 복사했습니다. 나는 그것을 실행할 때 아래 오류가 발생합니다.
"런타임 오류 3706 - 공급자를 찾을 수 없습니다. 제대로 설치되지 않았을 수 있습니다."
Google에서 주변을 둘러 보았고 제공 업체 세부 정보가 포함 된 파일을 찾았습니다. 누구든지 그것이 작동하도록 변경해야 할 것을 알고 있습니까?
귀하의 도움은 크게 receveid입니다! 제트에 설치된 OLE DB 공급자에 따라
Attribute VB_Name = "Startup"
Option Explicit
Public Gdb As ADODB.Connection
Public GfrmMainForm As frmMain
Public GstrPrinterFont As String
Sub Main()
Dim strFullName As String
Set GfrmMainForm = New frmMain
GfrmMainForm.Show
strFullName = ZADFullDatabaseName("Contacts", "M")
If Not ZIsFile(strFullName) Then
MsgBox strFullName & " does not exist", vbOKOnly
MsgBox ("Terminating " & App.Title)
End ' Something wrong with files, so exit
End If
Set Gdb = New ADODB.Connection
Gdb.CursorLocation = adUseClient
Gdb.IsolationLevel = adXactCursorStability
Gdb.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=" _
& strFullName & ";"
End Sub