Anda sedang offline saat ini, menunggu internet Anda untuk menyambung kembali

Bagaimana pemrograman sambungan proyek Microsoft Access

Dukungan untuk Office 2003 telah berakhir

Microsoft mengakhiri dukungan untuk Office 2003 pada 8 April 2014. Perubahan ini telah memengaruhi pemutakhiran perangkat lunak dan opsi keamanan Anda. Pelajari apa artinya ini bagi Anda dan cara untuk tetap terlindungi.

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
Lanjutan: Memerlukan ahli coding, interoperabilitas, dan multiuser keterampilan.

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

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 BooleanDim strConnect As StringOn 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=" & strDBNameIf strUN <> "" Then    strConnect = strConnect & ";user id=" & strUN    If strPW <> "" Then        strConnect = strConnect & ";password=" & strPW    End IfElse  'Try to use integrated security if no username is supplied.    strConnect = strConnect & ";integrated security=SSPI"End IfApplication.CurrentProject.OpenConnection strConnectChangeADPConnection = TrueExit FunctionEH:MsgBox Err.Number & ": " & Err.Description, vbCritical, "Connection Error"ChangeADPConnection = FalseEnd 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 .
Inf koneksi adp acc2002 acc2003 acc2007
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.

Peringatan: Artikel ini telah diterjemahkan secara otomatis

Properti

ID Artikel: 306881 - Tinjauan Terakhir: 09/24/2011 15:36:00 - Revisi: 2.0

Microsoft Office Access 2007, Microsoft Office Access 2003, Microsoft Access 2002 Standard Edition

  • kbprogramming kbadp kbvba kbhowto kbmt KB306881 KbMtid
Tanggapan