AccessTr.neT
dosya yolu - 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ığı: dosya yolu (/konu-dosya-yolu.html)



dosya yolu - orhantanriverdi - 04/01/2011


Sayın hocalarım.

Programın açılışında dosya yolunu sorması için access.tr den hazırlanmış örneklerden faydalanarak kendi programıma ekledim fakat sürekli.Function VerifyLink() As Boolean
Dim cat As ADOX.Catalog HATASI veriyor aşağıda belirtildiği şekilde. Sorunu bulamadım. Yardımlarınızı bekliyorum. Saygılar


Function VerifyLink() As Boolean
Dim cat As ADOX.Catalog
Dim tdf As ADOX.Table
Dim strTemp As String
Set cat = New ADOX.Catalog
With cat
Set .ActiveConnection = CurrentProject.Connection
On Error Resume Next
For Each tdf In .Tables
If tdf.Type = "LINK" Then
strTemp = tdf.Columns(0).Name
Exit For
End If
Next tdf
End With
VerifyLink = (Err.Number = 0)
End Function


Cvp: dosya yolu - mehmetdemiral - 04/01/2011

Lütfen örnek ekleyiniz.


Açılışta tablo yolu sorması - orhantanriverdi - 04/01/2011


Hocam ekte bulunmaktadır. Form1 işlem hatası veriyor.


Cvp: Açılışta tablo yolu sorması - mehmetdemiral - 04/01/2011

Sanırım daha önce dosya yolu isimli konuyla ilgili örneği burada yayınladınız. Her mesaj için ayrı konu açmayınız. Konuları birleştiriyorum. Lütfen aynı konuyla devam edin. Ayrıca konuyu yanlış yere (örneklere) açmışsınız. Sorular bölümüne de taşıyorum.


Cvp: dosya yolu - mehmetdemiral - 04/01/2011

Gönderdiğiniz dosyada eksik referans nedeniyle bir problem görülüyor. O referans hatası sadece bende olabilir diye düşündüm ama bahsettiğiniz hatayla ilgili verilen kodlar da o referansı kullanıyor. Sanırım ACEDAO.DLL ile ilgili bir referans ekliği bu.


Cvp: dosya yolu - orhantanriverdi - 04/01/2011


Teşekkürler hocam. Elinize sağlık.

Saygılar