Bagaimana pemrograman sambungan proyek Microsoft Access

Terjemahan Artikel Terjemahan Artikel
ID Artikel: 306881 - Melihat produk di mana artikel ini berlaku.
Lanjutan: Memerlukan ahli coding, interoperabilitas, dan multiuser keterampilan.

Artikel ini hanya berlaku untuk proyek Microsoft Access (.adp).

Perbesar semua | Perkecil semua

RINGKASAN

Artikel ini menunjukkan kepada Anda bagaimana untuk mengubah pemrograman sambungan dari Microsoft Access file proyek (ADP).

INFORMASI LEBIH LANJUT

Cara termudah untuk sambungan ADP adalah untuk melakukan itu secara manual. Anda dapat mengakses properti sambungan proyek saat ini sebagai mengikuti pada 2002 akses atau akses 2003: pada Berkas menu, klik Sambungan. Kotak dialog yang muncul memberi Anda pilihan untuk mengubah server nama dan keamanan mode, di antara sifat-sifat lainnya.

Catatan Di Access 2007, ikuti langkah berikut untuk membuka Sambungan tab Data Link properti kotak dialog:
  1. Klik Microsoft Office tombol, lalu klik Pilihan akses.
  2. Pada Menyesuaikan tab, klik Semua perintah dalam Pilih perintah dari daftar.
  3. Klik Sambungan dalam pane kiri, klik Tambahkan, lalu klik Oke.
  4. Klik Sambungan dalam Toolbar akses cepat.
Namun, kadang-kadang, Anda mungkin ingin mengotomatisasi proses. Anda mungkin ingin pengguna untuk menghubungkan ke SQL server yang berbeda untuk bagian tertentu dari aplikasi Anda, atau Anda mungkin ingin mengontrol proses sambungan pada startup sehingga Anda dapat mencari kesalahan dan menangani mereka sesuai, mungkin oleh routing lain server.

Langkah-langkah berikut menggunakan fungsi yang menunjukkan bagaimana sambungan yang ada dari ADP dengan menggunakan model objek akses. The fungsi kembali Benar Jika berhasil dan Palsu Jika itu tidak berhasil.
  1. Mulai akses, dan kemudian buka akses contoh proyek NorthwindCS.adp.
  2. Pada tahun 2002 akses atau akses 2003, klik Modul di bawah Objek di jendela Database, dan kemudian klik Baru untuk membuka modul baru.

    Di Access 2007, klik panah bawah di bawah ini Makro dalam Lainnya kelompok pada Buat tab, dan kemudian klik Modul.
  3. Tambahkan kode berikut untuk modul baru, dan kemudian simpan modul:
    Function ChangeADPConnection(strServerName As String, strDBName As _
       String, Optional strUN As String, Optional strPW As String) As Boolean
    Dim strConnect As String
    On Error GoTo EH:
    Application.CurrentProject.CloseConnection
    'The Provider, Data Source, and Initial Catalog arguments are required.
    strConnect = "Provider=SQLOLEDB.1" & _
    ";Data Source=" & strServerName & _
    ";Initial Catalog=" & strDBName
    If strUN <> "" Then
        strConnect = strConnect & ";user id=" & strUN
        If strPW <> "" Then
            strConnect = strConnect & ";password=" & strPW
        End If
    Else  'Try to use integrated security if no username is supplied.
        strConnect = strConnect & ";integrated security=SSPI"
    End If
    Application.CurrentProject.OpenConnection strConnect
    ChangeADPConnection = True
    Exit Function
    EH:
    MsgBox Err.Number & ": " & Err.Description, vbCritical, "Connection Error"
    ChangeADPConnection = False
    End Function
    					
  4. Pada 2002 akses atau akses 2003 klik Bentuk di bawah Objek di jendela Database, klik Baru, lalu klik Oke untuk membuka formulir baru dalam Design view.

    Di Access 2007, klik Bentuk pada Buat tab.
  5. Tambahkan tombol perintah ke bentuk.
  6. Menetapkan OnClick properti tombol perintah untuk acara prosedur berikut:
    Dim bCheckConnection As Boolean
       'You must specify the correct parameters for your following server.
       'username and password parameters are optional.
    bCheckConnection=ChangeADPConnection("ServerName","DBName","UserName","PW")
    MsgBox bCheckConnection
    					
  7. Menutup lingkungan Visual Basic untuk kembali ke bentuk.
  8. Menyimpan formulir, dan kemudian bentuk bentuk Lihat.
  9. Klik tombol perintah untuk menjalankan yang mendasari kode.

    Anda akan menerima sebuah kotak pesan yang mengatakan Benar Jika Anda masukkan parameter benar untuk sambungan di langkah 6.

    -ATAU-

    Jika Anda tidak memberikan parameter benar, Anda menerima pesan galat. Ketika Anda mengklik Oke untuk kesalahan pesan, Anda mendapatkan kotak pesan yang menampilkan Palsu .
Note This is a "FAST PUBLISH" article created directly from within the Microsoft support organization. The information contained herein is provided as-is in response to emerging issues. As a result of the speed in making it available, the materials may include typographical errors and may be revised at any time without notice. See Terms of Use for other considerations.

Properti

ID Artikel: 306881 - Kajian Terakhir: 24 September 2011 - Revisi: 2.0
Berlaku bagi:
  • Microsoft Office Access 2007
  • Microsoft Office Access 2003
  • Microsoft Access 2002 Standard Edition
Kata kunci: 
kbprogramming kbadp kbvba kbhowto kbmt KB306881 KbMtid
Penerjemahan Mesin
PENTING: Artikel ini diterjemahkan menggunakan perangkat lunak mesin penerjemah Microsoft dan bukan oleh seorang penerjemah. Microsoft menawarkan artikel yang diterjemahkan oleh seorang penerjemah maupun artikel yang diterjemahkan menggunakan mesin sehingga Anda akan memiliki akses ke seluruh artikel baru yang diterbitkan di Pangkalan Pengetahuan (Knowledge Base) dalam bahasa yang Anda gunakan. Namun, artikel yang diterjemahkan menggunakan mesin tidak selalu sempurna. Artikel tersebut mungkin memiliki kesalahan kosa kata, sintaksis, atau tata bahasa, hampir sama seperti orang asing yang berbicara dalam bahasa Anda. Microsoft tidak bertanggung jawab terhadap akurasi, kesalahan atau kerusakan yang disebabkan karena kesalahan penerjemahan konten atau penggunaannya oleh para pelanggan. Microsoft juga sering memperbarui perangkat lunak mesin penerjemah.
Klik disini untuk melihat versi Inggris dari artikel ini:306881

Berikan Masukan

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com