2013-09-24 2 views
0

안녕하세요, VB를 통해 MS ACCESS DB에 액세스하려고하는데이 오류가 발생합니다. 오류 [IM002] [Microsoft] [ODBC 드라이버 관리자] 데이터 소스 이름을 찾을 수 없거나 기본값이 없습니다. 드라이버는 내가했던소스 이름을 찾을 수없고 기본 드라이버가 지정되지 않았습니다. 111

지정 :

  • 변경 IIS 관리자 - 응용 프로그램 풀 App32 비트 사실
  • 다운로드 한 DB 드라이버에 액세스
  • 설치 액세스 example.com의 clien 그 순간에 작업 t

의 속삭임, 나는이하는 System.Object로

개인 서브를 Button1_Click (ByVal의 보낸 사람, 경우 System.EventArgs으로 ByVal의 전자 내 코드 2 diffrent 컴퓨터

에서 시도했습니다) 핸들 Button1.Click

Dim vConnectionStringX As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\1767631\db_Assign_2.accdb;Persist Security Info=False;" 
    Dim rtfConn As New Data.Odbc.OdbcConnection(vConnectionStringX) 
    rtfConn.Open() 






    Dim cusFName As String = TextBox1.Text 
    Dim cusLName As String = TextBox2.Text 
    Dim cusTP As String = TextBox3.Text 
    Dim cusEmail As String = TextBox4.Text 

    Dim vSQL As String = "Insert into Customer(FirstName, LastName, Telephone, Email) Values (" & cusFName & "," & cusLName & "," & cusTP & "," & "cusEmail"")" 

    Try 
     Dim rtfSQLCMD As New Data.Odbc.OdbcCommand 
     rtfSQLCMD.Connection = rtfConn 
     rtfSQLCMD.CommandText = vSQL 
     Dim vResult As Integer = rtfSQLCMD.ExecuteNonQuery 
     MessageBox.Show("Customer registered! " & vResult) 

    Catch ex As Data.Odbc.OdbcException 
     Dim vErMsg As String = "*** Error occured while registering the customer ***" & ControlChars.NewLine 

    End Try 

    rtfConn.Close() 

End Sub 

Plese help me!

답변

0

연결 문자열은 OleDb 연결이며 Odbc에는 유효하지 않습니다. 당신이 OdbcConnection이 같은 것을 사용합니다

Dim vConnectionStringX As String = "Driver={Microsoft Access Driver (*.mdb)};DBQ=c:\db1.mdb" 

을 당신은 또한 '.MDB'파일로 액세스 데이터베이스를 저장해야합니다 (예를 들어, MS 액세스 2000 - 2003 형식)

참고 :도 있습니다 또 다른 옵션 : Odbc를 사용해야하는 이유가 없다면 왜 Microsoft Access 데이터베이스에 일반적으로 사용되는 OleDb를 사용하지 않는 것입니까? OleDb를 사용하려면 원래 (현재) 연결 문자열을 사용해야하지만 연결 변수에 OleDbConnection을 사용하고 명령 변수에 OleDbCommand 등을 사용해야합니다.

0

또한 서비스 팩 SP6에 대해 VB6을 업데이트했는지 확인하십시오. MS Access 2000 이상을 처리해야합니다.

관련 문제