Skip to main content

AccessTr.neT


Vb ile tablo açma

Vb ile tablo açma

Çözüldü #1
Merhaba Arkadaşlar;
Vb kodu ile yeni tablo açma (Her tabloya beleirlediğim ayrı isim)tablo alan adları oluşturma hakkında yardımcı olurmusunuz.Yada şöyle diyeyim ekteki dosyada klasör seçmem gerekiyor tablo oluşturması için fakat sadece tabloyu adlandırarak açmasını nasıl sağlarım.Buna başkabir örnek entegre ederek şu başaramadığım kataloglamıyı yapmaya çalısaçağımda.
.zip Picture2K.zip (Dosya Boyutu: 66,46 KB | İndirme Sayısı: 14)
malidolu, 12-09-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
Kod:
Private Sub Komut0_Click()

    Dim dbConnectStr As String
    Dim Catalog As Object
    Dim cnt As ADODB.Connection
    Dim dbPath As String

    'Buraya veritabanı adresini giriniz
    dbPath = Me.Application.CurrentProject.Path & "\" & Me.Metin1 & ".mdb"
    dbConnectStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbPath & ";"

    'Yeni veritabani yarat
    Set Catalog = CreateObject("ADOX.Catalog")
   Catalog.Create dbConnectStr
    Set Catalog = Nothing

    'Yeni veri tabanına bağlan
    Set cnt = New ADODB.Connection
    With cnt
        .Open dbConnectStr
        .Execute "CREATE TABLE " & Me.Metin3 & " ([Adi] text(50) WITH Compression, " & _
                 "[Soyadi] text(150) WITH Compression, " & _
                 "[BabaAdi] text(50) WITH Compression, " & _
                 "[AnneAdi] text(50) WITH Compression, " & _
                 "[Sehir] text(20) WITH Compression, " & _
                 "[PostaKod] decimal(6))"
    End With
    Set cnt = Nothing



End Sub

Önce yazdığını veri tabanı adını arar varsa onun içine oluşturmak istediğiniz tabloyu yaratır .Yoksa veritabı oluşturarak daha sonra içine tabloyu yaratır.
Deneyiniz....
.rar Tablo yarat.rar (Dosya Boyutu: 15,64 KB | İndirme Sayısı: 29)
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Cevapla
Çözüldü #3
Sayın Puletin çalışmanız ve bilgilendirmeniz süper.
Sanıyorum yanlış anlattım sorunumu.Örnekte bulunan create Table tuşuna basıldığında frmCreatetable formu açılıyor oradaki browse yi iptal edip sadece tablo ya verilecek ismi girmek yeni bir tablo oluşturmak istiyorum.bu mdb nin içine girilen isimlerde tablo oluşturmak yani.İşaallah anlatabildim.
malidolu, 12-09-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #4
Vallahi ben ne demek istediğinizi anlayamadım sevgili malidolu. Bende browse tuşu falan çıkmıyor nerede gördünüz anlayamadım.

Sevgili puletin'in eklediği dosyada:

* Yeni bir Access dosyası (mdb) oluşturma,
* Access dosyası içinde tablo oluşturma,
* Tabloda özelliklerini belirleyerek alan oluşturma.

Gerekli olabilecek herşey örneklendirilmiş. Lütfen daha açık ve anlaşılabilir bir şekilde sorunuzu yöneltin.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla
Çözüldü #5
Sayın Puletin çalışmanız ve bilgilendirmeniz süper.
Sanıyorum yanlış anlattım sorunumu.Örnekte bulunan create Table tuşuna basıldığında frmCreatetable formu açılıyor oradaki browse yi iptal edip sadece tablo ya verilecek ismi girmek yeni bir tablo oluşturmak istiyorum.bu mdb nin içine girilen isimlerde tablo oluşturmak yani.İşaallah anlatabildim.
Benim önceki mesajımda yolladığım örnekte.Teşekkürler picture2k.zip
malidolu, 12-09-2009 tarihinden beri AccessTr.neT üyesidir.
Son Düzenleme: 27/10/2009, 21:38, Düzenleyen: malidolu.
Cevapla
Çözüldü #6
Anladığım şey şu : "mevcut dosyada verdiğiniz isimle bir tablo oluşturmak istiyorsunuz." Eğer durum bu ise örnekteki dosyayı inceleyiniz.
.rar MevcutDosyadaTablo.rar (Dosya Boyutu: 17,26 KB | İndirme Sayısı: 25)
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da