Mas Ajoe, terima kasih karena sudah jawab email saya. Tapi masih
membingungkan saya Mas.

Mohon diperjelas. Atau lebih detailnya gimana.

 

  _____  

From: [email protected] [mailto:[EMAIL PROTECTED]
On Behalf Of Ajoe
Sent: 13 Juli 2008 15:00
To: [email protected]
Subject: Bls: [Programmer-VB] Bagaimana menampilkan hasil query di Text box
pada VB .NET

 


for each dr as datarow in Ds.Tables(0).rows

  

next

--- Pada Jum, 11/7/08, Frangky <[EMAIL PROTECTED]> menulis:

Dari: Frangky <[EMAIL PROTECTED]>
Topik: [Programmer-VB] Bagaimana menampilkan hasil query di Text box pada VB
.NET
Kepada: [email protected]
Tanggal: Jumat, 11 Juli, 2008, 7:16 PM

Hallo Expert VB.NET

 

Biasanya kalau saya lakukan query di VB 6, dan hasil querynya tampilkan di
Text box txtNama, saya gunakan contoh code seperti dibawah ini:

 

Rs.open "Select nama from tabel1 where NomorInduk='240401'"

 

If not rs.eof then

   txtNama= rs!nama

else

   msgbox "Data tidak ditemukan"

End if

 

Yang mau saya tanyakan:

 

Bagaimana menampilkan hasil query di Text box pada VB .NET.

 

Saya menggunakan code seperti dibawah ini:

 

        Dim sqlstring = "select Nama from tabel1 where NomorInduk =
'240401'"

        Dim da As New MySqlDataAdapter( sqlstring, cnn)

 

        da.Fill(ds, "tabel1")

 

        If ds.Tables("tabel1").Rows.Count > 0 Then

  '        txtNama= ????????                       'disini saya tidak tahu
harus ketik code apa disini. Untuk menampilkan di txtNama

 

        Else

 

            MsgBox("Data tidak ditemukan")

            ds.Clear()

            ds.Dispose()

        End If

 

  _____  

Yahoo! Toolbar kini dilengkapi dengan Search Assist. Download
<http://sg.rd.yahoo.com/id/search/toolbar/mail/signature/*http:/id.toolbar.y
ahoo.com/>  sekarang juga.  

No virus found in this incoming message.
Checked by AVG - http://www.avg.com
Version: 8.0.138 / Virus Database: 270.4.10/1549 - Release Date: 7/12/2008
4:31 PM


Kirim email ke