moghadam1372
چهارشنبه 24 اردیبهشت 1393, 07:52 صبح
با سلام
یکی از دوستان این کد را برای ساختن یک جدو ل جدید نوشته اند
Private Sub Command1_Click()
Dim strsql As String
Dim database1 As Database
strsql = "create table table2 (id integer,name text(20))"
Set database1 = OpenDatabase(App.Path & "\db12.mdb", True, False)
database1.Execute strsql
End Sub
حالا اگر جدولی با نام A د اشته باشیم چگونه می شود که چند فیلد به آن اضافه کرد ؟؟؟؟ البته دیتا بیس رمزدار است کد بالا دیتا بیس بدون رمز است ؟؟؟
یکی از دوستان این کد را برای ساختن یک جدو ل جدید نوشته اند
Private Sub Command1_Click()
Dim strsql As String
Dim database1 As Database
strsql = "create table table2 (id integer,name text(20))"
Set database1 = OpenDatabase(App.Path & "\db12.mdb", True, False)
database1.Execute strsql
End Sub
حالا اگر جدولی با نام A د اشته باشیم چگونه می شود که چند فیلد به آن اضافه کرد ؟؟؟؟ البته دیتا بیس رمزدار است کد بالا دیتا بیس بدون رمز است ؟؟؟