coba rsBarangU.Fields("kh").Value = Null diganti dengan
IsNull(rsBarangU.Fields("kh"))
salam,
sodik
On Mon, 12 May 2008 13:45:23 +0700, Yunatan S. Widada
<[EMAIL PROTECTED]> wrote:
> temans,
> ada yang bisa bantu?
> saya punya tabel barang dan data di import dari file excell,
> tapi ada satu field yang kosong (null). nah saya pengen ubah field
> yang nilainya null tsb dengan program kecil seperti di bawah ini :
> fields yg nilainya null ada di fields kh, dan pengen saya ganti dng
> larakter "."
> program saya :
>
> Public DBU As ADODB.Connection
> Public rsBarangU As ADODB.Recordset
>
> Private Sub CmdEdit_Click()
> Dim mys As String
> mys = "select * from barang"
> Set rsBarangU = New ADODB.Recordset
> rsBarangU.Open mys, DBU, adOpenDynamic, adLockOptimistic
> If Not rsBarangU.EOF Then rsBarangU.MoveFirst
> Do While Not rsBarangU.EOF
> If rsBarangU.Fields("kh").Value = Null Then
> rsBarangU.Fields("kh").Value = "."
> rsBarangU.Update
> End If
> rsBarangU.MoveNext
> Loop
> x = MsgBox("Update Selesai...!!!", vbInformation)
> Unload Me
> End Sub
> Private Sub Command6_Click()
> Unload Me
> End Sub
>
> Private Sub Form_Load()
> Set DBU = New ADODB.Connection
> DBU.Provider = "microsoft.jet.oledb.4.0"
> DBU.Open App.Path & "\newtb.mdb", "Admin", ""
> DBU.CursorLocation = adUseClient
> End Sub
>
> tapi kenapa ga mau yah??? ada yang bisa bantu???
>
> regards
>
> tan
--
Using Opera's revolutionary e-mail client: http://www.opera.com/mail/
Send instant messages to your online friends http://asia.messenger.yahoo.com
------------------------------------
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: wahana.programmer
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/Programmer-VB/join
(Yahoo! ID required)
<*> To change settings via email:
mailto:[EMAIL PROTECTED]
mailto:[EMAIL PROTECTED]
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
