[es] - Access - link

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

^{28.02.2008. u 06:41}

napravila sam u tabeli polje hyperlink.
Kad postavim bilo koji office program klikom na njega otvori se ali ne i pdf.
Posedujem acrobat reader 7. Samo se na blic otvori i odmah zatvori.
Kako da rešim ovaj problem...
Pokušala sam na drugom računaru gde je acrobat reader 6 i tu funkcioniše...

heelp

^{28.02.2008. u 06:41}

atom
Beograd

Član broj: 4158
Poruke: 32
195.178.47.*

Sajt: www.paraglajdingskola.org..

Profil

Re: Access - link - pdf

^{28.02.2008. u 06:59}

Imao sam slican problem, dok nisam shvatio da imam instalirana dva (koliko se secam) Adobe Acrobat 6 i Adobe Acrobat 7 pro, tek kada sam ih deinstalirao oba pa instalirao samo Adobe Acrobat Reader (8 cini mi se) mogao sam da pozovem preko linka kog opisujes i PDF fajl. Procitao sam da imas samo Adobe Acrobat Reader 7. Hteo sam da ti prenesem moje iskustvo i dam pravac za razmisljanje.

^{28.02.2008. u 06:59}

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: Access - link - pdf

^{28.02.2008. u 07:20}

pravo da ti kažem nisam kući sad ali mislim da mi je samo jedan reader instaliran.

^{28.02.2008. u 07:20}

domaci_a_nas
Nikola Radovanović
Kragujevac

Član broj: 42333
Poruke: 301
*.dynamic.sbb.co.yu.

Profil

Re: Access - link - pdf

^{28.02.2008. u 07:47}

Možda možeš da pokušaš i old fashion way :

Private Sub StartPDF(PDFFile as String)
Dim I As Byte
Dim TPath As String
Dim APath As String
For I = 6 To 15 ' Treba misliti i na budućnost

