VB6 Access De Tablo Oluşturmak
-
arkadaşlar sorularla sıktımmı sizi bilmem ama bitane daha sorum var
tablo oluşturabiliyorum ama text1 in içinde yazdığın adda tablo oluşturması lzm ama olmuyor
kod bu arkadaşlar :
Dim db As DAO.Database
Dim tablo As DAO.TableDefSet db = OpenDatabase("D:\mu.mdb")
Set tablo = db.CreateTableDef("text1.text") ' Burda sorun var arkadaşlarWith tablo
.Fields.Append .CreateField("deneme", 1, 10)
End With
db.TableDefs.Append tabloSet tablo = Nothing
Set db = NothingDim cevap
cevap = MsgBox("Kaydetmek istediğinizden eminmisiniz ?", vbOKCancel + vbQuestion, "Uyarı") -
("Text1.text") demişsin tırnakları kaldır (Text1.text) şeklinde dene
-
saolsın oldu.
Toplam Hit: 2755 Toplam Mesaj: 3