ağda dosya paylaşımı
Tarih
24/10/2013 13:13
Konu Sahibi
konfueyus
Yorumlar
1
Okunma
1146
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
konfueyus
Aktif Üye
Kullanici Avatari
Aktif Üye
22
13/11/2008
0
Adana
Ofis 2003
05/07/2014,02:05
Çözüldü 
Uygulamamı Tablolar ve Formlar olarak ikiye böldüm ve bu iki dosyayı ağ üzerinden paylaşıma açtım. Ağ üzerinde bulunana kullanıcıların masa üstlerine Formların bulunduğu dosyanın kısayolunu ekledim. Kullanıcılar formu bu kısa yoldan açarak kayıt işlemlerinin gerçekleştiriyorlar ve gayet de güzel çalışıyor.
Uygulamaya eklemek istediğim ise;
Yine ağ üzerinde bir klasörü paylaşımı açtım. Klasör içerisinde pdf dosyaları mevcut. Uygulama tablolardan birisine tarama isimli bir sütun oluşturarak özelliğini köprü olarak yaptım. Aşağıdaki kod ile pdf dosyasının yolunu ekleyerek dosyaları ana bilgisayarda açabiliyorum. Ancak kısa yolunu attığım diğer bilgisayarlarda açmak istediğim dosyanın yolunu bulamadığından bu pdf dosyasını açamıyorlar. Diğer bilgisayarlarında bu dosyaları görmesi için dosya yolunu nasıl yazmalıyım?
Private Sub Komut65_Click()
Me.tarama.SetFocus
DoCmd.RunCommand acCmdEditHyperlink
Exit Sub
ErrEditHyper:
Select Case Err
Case 2046
Resume Next
Case 2501
Resume Next
Case Else
Resume Next
End Select
End Sub
Cevapla

C*e*l*o*y*c*e
Celosoft Yazılım
Kullanici Avatari
Uzman
M.... B....
2.908
29/10/2008
916
Ankara
Ofis 2010 32 Bit
Bugün,22:51
Çözüldü 
Sponsor Reklam
Private Sub Komut65_Click()
Dim Celoy
Celoy = CurrentProject.Path & Me.xxxxx & ".pdf"
' burda pdf adını( xxxxx diye yazdım)kendine göre yazmalısın ve pdf dosyası ile accesin aynı yerde olmalı
Call Shell("Celoy "

Me.tarama.SetFocus
DoCmd.RunCommand acCmdEditHyperlink
Exit Sub
ErrEditHyper:
Select Case Err
Case 2046
Resume Next
Case 2501
Resume Next
Case Else
Resume Next
End Select
End Sub


gibi denermisin ...
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Dosya Kontrolü turalsitkituralvolkan 2 105 19/04/2017, 09:30 turalsitkituralvolkan
  Ağda Bölünmüş Veritabanı Güvenliği husem 4 195 07/03/2017, 18:54 husem
  Dosya konumunu alma tufanbal 7 342 02/12/2016, 10:48 tufanbal
  Klasöre kaydederken,Dosya Adını yazarak yedeklemek musteri53 11 653 18/11/2016, 23:11 ozanakkaya
  Veritabanını Ağda Paylaşımlı Kullanma ertans 3 395 16/11/2016, 09:15 ertans


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status