pake ini:
xListItem.SubItems(1) = Iif(IsNull(rs(1))=True,"",rs(1))




Agus Sudana <[EMAIL PROTECTED]> on 10/17/2008 09:50:32 AM

      Please respond to [email protected]

To:   milis programmer <[email protected]>
cc:    (bcc: Toni Rahayu/IT/domino_srv)

Subject:  [Programmer-VB] listview error "invalid use of null"



dear kakak2 VB'ers,
agar listview juga menampilkan record yg null dari database, bagaimana ya..?
berikut potongan script'nya, errornya selalu mengarah ke subitem(2). setelah di
tracking, record field 2 di database ada yg null
 If rs.RecordCount > 0 Then
 rs.MoveFirst
  Do While Not rs.EOF
   Set xListItem = lvDataAbsent.ListItems.Add(, , rs(0))
   xListItem.SubItems(1) = rs(1)
   xListItem.SubItems(2) = rs(2)
   rs.MoveNext
  Loop

end if

need advice,

salam,

Agus Sudana



dear kakak2 VB'ers,
agar listview juga menampilkan record yg null dari database, bagaimana ya..?
berikut potongan script'nya, errornya selalu mengarah ke subitem(2). setelah di tracking, record field 2 di database ada yg null
 If rs.RecordCount > 0 Then
 rs.MoveFirst
  Do While Not rs.EOF
   Set xListItem = ! lvDataAbsent.ListItems.Add(, , rs(0))
   xListItem.SubItems(1) = rs(1)
   xListItem.SubItems(2) = rs(2)
   rs.MoveNext
  Loop
end if

need advice,

salam,

Agus Sudana


Attachment: att2.eml
Description: Binary data






Toni Rahayu
PT. Omedata Electronics
IT Department
Hunting   : (62-22) 6030805 Ext 121
Faxs      : (62-22) 6030896
Homepage  : http://www.toni-rahayu.co.cc




Kirim email ke