TPath = "C:\Program Files\Adobe\Reader " & I & ".0\Reader\AcroRd32.exe"
If Dir(TPath) <> "" Then APath = TPath
Next I
Shell APath & " """ & PDFFile & """", vbMaximizedFocus
End Sub

Ozbiljan i odgovoran mladić

^{28.02.2008. u 07:47}

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: Access - link - pdf

^{28.02.2008. u 08:59}

a kako da primenim to u programu. tj, kad će da se aktivira to?

^{28.02.2008. u 08:59}

domaci_a_nas
Nikola Radovanović
Kragujevac

Član broj: 42333
Poruke: 301
*.dynamic.sbb.co.yu.

Profil

Re: Access - link - pdf

^{28.02.2008. u 09:40}

OK, onda ću malo modifikovati kod. Recimo da imaš Text Box na formi koje se zove PDFFile koje sadrži putanju do PDF fajla. U dizajnu forme klikneš na properties za to polje, izabereš Events, zatim klikneš na tri tačkice pored Click i unutar te procedure (Private Sub PDFFile_Click()) prekopiraš sledeće linije:

Dim I As Byte
Dim TPath As String
Dim APath As String
For I = 6 To 15 ' Treba misliti i na budućnost
TPath = "C:\Program Files\Adobe\Reader " & I & ".0\Reader\AcroRd32.exe"
If Dir(TPath) <> "" Then APath = TPath
Next I
Shell APath & " """ & PDFFile & """", vbMaximizedFocus

Ozbiljan i odgovoran mladić

^{28.02.2008. u 09:40}

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: Access - link - pdf

^{28.02.2008. u 09:51}

ok, probaću a reci mi da li će raditi to polje ako bude neki link u wordu ili excellu?

^{28.02.2008. u 09:51}

domaci_a_nas
Nikola Radovanović
Kragujevac

Član broj: 42333
Poruke: 301
*.dynamic.sbb.co.yu.

Profil

Re: Access - link - pdf

^{28.02.2008. u 10:32}

Uh, ono prvo što sam pisao nije baš najbolja metoda, hteo sam da ispadnem pametan (a retko u tome uspevam

) nudeći nekonvencionalno rešenje. Generalno možeš koristiti Windows API da startuješ program koji je predviđen kao default za određeni tip fajla. Recimo da se Text Box koji sadrži putanju do fajla koji želiš da otvoriš zove Putanja

' Kod iskopiraš na samom vrhu u kodu forme
Private Declare Function ShellExecute Lib "Shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Const SHOWMAXIMIZED = 3

Private Sub Putanja_Click
ShellExecute Me.hwnd, "open", Putanja, vbNullString, vbNullString, SW_SHOWMAXIMIZED
End Sub

Eto, sada će windows otvoriti default program za bilo koji tip podataka. Bilo je moguće malo modifikovati onaj kod i prilagoditi ga da otvara office, ali što da komplikujemo za džabe.

Ozbiljan i odgovoran mladić

^{28.02.2008. u 10:32}

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: Access - link - pdf

^{28.02.2008. u 10:43}

hvala na trudu, probaću ovu varijantu

^{28.02.2008. u 10:43}

Getsbi
Miroljub Zahorjanski
Vršac

Moderator
Član broj: 124608
Poruke: 1153
91.150.106.*

Profil

Re: Access - link - pdf

^{28.02.2008. u 14:18}

@ domaci_a_nas

Molim te dodaj kod iz svog zadnjeg posta u Top temu Access Baza Znanja, opiši postupak budućim korisnicima za upotrebu i eventualno prokomentariši korake koda. Cenim da će mnogima biti interesantno jedno ovako uneverzalno rešenje.

I'll know what I want, when I see it.

^{28.02.2008. u 14:18}

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: Access - link - pdf

^{29.02.2008. u 07:23}

da li je neverovatno ili ne dešava se isto kao i pre. Otvori se acrobat reader i odmah se ugasi.
Interesantno je i to da kad u excelu napravi link ka pdf-u on se normalno otvori.
Šta bi to moglo da bude u odnosu između accessa i pdf-a odnosno acrobat readera???

^{29.02.2008. u 07:23}

domaci_a_nas
Nikola Radovanović
Kragujevac

Član broj: 42333
Poruke: 301
*.dynamic.sbb.co.yu.

Profil

Re: Access - link - pdf

^{29.02.2008. u 08:44}

Jesi li probala obe varijante koje sam poslao...? Ako jesi onda... Reinstaliraj Acrobat ?

Ozbiljan i odgovoran mladić

^{29.02.2008. u 08:44}

gaga_mn
bgd

Član broj: 78497
Poruke: 51
*.dkts.co.yu.

Profil

Re: Access - link - pdf

^{29.02.2008. u 12:28}

pokušala i ne može.
Instaliraću verziju 6..... pa cemo da vidimo

^{29.02.2008. u 12:28}

domaci_a_nas
Nikola Radovanović
Kragujevac

Član broj: 42333
Poruke: 301
*.dynamic.sbb.co.yu.

Profil

Re: Access - link - pdf

^{29.02.2008. u 13:01}

Najnovija verzija Acrobat Readera je 8 i sa njom kod sigurno radi. Možda da prvo uvedeš proveru da li fajl postoji, sasvim dobro u tu svrhu služi
If Dir(Putanja) <> "" Then ShellExecute...

Ozbiljan i odgovoran mladić

^{29.02.2008. u 13:01}

gordon_beneth
BGD

Član broj: 104526
Poruke: 150
*.adsl-1.sezampro.yu.

Profil

Re: Access - link - pdf

^{01.03.2008. u 23:16}

Bila je slična trema ranije, možda pomogne
http://www.elitesecurity.org/t...tvaranje-tekuceg-dokumenta-PDF

/(bb|[^b]{2})/

^{01.03.2008. u 23:16}