Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Print .pdf-a iz Accessa

[es] :: Access :: Print .pdf-a iz Accessa

[ Pregleda: 3226 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

thenoise
referent za gubljenje vremena

Član broj: 303621
Poruke: 41
*.tel.net.ba.



+6 Profil

icon Print .pdf-a iz Accessa22.01.2015. u 07:38 - pre 111 meseci
Pozzz svima.

Trebala bi mi uputa, ili ako netko ima gotovu proceduru za printanje .pdf fajla iz Access front enda.

Naime, imam nekih 10-ak stranica skeniranih i prebačenih u .pdf i spremljenih u poseban folder gdje je i baza (uvijek istih), koje moram printati često, pa sam mislio da bi to bilo lijepo povezati sa aplikacijom koju koristim, da se to printa odmah iz aplikacije. Ne treba se otvarati fajli, nego samo print on click.

Unaprijed hvala!
 
Odgovor na temu

SLOJ.1973

Član broj: 130198
Poruke: 871
*.dynamic.isp.telekom.rs.



+41 Profil

icon Re: Print .pdf-a iz Accessa22.01.2015. u 08:40 - pre 111 meseci
Ovu funkciju
Code:
Function OpenPDF(Folder, File) ' Folder je folder u kome se nalaze pdf fajlovi,a File PDF fajl koji treba da se otvori

On Error GoTo EndNow

Dim strAddress As String
strAddress = Nz(Folder)
strAddress = strAddress & IIf(strAddress = "", "", "/") & Nz(File)
strAddress = strAddress & IIf(strAddress = "", "", ".pdf")
If strAddress = "" Then
MsgBox "There is no text to search."
Else
Application.FollowHyperlink "C:\Users\" & strAddress  'putanja do foldera u kome se nalaze pdf fajlovi
End If

Exit Function
EndNow:
MsgBox "Ne postoji PDF", vbInformation, "Greska!"

End Function

ubaci u novi modul,a zatim je pozovi sa forme na onclick dugmeta
Code:
 Call OpenPDF("Naziv foldera u kome su smesteni pdf fajlovi", "Naziv pdf fajla bez .pdf")(
.
Pozdrav.
Jednog dana...
 
Odgovor na temu

thenoise
referent za gubljenje vremena

Član broj: 303621
Poruke: 41
*.tel.net.ba.



+6 Profil

icon Re: Print .pdf-a iz Accessa22.01.2015. u 12:19 - pre 111 meseci
Sloj, hvala na kodu, radi za 5. Provjereno u A2010.

Mada, radije bih da odmah printa direktno bez otvaranja .pdf-a, ali i ovo može poslužiti :)

Još jednom, velika hvala!
 
Odgovor na temu

SLOJ.1973

Član broj: 130198
Poruke: 871
*.dynamic.isp.telekom.rs.



+41 Profil

icon Re: Print .pdf-a iz Accessa22.01.2015. u 17:01 - pre 111 meseci
Moze i odmah.Evo fantasticnog koda koji stampa odmah fajl,bez obzira kojeg je tipa:excel.word,pdf...Treba samo na kraju posle tacke naznaciti koji je tip datoteke.
Code:
CreateObject("Shell.Application").Namespace(0).ParseName("C:\putanja do trazenog fajla\nazivfajla.pdf").InvokeVerb ("Print")

Zamolio bih moderatore da ubace u bazu znanja,jer je verovatno ovo svima bar jednom u zivotu zatrebalo.
PS:Nije moj kod,iščupao sam ga od nekud pre nekoliko nedelja.
Našao sam link
Jednog dana...
 
Odgovor na temu

Getsbi

Moderator
Član broj: 124608
Poruke: 2828



+45 Profil

icon Re: Print .pdf-a iz Accessa22.01.2015. u 17:15 - pre 111 meseci
Ta je tema otključana. Napiši ti poruku kako bi ostalo tvoje ime sa leve strane.
 
Odgovor na temu

[es] :: Access :: Print .pdf-a iz Accessa

[ Pregleda: 3226 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.