thanks atas bantuannya mas yulianto ..
saya convert dulu setiap bilangan jadi decimal..perlu ga?
soalnya kalo di tabel access saya type nya saya jadiin decimal..kalo
di VB saya pake titik bukan koma contoh 125.5 di tabel akan jadi
1255, sedangkan kalo saya convert dulu dia tabel bisa 125,5..kalo di
vb kalo pake koma 125,5*10 hasilnya 1250 bukan 1255 jadi saya
masukinnya pake titik 125.5 trus saya convert
txtUkuran.Text = CDec(Val(txtUkuran.Text))
Input ke tabel :
strTambahDetil = "select * from KontrakDetil where NoKontrak='" &
txtNoKontrak.Text & "' and Produk='" & txtProduk.Text & "'"
rsOlahData2.Open strTambahDetil, conTruss, adOpenDynamic,
adLockOptimistic, adCmdText
If rsOlahData2.EOF Then
rsOlahData2.AddNew
rsOlahData2!Ukuran = txtUkuran.Text
rsOlahData2.Update
cmdRefreshDetil_Click
nah sampe sini data di tabel access udah bener decimalnya bisa..
trus di CR juga udah bisa keluar..125,5
nah waktu saya panggil di vb dia keluarnya jadi 125
saya pake komponen crystal report control
crPerTahun.SelectionFormula = "{KontrakHeader.Tahun}='" & Format(Now
(), "yyyy") & "'"
crPerTahun.WindowState = crptMaximized
crPerTahun.RetrieveDataFiles
crPerTahun.Action = 1
padahal kalo saya tes print di crnya setelah saya refresh data..dia
mau ngeprint dengan bener, tapi kalo saya panggil dari vb ga bisa..
ada ide ato saya salah dimana?
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/
