dulu pernah ngalamin pas pake DE, ketika data telah diupdate (addnew,
update, delete) sekalipun kita udah refresh atopun requery
recordsetnya, data yang ditampilkan di datareport ato flexgrid (sorry
lupa tepatnya apa) tetap ga mau berubah.
kalo niatnya u. kemudahan perubahan koneksi ke server, coba pake satu
object connection (public) yang dipake diseluruh applikasi, nah kalo
tjd perubahan, ya kita cukup merubah satu object ini saja.
sebenarnya kalo saya sendiri lebih suka pake query langsung ke
database (in case ga bisa pake store proc/pl sql), baik u manipulasi
data (insert, update, delete) atopun altering table/db. jadi kalo mau
insert record, saya tinggal kirim query insert lengkap beserta
nilai2nya lewat perintah executenya connection/command object, n kalo
mau menampilkan data, saya tinggal bikin object recordset buat
menampung dataset hasil query.
terkadang kalo menggunakan perintah update ato save dari object
recordset, muncul pesan2 kesalahan yang harus kita debug n cari
asalnya, tapi kalo dg cara ini, selama query yang kita qunakan benar,
semuanya akan berjalan baik2 saja, insya Allah.
regards,
On 5/18/05, bart2000e <[EMAIL PROTECTED]> wrote:
> Thxz atas tanggapannya, untuk model find yang dimaksud composite dan
> tunggal apa ya ? bisa kasi contoh ngga ? Lalu bedakah bila di beri
> .edit atau tidak (jadi langsung .update) seperti ini..
> if .eof then
> .addnew
> bla ... blaa
> .update
> else
> bla...bla..blaa
> .update
> saya biasa pake data environment tapi dengar2 ada masalah serius jika
> pake DE... menurut rekan2 bagaimana ? karena saya pikir kalo pake DE
> dan mau ganti SQL server nya tinggal ganti koneksi di DE lalu beres...
> Kalau backend nya MS Access apakah ada store procedure nya ? setahu
> saya SP di oracle dan MS SQL Server ya ?
> karena saya pake MS Access dan MySQL bagaimanakah cara yang plg
> efektif....
> Lalu kalo menurut rekan2 kalo metode save pake SQL state bagaimana,
> spt ini :
>
> private cmdSimpan_Clicked()
> dim rs as new adodb.recordset
>
> with rs
> set .activeconnection=DataEnvironment1.MyMainConn
> .source="Select * From tblPenjualan Where PenjualanID= '" &
> txtPenjualanID & "'"
> .cursorlocation=adUseClient
> .cursorType=adOpenKeySet
> .LockType=adOptimistic
> .open
>
> if .eof then
> .addnew
> .field blablablabla
> .update
> else
> .field blablabla
> .update
> end if
>
> .close
> end with
> set rs=nothing
> end sub
>
> mohon tanggapannya
> thx
> edi susanto
Untuk keluar dari millis ini, kirim email kosong ke:
[EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Programmer-VB/
<*> 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/
