(18/07/2023, 01:10)berduş yazdı: alan türü ne olacak?
alan adını nerden alacak?
Not: Lütfen açılan her konunun tek soru için olduğunu unutmayalım.
yeni soru için yeni konu açmaya özen gösterelim yoksa ipin ucu kaçıyor)
aşağıdaki kod para birimi alanı ekler
Dim strDdl As String
strDdl = "ALTER TABLE Tablo1 ADD Column alanAdi currency NULL;"
CurrentProject.Connection.Execute strDdl
teşekkürler
Ben de aşağıdaki gibi bir kod oluşturmuştum ama;
Kod:
Sub AddFieldToTable(tblName As String, newField As Variant)
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Dim fld As DAO.Field
Set db = CurrentDb()
Set tdf = db.TableDefs(tblName)
tdf.Fields.Append tdf.CreateField(newField, dbDouble)
Set tdf = Nothing
Set db = Nothing
End Sub