Bagaimana untuk secara dinamis menambahkan kontrol ActiveX yang membutuhkan run-time lisensi dalam Visual Basic.BERSIH atau pada Visual Basic 2005

Kembali ke atas

Buat baru Visual Basic.NET atau Visual Basic 2005 proyek

1. Klik Mulai, arahkan ke Semua program, arahkan ke Microsoft Visual Studio.NET atau Microsoft Visual Studio 2005, lalu klik Microsoft Visual Studio.NET atau Microsoft Visual Studio 2005.
2. Pada File menu, titik Baru, lalu klik Proyek.
3. Dalam Proyek baru kotak dialog, klik Proyek-proyek Visual Basic di bawah Jenis proyek, klik Aplikasi Windows di bawah Template, lalu klik Oke.
   
   Catatan Pada Visual Studio 2005, klik Visual Basic di bawah Jenis proyek.

Kembali ke atas

Membuat ActiveX Interop Majelis

1. Klik Mulai, arahkan ke Semua program, arahkan ke Microsoft Visual Studio.NET atau Microsoft Visual Studio 2005, arahkan ke Visual Studio.Alat-alat yang bersih atau Visual Studio 2005 Tools, lalu klik Visual Studio.Prompt Perintah NET atau Visual Studio 2005 Command Prompt.
2. Untuk membuat dua Majelis interop yang harus Anda miliki, ketik perintah berikut:
   aximp /out:C:\temp\AxMyProject.dll "C:\Windows\System32\MyProject.ocx"
   AxMyProject.dll adalah untuk AxHost Interop. MyProject.dll adalah untuk COM Interop.

Kembali ke atas

Secara dinamis membuat kontrol

1. Pada Proyek menu, klik Menambahkan referensi.
2. Klik People, kemudian pilih Majelis Interop kontrol ActiveX yang Anda saja membuat (mereka harus di C:\Temp).
3. Tambahkan AxMyProject.dll dan MyProject.dll; menambahkan ini file salinan mereka secara lokal.
4. Tambahkan Tombol mengendalikan ke bentuk.
5. Klik dua kali tombol untuk menemukan kode untuk Kegiatan klik tombol metode.
6. Dalam Kegiatan klik tombol metode, paste kode berikut:

     Dim myControl As New AxMyProject.AxMyLicensedControl()
   						

   Ini menciptakan sebuah contoh baru kontrol melalui AxHost.
   
   CATATAN: Tidak membuat contoh baru kontrol melalui COM (baru MyProject.MyLicensedControl), karena ini tidak akan bekerja pada bentuk, dan Anda tidak dapat dengan mudah menambahkan lisensi.

Kembali ke atas

Menambah lisensi untuk kontrol

1. Menentukan dan perhatikan kunci lisensi run-time untuk kontrol. Untuk MyLicensedControl, kunci lisensi adalah "gnvlslnjskvlmlgnnimh".
2. Dalam Kegiatan klik tombol metode, paste kode berikut di bawah ini MyControl redup sebagai Baru AxMyProject.AxMyLicensedControl():

           Dim f As System.Reflection.FieldInfo
           f = GetType(AxHost).GetField("licenseKey", _ 
               Reflection.BindingFlags.NonPublic _ 
               Or Reflection.BindingFlags.Instance)
           f.SetValue(myControl, "gnvlslnjskvlmlgnnimh")
   					

   Kode ini menyisipkan lisensi run-time ke kontrol. Ini menciptakan contoh FieldInfo, yang merupakan bagian dari tas properti OCXState. Tas properti ini penuh kontrol ActiveX tertentu informasi. Dalam kasus ini, Anda mendapatkan lapangan licenseKey dan pengaturan untuk myControl. Anda harus melakukannya untuk setiap contoh dari setiap kontrol ActiveX yang memerlukan lisensi run-time.

Kembali ke atas

Tambahkan kontrol ke bentuk

1. Tambahkan kontrol ke bentuk kontrol koleksi, dan kemudian Tampilkan kontrol. Untuk melakukan ini, Anda dapat menggunakan kode berikut:

           Controls.Add(myControl)
           myControl.Show()
   						

   Sisipkan kode ini di Kegiatan klik tombol metode, setelah "f.SetValue (myControl,"gnvlslnjskvlmlgnnimh")", dan sebelum "End Sub" baris.
   
   CATATAN: Jika lisensi tidak ditambahkan ke kontrol dan lisensi diperlukan, Controls.Add akan gagal. Controls.Add menjalankan kode yang berisi validasi lisensi. Ketika Anda mencoba dan menjalankan Controls.Add, Anda melihat kesalahan berikut dalam debug mode:
   Unhandled pengecualian jenis 'System.ComponentModel.LicenseException' terjadi di system.windows.forms.dll Informasi tambahan: Anda tidak memiliki lisensi untuk menggunakan kontrol ActiveX ini.
   Atau, pada jangka waktu, Anda mungkin melihat galat berikut yang sama pesan:
   Unhandled pengecualian telah terjadi pada Anda aplikasi. Anda tidak memiliki lisensi untuk menggunakan kontrol ActiveX ini.
2. Tekan F5 untuk menjalankan projek.
3. Klik tombol untuk menambahkan kontrol ActiveX untuk bentuk.

Kembali ke atas

Pemecahan Masalah

• Anda harus menambahkan lisensi untuk setiap contoh setiap ActiveX kontrol yang memerlukan lisensi run-time. Sebagai contoh, jika Anda membuat kedua contoh MyLicensedControl, Anda harus menambahkan lisensi untuk contoh juga.
• Pastikan bahwa Anda memiliki kunci lisensi yang benar untuk Anda kontrol. Menentukan kunci lisensi yang benar khusus untuk kontrol:Untuk informasi tambahan tentang menentukan kunci, klik nomor artikel di bawah ini untuk melihat artikel di Microsoft Basis Pengetahuan:
  151771  (http://support.microsoft.com/kb/151771/EN-US/ ) LICREQST.EXE meminta kunci lisensi dari suatu objek
  Atau, Anda dapat menggunakan Licenses.Add untuk kontrol dalam Visual Basic 6 pada komputer yang telah lisensi dalam registri. Licenses.Add kembali lisensi run-time yang ditambahkan sebagai string; Kamu bisa kemudian gunakan Debug.Print untuk mendapatkan kunci lisensi.

Kembali ke atas