dim rstTrxDAO as DAO.Recordset
dim blnFound as Boolean
 
For X = 0 To rstTrxDAO.Fields.Count - 1
    If LCase("xxxx") = LCase(rstTrxDAO.Fields(X).Name) Then
        blnFound = True
        Exit For
    End If
Next X
semoga membantu
 
salam,
 
Agush
----- Original Message -----
Sent: Tuesday, September 19, 2006 3:29 AM
Subject: [Programmer-VB] ngecek adanya field

rekan2 yth,
 
saya mau nanya, saya bikin app menggunakan MySQL dan saat ini kesulitan untuk mengetahui keberadaan field disuatu tabe. dengan kata lain, bagaimana cara ngecek apakah field xxxx ada di tabel y.
 
atas bantuannya, sblmnya tky
 
salam.
__._,_.___

Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer





SPONSORED LINKS
Indonesia phone card Programmer Indonesia tour
Indonesia travel Indonesia flower

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___

Kirim email ke