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 ?
Vb6 access te tablo olustutuken hata
Bu Konudaki Yorumlar |
Vb6 access te tablo olustutuken hata - Yazar: exelance - 19/08/2010, 13:00
Cvp: Vb6 access te tablo olustutuken hata - Yazar: ogulcan92 - 19/08/2010, 14:17
Cvp: Vb6 access te tablo olustutuken hata - Yazar: exelance - 19/08/2010, 16:53
Cvp: Vb6 access te tablo olustutuken hata - Yazar: ogulcan92 - 19/08/2010, 18:50
|
Konuyu Okuyanlar: 1 Ziyaretçi