Author Topic: RV  (Read 288 times)

0 Members and 1 Guest are viewing this topic.

Offline Yaku

  • Junior Member
  • *
  • Posts: 249
RV
« on: August 01, 2019, 05:50:51 PM »
malam semua,

sy menggunakan database Access dan ada masalah dgn pemakaian RV, yaitu saat insert/update data terhadap RV. tabel RVnya berubah tetapi database Access nya tidak ikut berubah saat itu juga, menunggu tabel RV d close dulu baru database Access menyimpan perubahannya.
sy membutuhkan agar saat RV di rubah database Access juga langsung ikut berubah saat itu juga, bagai mana caranya ya ?

Terima kasih sebelumnya....
Salam Fox-id

Offline Pujianto

  • Junior Member
  • *
  • Posts: 316
Re: RV
« Reply #1 on: August 02, 2019, 09:24:37 AM »
Saya Pakai itu..
Semoga sukses..


Code: [Select]
=AddProperty(_Screen,"nHandle",Sqlstringconnect('Driver={Microsoft Access Driver (*.mdb)};Dbq=c:\dataku.mdb;Exclusive=0;Uid=admin;Pwd='))

=SQLEXEC(_screen.nHandle,"UPDATE CHECKINOUT SET status='SUKSES' WHERE status=?proses")

Offline Yaku

  • Junior Member
  • *
  • Posts: 249
Re: RV
« Reply #2 on: August 02, 2019, 04:48:25 PM »
Saya Pakai itu..
Semoga sukses..


Code: [Select]
=AddProperty(_Screen,"nHandle",Sqlstringconnect('Driver={Microsoft Access Driver (*.mdb)};Dbq=c:\dataku.mdb;Exclusive=0;Uid=admin;Pwd='))

=SQLEXEC(_screen.nHandle,"UPDATE CHECKINOUT SET status='SUKSES' WHERE status=?proses")




kenapa muncul kotak pertanyaan : Enter the value for proses :

Offline Pujianto

  • Junior Member
  • *
  • Posts: 316
Re: RV
« Reply #3 on: August 03, 2019, 11:58:32 AM »
proses itu suatu variable..

Code: [Select]
Public proses

proses = 'SIAP'

=AddProperty(_Screen,"nHandle",Sqlstringconnect('Driver={Microsoft Access Driver (*.mdb)};Dbq=c:\dataku.mdb;Exclusive=0;Uid=admin;Pwd='))

=SQLEXEC(_screen.nHandle,"UPDATE CHECKINOUT SET status='SUKSES' WHERE status=?proses")

Offline Yaku

  • Junior Member
  • *
  • Posts: 249
Re: RV
« Reply #4 on: August 03, 2019, 04:54:50 PM »
proses itu suatu variable..

Code: [Select]
Public proses

proses = 'SIAP'

=AddProperty(_Screen,"nHandle",Sqlstringconnect('Driver={Microsoft Access Driver (*.mdb)};Dbq=c:\dataku.mdb;Exclusive=0;Uid=admin;Pwd='))

=SQLEXEC(_screen.nHandle,"UPDATE CHECKINOUT SET status='SUKSES' WHERE status=?proses")


Terima kasih Pak  :icon_thumright: :icon_thumright: :icon_thumright: