- Katılım
- 11 Mart 2005
- Mesajlar
- 3,147
- Excel Vers. ve Dili
- Office 2013 İngilizce
Merhaba,
Accesten veri almak istersek,
SQL INNER JOIN Kullanımında aşağıdaki kodda "ifadede tür uyuşmazlığı" hatasını vermekte
Access tablolarının ekran görüntüleri ekte sunulmuştur,
teşekkürler,
Accesten veri almak istersek,
SQL INNER JOIN Kullanımında aşağıdaki kodda "ifadede tür uyuşmazlığı" hatasını vermekte
Access tablolarının ekran görüntüleri ekte sunulmuştur,
teşekkürler,
Kod:
Private Sub SiparisDetay()
Dim SQL As String
Dim ss As Integer
Connect
SQL = "SELECT * " & _
"FROM tblUrunler INNER JOIN tblYeniSiparis " & _
"ON tblUrunler.StokId = tblYeniSiparis.StokId"
rs.Open SQL, cn, 1, 3
ss = rs.RecordCount
End Sub
Kod:
Public cn As ADODB.Connection
Public rs As ADODB.Recordset
Sub Connect()
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
With cn
.Provider = "Microsoft.ACE.OLEDB.12.0"
.ConnectionString = "Data Source = " & ThisWorkbook.Path & "\Dbb\db.accdb"
.Open cn
End With
End Sub
Ekli dosyalar
-
12.5 KB Görüntüleme: 9
-
102.8 KB Görüntüleme: 9
-
101.5 KB Görüntüleme: 9