+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic 6 (https://accesstr.net/forum-visual-basic-6.html)
+--- Forum: Visual Basic 6 Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-6-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Vb6 access te tablo olustutuken hata (/konu-vb6-access-te-tablo-olustutuken-hata.html)
Vb6 access te tablo olustutuken hata - exelance - 19/08/2010
Arkadaşlar söle bi kodum var ama hep hata alıyorum
Dim dosya As Database, td As TableDef, fd As Field
Private Sub Command1_Click()
On Error Resume Next
If text1.Text = "" Then
MsgBox "Lütfen bir ism giriniz.", vbApplicationModal + vbInformation, "Form1"
text1.Text = ""
Else
On Error Resume Next
Set dosya = "c:\deneme.mdb" 'Burda hep hata alıyorum.
Set fd = td.CreateField("tarih", dbText, (20))
td.Fields.Append fd
dosya.TableDefs.Append td
dosya.Close
End if
End Sub
acemiyim vb6 da çözemedim sorunu neden hata alıyorum ?
Cvp: Vb6 access te tablo olustutuken hata - ogulcan92 - 19/08/2010
Sn:exelance
Set dosya = "c:\deneme.mdb" yazan kodu aşağıdaki şekilde değiştiriniz.
Kod:
Set dosya = OpenDatabase("c:\deneme.mdb")Cvp: Vb6 access te tablo olustutuken hata - exelance - 19/08/2010
sağolsın dediğin şekilde yaptım oldu .
Cvp: Vb6 access te tablo olustutuken hata - ogulcan92 - 19/08/2010
Sn:exelance
Rica ederim konu cevaplanmışlara taşınmıştır.