Problem Solved. Makasih buat mas Pian sama Mas Pur. Kedua Tipsnya
tokcer :D
-VB Beginner-
--- In [email protected], "vbPian" <[EMAIL PROTECTED]> wrote:
>
> Sub ComboIsiField(NamaGrid As VSFlexGrid, NamaTabel as String,
> NamaField as String, Kolom as Integer)
>
> Dim Query As String, IsiTabel As String, ListGrid As String
>
> Query = "SELECT * from '" & NamaTabel & '"
> NamaRS.Open Query, NamaDB
> NamaRS.MoveFirst
> Do While NamaRS.EOF <> True
> IsiTabel = NamaRS.Fields(NamaField)
> ListGrid = ListGrid & " | " & IsiTabel
> NamaRS.MoveNext
> Loop
> NamaGrid.ColComboList(Kolom) = ListGrid
> NamaRS.Close
>
> End Sub
>
> vbPian
> [zZzz]
>
> -----Original Message-----
> From: [email protected]
> [mailto:[EMAIL PROTECTED] Behalf Of Ardhi Adhary Arbain
> Sent: Monday, May 15, 2006 11:30 AM
> To: [email protected]
> Subject: [Programmer-VB] Akses Tabel dari Modul Standar
>
>
> Assalamualaikum,
>
> Saya pingin nanya soal akses tabel lewat prosedur sub di modul
> standar. Koneksinya sih nggak masalah. Masalahnya ada di argumen
> prosedur. Script untuk mengakses tabelnya :
>
> Sub ComboIsiField(NamaGrid As VSFlexGrid, NamaTabel as <????>,
> NamaField as <????>, Kolom as Integer)
>
> Dim Query As String, IsiTabel As String, ListGrid As String
>
> Query = "SELECT * from '" & NamaTabel & '"
> NamaRS.Open Query, NamaDB
> NamaRS.MoveFirst
> Do While NamaRS.EOF <> True
> IsiTabel = NamaRS!NamaField
> ListGrid = ListGrid & " | " & IsiTabel
> NamaRS.MoveNext
> Loop
> NamaGrid.ColComboList(Kolom) = ListGrid
> NamaRS.Close
>
> End Sub
>
> Nah kira2 jenis argumen yg cocok untuk bagian <????> apa yah ? String
> ? Objek ? Atau Apa ?
> Terutama di baris : IsiTabel = NamaRS!NamaField.
> Saya udah coba pake script kayak gini : NamaRS! & NamaField atau
> NamaRS!NamaField, tp selalu gagal.
> Udah diganti tipenya ke string, fields, objek dll, masih jg gagal.
> Cuman bisa berhasil kalo ditulis langsung nama fieldnya, nggak pake
> argumen.
> Itu aja, mohon petunjuknya.
>
> -VB Beginner-
>
>
>
>
>
>
> Wahana Programmer Groups Links
>
>
>
>
> Yahoo! Groups Links
>
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
| Programmer | Indonesia | Basic programming language |
| Computer programming languages | Programming languages | Java programming language |
YAHOO! GROUPS LINKS
- Visit your group "Programmer-VB" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
