[FORM] Form üzerinden Pdf Dosyasına Adres Tanımlamak.

ctnerdal · 08-03-2021, 15:37

Selam arkadaşlar.
*Üzerinde çalıştığım VT da 1000 üzerinde proje kayıtlı. Bu projelerinde orjinal dökümanlarını PDF çevirip bir klasörde tutuyorum. Dosya isimlerini de VT vermiş olduğum proje numarası ile aynı yaptım. Örneğin proje numarası 2021.BGM.001 ise klasörde ki dosyanın ismi de 2021.BGM.001(.pdf)

*Tabloda bir alan ekleyerek VERİ TÜRÜNÜ "LİNK" olarak belirttim ve bu alana PC de kayıtlı dosya konumunu ekledim. Örneğin "C:\Users\dell1\Desktop\PROJELER VERİTABANI\vtveriler\2021ilprojeleri\2021.BGM.001.pdf"

*Tabloda veya formda farketmiyor LİNKE tıkladığınızda dosya açılıyor. Eminim daha kolay bir yolu vardır ama benim için bayağı meşakkatli oldu. 1000 yakın dosyayı tek tek köprü adresini tanımladım.

*Ancak şimdi başka çalışan yada yöneticlilerin bilgisayarlarına tüm klasörleri kopyaladğımda köprüler çalışmayacak doğal olarak.

* Access SQL forumu inceledim, bu konu bayağı konuşulmuş, ileri düzey çözümlerde var ama açıkcası ben çözemedim. Klasör yolu değişse bile köprülerin bozulmadan çalışabilmesinin bir yolu var mı?

Selamlar, saygılar.

dsezgin · 08-03-2021, 15:53

Örneğin "C:\Users\" & environ("username") & "\Desktop\PROJELER VERİTABANI\vtveriler\2021ilprojeleri\2021.BGM.001.pdf"

dell1 olan yeri yukarıdaki gibi değiştirin.

ctnerdal · 08-03-2021, 16:08

Teşekkür ederim Sezgin hocam. İyi ki varsınız.
Proje numarası ile dosya adını aynı tuttum ki adresleme de kolaylık olsun. Peki üstadım bundan sonra da her kayıt için adresi tek tek tanımlamam mı gerekiyor? Daha basit veya pratik bir yolu var mı?
Smile

Cevap verdiniz borçlu çıktınız. Her zaman ki gibi!

dsezgin · 09-03-2021, 01:16

Sn ctnerdal;
Proje numarasi guncellendiginde, yol referansinda proje numarasi adinda pdf dosyasi varsa kopru alanina baglanti saglanir.

Visual Basic
Private Sub Proje_Numarasi_AfterUpdate()
Dim Yol as String
Yol="C:\Users\" & environ("username") & "\Desktop\PROJELER VERİTABANI\vtveriler\2021ilprojeleri\" & me.Proje_Numarasi & ".pdf"
if len(dir(yol,vbnormal))>0 then Me.[KopruKutusu] = me.Proje_Numarasi & "#" & yol & "#"
end if

ctnerdal · 09-03-2021, 21:19

Teşekkür ederim Sezgin hocam. Çözülmüştür. Saygılar.

Benzer Konular...
Konu:		Yazar	Cevaplar:	Gösterim:	Son Mesaj
	Adres Ve Telefon Rehberi	ahmet114	14	225	02-03-2024, 18:59 Son Mesaj: dsezgin
	Access Formu üzerinden Sql Server Tabloya Nasıl Veri Kaydı Yapılır	karacahil	4	200	15-02-2024, 12:10 Son Mesaj: halily
	Ana Menüden 2.form Açtığımda Form Görev çubuğuna Inmiyor. 32'den 64'e Geçiş Hatası	OGUZTURKYILMAZ	3	240	13-04-2023, 23:39 Son Mesaj: OGUZTURKYILMAZ
	[FORM] Formda Adres Seçime Göre Metin Kutularına Getirme	anno	1	149	28-12-2022, 22:11 Son Mesaj: onur_can
	[FORM] Access Form Üzerinden Başka Dosya Açmak	destinasi	6	2.708	25-05-2022, 20:39 Son Mesaj: onur_can
	[VBA] Access Vba üzerinden Sorgu çağırma Hatası	tanyeri	20	613	13-02-2022, 17:47 Son Mesaj: onur_can
	Form uzerinden Resim Ve Pdf Kaydetmek Icin Ayri Ayri Klasor Olusturmak Mumkun Mu?	Murat007	39	2.363	01-02-2022, 03:37 Son Mesaj: rerdem1903
	[VBA] Text Dosyasına Yazma, Okuma, Düzenleme	A.Serdar	4	201	19-01-2022, 12:13 Son Mesaj: halily

Oturum Aç




Beni Hatırla Şifremi Unuttum?