makasih bang abu tiara, syntaksnya cocok banget, mungkin ini bisa membantu
rekan2 laen yg punya kasus yang sama.
----- Original Message -----
From: abu tiara
To: [EMAIL PROTECTED]
Sent: Wednesday, July 25, 2007 2:59 PM
Subject: Re: [vb-indo] membaca variabel desimal ke string
jika databasenya menggunakan ms-Access dan fields kode bertipe Numeric
coba tambahkan fungsi val di clause wherenya
Data2.RecordSource="select * from B where KODE =val('" & Trim(CDbl(Label1))
& "')"
Data2.Refresh
End Sub
setau saya jika di ms-access jika fieldsnya bertipe number perlu ditambahkan
val tapi jika pake MS-SQL Server ngak perlu (ada yang tau kenapa?)
semoga membantu
abuTiara
On 7/24/07, yongki <[EMAIL PROTECTED]> wrote:
>
> 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.
>
> [Non-text portions of this message have been removed]
>
>
>
[Non-text portions of this message have been removed]
