Ado Sql Create İle Autoıncrement Prımary Key Kullanılması

Ado Sql Create İle Autoıncrement Prımary Key Kullanılması - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Ado Sql Create İle Autoıncrement Prımary Key Kullanılması (/konu-ado-sql-create-ile-autoincrement-primary-key-kullanilmasi.html)

Sayfalar: 1 2

Ado Sql Create İle Autoıncrement Prımary Key Kullanılması - accessman - 04/02/2020

şu kod ile bir tablodan başka bir tablo oluşturuyorum ama otomatik sayıda eklemek istiyorum
Autoıncrement Prımary Key
bunu nasıl ekleyeceğim

Sub sqql(v As String)

    Dim Sql As String

    Dim dbs As Database

    Set dbs = OpenDatabase("C:\Users\doktor2\Desktop\pmf\_udemy\egitim.accdb")

    

    Sql = "SELECT liste_tam.FABRİKA as fabrika, liste_tam.DEPARTMAN as departman, liste_tam.[GÖREV TANIMI (AS400)] as gorevas," _

    & " liste_tam.[GÖREV TANIMI (İSO)] as goreviso, liste_tam.SİC as sicil, liste_tam.V as vardiya4," _

    & " liste_tam.ADI as isim, liste_tam.SOYADI as soyisim, liste_tam.[İŞE GİRİŞ T] as isgirtar" _

    & " INTO liste6" _

    & " FROM liste_tam" _

    & " WHERE (liste_tam.SİC) Is Not Null AND (liste_tam.V) Like '*" & v & "*'" _

    & " ORDER BY liste_tam.FABRİKA, liste_tam.DEPARTMAN, liste_tam.[GÖREV TANIMI (AS400)], liste_tam.[GÖREV TANIMI (İSO)];"



    dbs.Execute sql

    dbs.Close



End Sub

Cvp: Ado Sql Create İle Autoıncrement Prımary Key Kullanılması - ozanakkaya - 04/02/2020

DoCmd.RunSQL "ALTER TABLE liste6 ADD Column sno COUNTER"

DoCmd.RunSQL "ALTER TABLE liste6 ADD PRIMARY KEY (sno)"

kodları ile sno adında otomatik sayı eklenir. Üstteki otomatik sayı ekler, alttaki birincil anahtar ekler. Bu kodları, end sub'un üstüne yazarak deneyiniz.

Cvp: Ado Sql Create İle Autoıncrement Prımary Key Kullanılması - accessman - 04/02/2020

teşekkürler admin peki bunu tek Sql cümlesinde belirtmek mümkün mü yani benim yazdığım Sql cümlesi içine eklenebiliyor mu

Cvp: Ado Sql Create İle Autoıncrement Prımary Key Kullanılması - ozanakkaya - 04/02/2020

Tek Sql cümlesi ile birincil anahtar ve otomatik sayı oluşturamazsın. sizin yazdığınız Sql kodu içerisinde ekleyemezsin.

Cvp: Ado Sql Create İle Autoıncrement Prımary Key Kullanılması - accessman - 04/02/2020

teşekkürler
normal alan eklemek için yine bu mu kullanılacak

DoCmd.RunSQL "ALTER TABLE liste6 ADD Column okul_adi TEXT(20)"

yoksa ilk Sql e eklenebilir mi

Cvp: Ado Sql Create İle Autoıncrement Prımary Key Kullanılması - ozanakkaya - 04/02/2020

DoCmd.RunSQL "ALTER TABLE liste6 ADD Column sno COUNTER, okul_adi TEXT(20)"