AccessTr.neT

Bul · 08/10/2020, 02:49

merhaba arkadaşlar, sınıf - nesne konularında bir şey keşfettim, orada kullanmak üzere; bir Sql şablonu oluşturmak; Sql İfadesinde Alan Adı Ve Değerler Yerine Değişken Kullanmak , böylece kod sayısını azaltmak istiyorum, ama hata iletisi alıyorum, bunun bir yolu olmalı, yardımcı olursanız çok sevinirim.

Private Sub Komut8_Click()

Dim x, y
x = "alanAdi"
y = "adi"

DoCmd.RunSQL "INSERT INTO tbl (x) VALUES (y)"
End Sub

Bul · 08/10/2020, 09:52

Sql metnini aşağıdaki gibi düzenleyebilirsiniz.

Kod:

Sub gstr()

  alanAdi = "adit"

  veri = "veli"

  DoCmd.RunSQL ("INSERT INTO tbl (" & alanAdi & ") VALUES ('" & veri & "')")

 End Sub

Bul · 08/10/2020, 10:23

Kod:

Function sqlmetin(veri As String) As String

 sqlmetin = "INSERT INTO tbl (adit) VALUES ('" & veri & "')"

 End Function

 Sub gstr()

  DoCmd.RunSQL (sqlmetin("ömer"))

 End Sub

Bul · 08/10/2020, 10:26

sayın alicimri çok teşekkür ederim çok mutlu oldum, sayenizde her gün yeni bir şeyler öğreniyoruz,kolay gelsin

AccessTr.neT

Sql İfadesinde Alan Adı Ve Değerler Yerine Değişken Kullanma

Sql İfadesinde Alan Adı Ve Değerler Yerine Değişken Kullanma

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Giriş yap

Hesap oluştur

Konu Linkleri