salam para programmer.....
tu de poin aja ya,
saya punya 2 database yaitu :
database A berisi field KODE (text, 10) dan field NAMA (text, 30)
database B berisi field USER (text, 30), field TANGGAL (date) dan field
KODE (numeric, 5.1)
nah 2 database ini punya relasi berdasarkan field KODE.
Isi database A :
------------------------------------------------
| Kode | Nama |
------------------------------------------------
| 100 | Transprotasi |
| 100.1 | Bahan Bakar |
| 200 | Biaya Lain2 |
| 200.1 | Konsumsi Tamu |
Isi database B :
------------------------------------------------------
| User | Tanggal | Kode |
------------------------------------------------------
| Anton | 07/14/07 | 100.1 |
| Andi | 07/20/07 | 200.1 |
| Anita | 07/20/07 | 100 |
lalu saya buat 1 program yg berisi 2 DATA , 2 DBGrid dan 1 label.
masing2 DATA konek ke 2 database berbeda tadi (DATA1 konek ke A dan DATA2
konek ke B)
masing2 DBGrid konek ke 2 DATA berbeda tadi (DBGrid1 konek ke DATA1 dan
DBGrid2 konek ke DATA2)
dan label konek dengan DATA1 (A) dengan field KODE
syntaks :
-------------
Private Sub Label1_Change()
Data2.RecordSource="select * from B where KODE ='" & Trim(CDbl(Label1)) &
"'"
Data2.Refresh
End Sub
nah, kasusnya sewaktu di compile, ternyata keluar pesan error
Run-Time error '3464':
Data type mismatch in criteria expression
mohon solusinya dari rekan2.
Thanks sebelumnya.
