Tablolara dışardan ulaşılmasın

Katılım
25 Aralık 2005
Mesajlar
115
Access de şu sorun var çözümü varmı bilemiyorum. Tablolardaki verileri saklayamıyorum. Accessde Tablolara ulaşılmamasının yolu varmı
 
Katılım
25 Aralık 2005
Mesajlar
115
Zaten Access en büyük açığı bu bu meseleyide halletse tadına doyum olmayacak
 

beab05

Özel Üye
Katılım
19 Mart 2007
Mesajlar
1,418
Excel Vers. ve Dili
Office 2013
Merhabalar;
Access bizlere kısıtlı ama birçok özelliği birarada sunuyor ve ben Access'in açığı olarak görmüyorum bunu..
Şöyle de yapabilirsiniz, ilgili tabloları size göre ulaşılmayacak yerlere koyun ve ilgili connection' ı oluşturarak veri kaynakları olarak kullanın..

Me.RecordSource = ......

gibi...
 
Katılım
25 Aralık 2005
Mesajlar
115
Ulaşılmayacak yer nere mesela SQL sever diyelim onada ODBC bağlantısı kurduğunda access içerisinde kısa yol bağlantısı var gene tablolara ulaşılabiliyor.
 

beab05

Özel Üye
Katılım
19 Mart 2007
Mesajlar
1,418
Excel Vers. ve Dili
Office 2013
Merhabalar;

Siz alttaki gibi denerseniz eğer, tablo ya da hiçbir verinin görünmediğini görürsünüz.. SQL Server için örnek veriyorum, Access için de aynısı geçerlidir sadece "ConnectionString"te değişklik yapmanız gerekir.

Örneğin;
Boş bir form yapın. İçine denetim kaynağının tablonuzda bulunan alanları olan metin kutuları koyunuz.. Formu duruma göre "Tek Form" ya da " Sürekli Form" yapınız. Daha sonra da formun açılışına alttaki kodları ekleyiniz ve formu açınız.. Hata yapmadıysanız metin kutularına SQL Serverda bulunan tablodaki verilerin geldiğini görürsünüz. Ortada görünen tablo ya da sorgu da yoktur üstelik!!! Bu şekilde istediğiniz olaya göre kodları yazıp şekillendirebilirsiniz..
Aşağıdaki " select * from tablonuz" yerine direkt tablo ismini yazabilirsiniz. Ya da istediğiniz sonuçları veren sorgu cümlelerini..

Kod:
Dim bb As New ADODB.Recordset
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.ConnectionString = "driver={SQL Server};" & _
      "server=ip_ya_da_local_adres;uid=kullanıcı_ismi;pwd=sifreniz;database=veritabanı_ismi"
On Error Resume Next
cn.Open
bb.Open "SELECT * FROM tablonuz", cn, adOpenKeyset, adLockOptimistic
   
   [COLOR="Red"]Set Me.Recordset = bb[/COLOR]

Set cn = Nothing
Set bb = Nothing
 
Katılım
25 Aralık 2005
Mesajlar
115
Hocam burayı biraz açmak istiyorum.
1-Bu bağlantıyı her form için yapmamız gerekecekmi
2-Accessde alt form kullanan bir formda bağlantı nasıl olur.
3-Access de sorgularımızıda sql server atıp ondan sonra bağlantı kurmalıyız anladığım kadarıyla doğrumu
 
Üst