Forum da Evrak numarasını yazdıkdan sonra butona bastığımda HURDA_GIRISLERI Sorgusundaki
TARIH, SAAT, FIRMA, PLAKA, HURDA CINSI, FIYAT, KG verilerini formdaki yerlerine getirmesi.
Şimdiki Dosyadaki kısa şeklidir. Teşekkürler.
tüm Kitaplıklar açıkmış. en sade duruma getirdim dosya ektedir. yardımcı olabilirseniz sevinirim.
Private Sub FISNOBUL_Click()
Dim dbsNorthwind As DAO.Database
Dim rstProducts As DAO.Recordset
Dim strSQL As String
Dim msg
Set dbsNorthwind = CurrentDb
Set rstProducts = dbsNorthwind.OpenRecordset("Select * From HURDA_GIRISLERI Where IRS = NETIRSALIYE ")
NETTARIH = rstProducts.Fields("TARIH")
NETSAAT = rstProducts.Fields("SAAT")
End Sub
BUDA OLMADI
barcins, 29-05-2009 tarihinden beri AccessTr.neT üyesidir.