Dear Harli,
O iya sori lupa nomor 4b ya ..
Caranya bisa dengan mengeset field Tanggal di database supaya ALLOW NULL.
Kemudian di program VBnya pada saat penyimpanan, coba syntax berikut :
txtTgl = empty
dan bukannya :
txtTgl = "" atau txtTgl = 0
atau pada saat penyimpanan data bisa anda tambahkan proses checking dgn
syntax sbb :
if isEmpty( txtTgl ) or isNull( txtTgl ) or (trim(txtTgl)="") then
rs("Tanggal").value = NULL
Aku sarankan juga kalau untuk menampilkan data tanggal jangan pakai text
box, anda bisa pakai APEXTrue DBDate, Date Picker, atau MaskEdit atau
sejenisnya. Selain tampilannya akan lebih bagus, mereka juga bisa menyimpan
nilai NULL.
Jawaban Nomor 5 :
Coba ikuti langkah2 sbb :
1. Pada setiap table selalu tambahkan field "dtCreated" datetime,
"dtModified" datetime, dan "UpdatedBy" varchar( 50 )
2. Anda set "Default Value" dari masing2 field tsb dengan "getdate()",
"getdate()", dan "PRGMR"
3. Di VB, buat satu Module, dan deklarasikan 1 variabel GLOBAL,
contohnya :
Global GlobBY$
4. Kemudian pada form login ( pasti ada form login kan kalau ada user
??), setelah user sukses login, simpan ID User / UserName / Inisial yang
login (terserah anda ), contoh syntax :
GlobBY = txtUsrName
5. Jangan lupa di setiap proses "SAVE" di semua form / aplikasi,
sebelum record disimpan anda tambahkan syntax :
Rs("UpdatedBy").value = GlobBY
6. Untuk membuat field "dtModified" berubah secara otomatis, coba anda
ketikkan trigger di setiap table sbb :
================
CREATE TRIGGER trg_MAkun_dtModified ON dbo.MAkun
FOR UPDATE
AS
if not update( dtModified )
update MAkun
set dtModified = getdate()
from MAkun R, Inserted I
where R.AkunID = I.AkunID
================
Catatan : contoh diatas nama tabelnya adalah "MAkun", dengan primary key
"AkunID". Silahkan modifikasi sendiri sesuai kebutuhan.
Semoga membantu
Best Regards,
Dhani Aristyawan, S.Kom.
EDP Supervisor
PT. ALP Petro Industry ( AGIP )
Jl. Raya Kebonsari
Ds Legok - Pasuruan
Telp : 0343 - 853308
Fax : 0343 - 853307
_____
From: harli harli [mailto:[EMAIL PROTECTED]
Sent: Thursday, October 19, 2006 4:46 PM
To: Dhani Aristyawan (EDP)
Subject: Balasan: RE: mohon bantuannya.........
terima kasih untuk balasannya, akan saya coba coding dari mas dhany.
untuk pertanyaan nomor lima :
intinya saya ingin mengetahui nama2 data entry yang menginput data, dengan
kata lain saya ingin tahu mereka sudah menginput data apa saja dalam satu
hari kerja dan nama mereka ada dalam table yang mereka input.mengerti maksud
saya gak, mas? saya juga agak susah menjelaskan...mungkin dengan contoh ini
bisa jelas, contoh:
data A telah diinput oleh data entry X
data B telah dinput oleh data entry Y
dan nama mereka tercantum didalam tabel data base
mudah2an dgn contoh ini dapat dimengerti.
pertanyaan no 4 point b gmn,mas. ada pencerahan gak soalnya waktu input data
tanggal kosong yang tesimpan ke database selalu 1/1/1900.
gimana caranya agar penginputan tanggal kosong tidak tersimpan 1/1/1900.
maaf klo merepotkan mas dhany...
"Dhani Aristyawan (EDP)" <[EMAIL PROTECTED]> menulis:
Dear Harli,
Jawaban :
1. Coba pake syntax :
Conn.execute "BACKUP DATABASE [NamaDatabase] TO DISK = '[PathFileBackup]'"
Catatan : Conn = adodb.connection
2. coba syntax berikut :
CRViewer1.refresh
Catatan : CRViewer1= Crystal Report Viewer
3. Set properties "EnableExportButton" menjadi "TRUE", kemudian klik
tombol bergambar amplop di kiri atas dari report yang dihasilkan
4. Di dalam pemrograman & database memang tanggal sering menjadi
masalah, tapi menurut saya SELALU GUNAKAN FORMAT "yyyy-mm-dd" untuk
penyimpanan ke dalam database, karena format ini selalu benar ( paling tidak
selama aku menggunakan format tsb. ) waktu masuk database.
Baru kemudian pada saat menampilkan, formatnya terserah anda, tapi saya
sarankan untuk pake format "dd-mmm-yyyy" hanya untuk memastikan bahwa
urutannya adalah tgl, bulan, & tahun.
5. Kurang paham pertanyaannya nih, bisa diperjelas lagi ?
Semoga membantu
Best Regards,
Dhani Aristyawan, S.Kom.
EDP Supervisor
PT. ALP Petro Industry ( AGIP )
Jl. Raya Kebonsari
Ds Legok - Pasuruan
Telp : 0343 - 853308
Fax : 0343 - 853307
_____
From: harli harli [mailto:[EMAIL PROTECTED]
Sent: Thursday, October 19, 2006 9:15 AM
To: [EMAIL PROTECTED]
Subject: mohon bantuannya.........
Mas, tolong bantuannya dong?
program yang saya kerjakan udh hampir selesai, tp ada masalah2 yang belum
terpecahkan....masalahnya dibawah ini:
1. gimana cara backup database n restore database melalui vb, db yg gw pake
sql server 2000
2. gimana cara refresh data pd cr 9.0 di vb, agar data yg sdh diinput dapat
tampil di dlm laporan tanpa harus refresh data di cr 9.0...
3.cr 9.0 bisa disimpan ke dalam format txt file atw excel, klo bisa gimana
caranya dalam menggunakan vb....
4.dalam memasukan data ke tbel database saya ada masalah dalm memasukan
data tanggal, masalahnya :
a. dalam format tanggal jika tanggal < dr 12, dibacanya sebagai bulan.
contoh :
10-11-2006 seharusnya menjadi 11/10/2006 (format yg digunakan dlm vb
"mm-dd-yyyy"), tp menjadi 10/11/2006.
b. dalam pengisian tgl dr vb ke SQL selalu muncul 1/1/1900, jika dlm txt di
vb tidak diisi.gimana caranya agar 1/1/1900 tidak muncul jika data di sql
dgn type data datetime tidak dimuncul ke vb.
5. gimana cara memuncul nama data entry di dalm tabel yang mereka input,
tanpa menginput lg di setiap form yang mereka input...
maaf mas klo pertanyaannya banyak banget, masalah diatas amat mengganggu
saya dan juga lagi dikejar deadline.....
trim kasih banyak....
__________________________________________________
Apakah Anda Yahoo!?
Lelah menerima spam? Surat Yahoo! memiliki perlindungan terbaik terhadap
spam
http://id.mail.yahoo.com
_____
Apakah Anda Yahoo!?
Kunjungi halaman depan Yahoo!
<http://sg.rd.yahoo.com/mail/id/footer/def/*http:/id.mail.yahoo.com/>
Indonesia yang baru!
[Non-text portions of this message have been removed]
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Bagi terjangkit virus lokal, zip virus tersebut
dan kirim ke [EMAIL PROTECTED], kami
akan membuat removalnya untuk anda.
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/indoprog-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/
