Vb6 access te tablo olustutuken hata - Baskı Önizleme +- 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. |