ID Artikel: 193947 - Kajian Terakhir: 19 September 2011 - Revisi: 2.0

Cara menentukan properti lapangan Recordset dengan menggunakan ADO

Tampil berdampinganKlik disini untuk menampilkan sumber Inggris dan terjemahan oleh mesin secara berdampingan
Penerjemahan MesinPeringatan: artikel ini adalah terjemahan oleh mesin
Melihat produk di mana artikel ini berlaku.
Tips SistemThis article applies to a different operating system than the one you are using. Article content that may not be relevant to you is disabled.

Pada Halaman ini

Perbesar semua | Perkecil semua

RINGKASAN

Di sebuah aplikasi, kadang-kadang sangat berguna untuk menentukan sifat-sifat kolom dalam datasource jauh. Anda dapat menentukan informasi seperti nama field, tipe data dan lapangan panjang dengan memeriksa bidang Koleksi objek Recordset objek Data ActiveX (ADO).
Kembali ke atas

INFORMASI LEBIH LANJUT

Program berikut menciptakan Recordset dari penulis tabel SQL Database pub server sampel. Ini akan menampilkan nama field, tipe data, dan didefinisikan panjang dari masing-masing bidang dalam tabel penulis.

Tipe data kembali sebagai nilai integer. Pernyataan #DEFINE pada atas program disertakan sehingga nilai ini dapat lintas-referensi Deskripsi karakter dari tipe data.

Untuk menggunakan contoh ini, Anda harus memiliki akses Data Microsoft Komponen (MDAC) versi 2.x atau kemudian diinstal, yang termasuk dalam data komponen Visual Studio 6.0 atau dapat di-download dari Alamat Web berikut:
http://MSDN.Microsoft.com/en-US/data/aa937729.aspx (http://msdn.microsoft.com/en-us/data/aa937729.aspx)
Catatan: Nilai-nilai pengganti SERVER, user id (UID) dan password (PWD) nilai-nilai yang sesuai untuk instalasi SQL Server Anda di oRecordset.OPEN pernyataan.
Kembali ke atas

Contoh kode

   * DEFINEs for field types - provided for reference only.
   #DEFINE ADEMPTY               0
   #DEFINE ADTINYINT            16
   #DEFINE ADSMALLINT            2
   #DEFINE ADINTEGER            3
   #DEFINE ADBIGINT            20
   #DEFINE ADUNSIGNEDTINYINT      17
   #DEFINE ADUNSIGNEDSMALLINT      18
   #DEFINE ADUNSIGNEDINT         19
   #DEFINE ADUNSIGNEDBIGINT      21
   #DEFINE ADSINGLE            4
   #DEFINE ADDOUBLE            5
   #DEFINE ADCURRENCY            6
   #DEFINE ADDECIMAL            14
   #DEFINE ADNUMERIC            131
   #DEFINE ADBOOLEAN            11
   #DEFINE ADERROR               10
   #DEFINE ADUSERDEFINED         132
   #DEFINE ADVARIANT            12
   #DEFINE ADIDISPATCH            9
   #DEFINE ADIUNKNOWN            13
   #DEFINE ADGUID               72
   #DEFINE ADDATE               7
   #DEFINE ADDBDATE            133
   #DEFINE ADDBTIME            134
   #DEFINE ADDBTIMESTAMP         135
   #DEFINE ADBSTR               8
   #DEFINE ADCHAR               129
   #DEFINE ADVARCHAR            200
   #DEFINE ADLONGVARCHAR         201
   #DEFINE ADWCHAR               130
   #DEFINE ADVARWCHAR            202
   #DEFINE ADLONGVARWCHAR         203
   #DEFINE ADBINARY            128
   #DEFINE ADVARBINARY            204
   #DEFINE ADLONGVARBINARY         205
   #DEFINE ADCHAPTER            136

   oRecordSet = CREATEOBJECT("ADODB.Recordset")

   lcSQL = "select * from authors"

   oRecordSet.OPEN(lcSQL, ;
      "DRIVER={SQL Server};" + ;
      "SERVER=YourServerName;" + ;
      "DATABASE=pubs;" + ;
      "UID=YourUserID;" + ;
      "PWD=YourPassword")

   lcFieldInfo = ""
   FOR EACH FIELD IN oRecordSet.FIELDS
      ? "Field name: ", FIELD.NAME, ;
         " Type: ", LTRIM(STR(FIELD.TYPE)), ;
         " Defined size: ", LTRIM(STR(FIELD.DEFINEDSIZE)), ;
         " Actual size: ", LTRIM(STR(FIELD.ACTUALSIZE))
      ?
   NEXT
Kembali ke atas
Berlaku bagi:
  • Microsoft Visual FoxPro 6.0 Professional Edition
  • Microsoft Data Access Components 2.5
  • Microsoft Data Access Components 2.6
Kembali ke atas
Kata kunci: 
kbdatabase kbhowto kbmt KB193947 KbMtid
Kembali ke atas
Penerjemahan MesinPenerjemahan 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:193947  (http://support.microsoft.com/kb/193947/en-us/ )
Kembali ke atas