Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
11/05/2012 09:20
Konu Sahibi
accessman
Yorumlar
3
Okunma
1564
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
hayırlı cumalar
programda ilgili tablo var mı diye nasıl kod yazmalıyız
yani önce
tablo1
programımızda varmı diye bakacak yoksa bağlayacak

if tablo1 var mı then
msgbox "tablo var tekrara gerek yok"
else
DoCmd.TransferDatabase acLink, "ODBC", "ODBC;DSN=eleman", acTable, "personel", "personel", False
end if

buradaki tablo1 in olup olmadığını kontrol edeceğiz
teşekkürler

bunu nasıl kullanabilirim

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Dim Data As New adodb.Connection
Dim Kayit As New adodb.Recordset

Data.Open "Driver={Microsoft Access Driver (*.mdb)};" & "DBQ=C:webing.mdb"

Set Kayit = Data.OpenSchema(adSchemaTables)
If Kayit.RecordCount = 0 Then
MsgBox "Veritaban?nda Tablo Bulunamad?", 48, "Bilgilendirme"
Else
Do Until Kayit.EOF
If UCase(Kayit("TABLE_TYPE")) = "TABLE" Then
MsgBox Kayit("TABLE_NAME")
End If
Kayit.MoveNext
Loop
End If
Kayit.Close 


proje adının
C:\Users\zaman\Desktop\calısan.mdb
olduğu ve sogulanan tablonun adının
personel
olduğunu düşünürsek nereleri nasıl değiştireceğiz

bir de bu var

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Imports System.Data.OleDb
Public Class Form1
Dim con As OleDbConnection

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim con As New OleDbConnection("provider=microsoft.jet.oledb.4.0; data source=ayarlar.mdb")
con.Open()
Dim dt As DataTable = con.GetSchema("tables")
Me.ListBox1.Items.Clear()
Dim dr As DataRow
For Each dr In dt.Rows
ListBox1.Items.Add(dr("table_name").ToString)
Next
End Sub
End Class


Kod:
SELECT MSysObjects.Name
FROM MSysObjects
WHERE (((MSysObjects.Connect)="DSN=calısan;") AND ((MSysObjects.Name)=[ForeignName] And (MSysObjects.Name)="personel") AND ((MSysObjects.Type)=4));


sorgusu ile tabloyu projede bulabiliyoruz ama bunu nasıl if li kodun içine yazmalıyız


@benbendedeilem
Cevapla

alpeki99

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.092
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
20/10/2017,09:01
Çözüldü 
Bir tabloda alan adının olup olmadığını kontrol etme

Tablo ve alan kontrolü ya da tablo varmı alan varmı sorusuna cevap.


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

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
31/10/2008
425
Denizli
Ofis 2003
20/09/2016,00:20
Çözüldü 
teşekkürler
inceleyeceğim


@benbendedeilem
Cevapla

alpeki99

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.092
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
20/10/2017,09:01
Çözüldü 
Konuyu taşıyalım mı? Sorun halledilemedi ise bilgi verin lütfen.


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


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Access Tablo/sorgu Karşılaştırma Allback 3 142 Dün, 15:03 Allback
Çözüldü Tablo İlişkilendirme tolgooo17 3 205 07/09/2017, 00:05 ozanakkaya
Çözüldü Pivot Tablo Hk. serkan1985 5 390 07/08/2017, 22:35 serkan1985
Çözüldü Farklı Tablo Verilerini Tek Bir Formda Gösterme damacanasu 2 220 23/07/2017, 21:31 damacanasu
Çözüldü Access Word Bağlantısında 2 Tablo İle İlişkilendirme tiryaki_44 3 255 06/06/2017, 03:36 ozanakkaya

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.