c:\firmalar\aset\logo.jpg Sürücü Harfi Ne Olursa Olsun...

[living]

Veritabanımdaki bir resim tablodan aldığı yol ile ilgili resmi açıyor c:\firmalar\aset\logo.jpg gibi ama bu veritabanı başka bilgisayarda çalıştığında belki sürücü harfi c:\ degilde başka birşey olcak bunun önüne nasıl geçeriz yani benim ilk aklıma gelen (..//firmalar/aset/logo.jpg)idi ama bu yöntem işe yaramadı aceba ben yanlış birşeymi yapıyorum yoksa bu işin başka bir yolu varmı

 

[KoTiK]

peki şöyle bir çözüm içini görür mü living kardeş, bir tablo yapsan ve içine sabit değerleri yazsan. misal hazırladığın projenin dağıtımında buradan ayarlasan sabit bilgileri, olmaz mı. mesela "c:\firmalar\aset\" değişebilecek bir bilgi ama "logo.jpg" sabit bir bilgi. forumda raporda nerede kullanıyorsan bu iki bilgiyi birleştirsen...

olmaz mı, bence olur...

 

[ALPEN]

Sn. bedersu'nun fso ile ilgili çalışmasından yararlanarak,
Aşağıdaki rutin uygulama ilk çalıştığında bi kere çalışır. Dönen değer bir yere yazılır.

[vb:1:0528102c14]Sub dosya_ara()

Dim ds, dc, s
Set ds = CreateObject("Scripting.FileSystemObject")
Set dc = ds.Drives
For Each sürücü In dc
a = ds.FileExists(sürücü & "\firmalar\aset\logo.jpg")
If a = True Then
MsgBox "logo.jpg nin yolu = " & sürücü & "\firmalar\aset\logo.jpg"
'logo.jpg ile yapılması gereken işleri burada yapınız.
End If
Next


End Sub[/vb:1:0528102c14]

 

[living]

teşekkürler ALPEN Mükemmelsin dostum

 

[KoTiK]

Sayın ALPEN,

:bravo:
güzel çözüm, çok güzel...

 

[living]

c:\firmalar\aset\logo.jpg olayında başından (c silersek sorun düzeliyormuş hepinize tşk

 

[KoTiK]

ya c sürücüsüne değil de başka bir sürücüye (d, e gibi) kurulum yapılırsa... :?

 

[jale]

picture2k

Günaydın :hey:

Ekteki örnek işinize yarar.

Ayrıca aşağıdaki linkteki resim.zip ede bakınız

http://www.excel.web.tr/viewtopic.php?t=673

 

[living]

kotik evet haklısın ben o kısmını düşünmemiştim çalışır sanmıştım ama çalışmıyor bu arada JALE hanıma saygılar yine yaptı ..... ayrıca teşekkürler ..... örnek mükemmelllllllllll