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

Mali problem sa e-mailom i izvestajem

[es] :: Access :: Mali problem sa e-mailom i izvestajem

[ Pregleda: 4607 | Odgovora: 17 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

kent
Petar Petrovic

Član broj: 132242
Poruke: 29
*.adsl.beotel.net.



Profil

icon Mali problem sa e-mailom i izvestajem24.06.2008. u 01:43 - pre 191 meseci
Iskoristio sam makro i u njemu komandu SendObject za slanje izvestaja "Faktura" e-mailom, pri cemu se izvestaj kaci uz poruku u .RTF formatu.
Problem je sto se u wordu kada otvorim zakaceni fajl ne vide linije koje formiraju tabelu i doprinose preglednosti izvestaja.
U cemu je stos ?
 
Odgovor na temu

duledixi
Banja Luka

Član broj: 62165
Poruke: 67
*.teol.net.



+3 Profil

icon Re: Mali problem sa e-mailom i izvestajem24.06.2008. u 07:03 - pre 191 meseci
Napravi makro da format izvjestaja bude .SNP (Snapshot Viewer sastavni dio Office 2003) i sve ce se lijepo prikazati kao na izvjestaju u Access-u.
 
Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.



+79 Profil

icon Re: Mali problem sa e-mailom i izvestajem24.06.2008. u 13:50 - pre 191 meseci
RTF format je najprimitivniji nacin konvertovanja Access izvestaja u tekstualni dokument. Izmedju ostalog, gube se linije, poneko formatiranje a ponekad i raspored teksta na papiru nije isti.

Jedna od opcija je snapshot viewer, kao sto rece kolega. Medjutim, to zahteva da onaj na drugoj strani ima snapshot viewer i da zna da ga upotrebi, pa proveri da li je tako.

Ako ne mozes da resis problem upotrebom snapshot viewera, stvari se veoma komplikuju. Imas dva koraka 1) pretvoriti izvestaj recimo u PDF i 2) tako nastali PDF fajl poslati kao attachment u e-mialu. Accesova akcija "send to as RTF" radi obe stvari, ali nazalost nedovoljno dobro. Da sam to postignes, nije jednostavno, ali moze. Verovatno je najbolje je da organizujes sve kroz snapshot viewer. Lakse je nauciti korisnika kako da instalira i upotrebi s.w. nego da radis 1) i 2)
 
Odgovor na temu

Miro35
Miroslav Čondrić
BiH

Član broj: 63672
Poruke: 122
*.tel.net.ba.

Sajt: Tel.net.ba


+3 Profil

icon Re: Mali problem sa e-mailom i izvestajem24.06.2008. u 14:50 - pre 191 meseci
Ja isto šaljem narudžbu mail-om iz report-a u rtf formatu ali kad neko dobije taj mail,vide se sve crte,znači pune linije.
miro
 
Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.



+79 Profil

icon Re: Mali problem sa e-mailom i izvestajem24.06.2008. u 20:31 - pre 191 meseci
@Miro35:
Onda mu pokazi kako. Moje iskustvo sa RTF je isto kao postavlajca teme - nedovoljno dobro za ono sto je meni trebalo i za report kako sam ga ja bio naperavio. Ako imas pozitivno iskustvo, dobro je da cujemo. Najbolje da obojica okacite primere pa da vidimo sta se desava. Ne mora deo sa e-mailom, dovoljno je pretvaranje reporta u RTF, da vidimo kako to ide.
 
Odgovor na temu

kent
Petar Petrovic

Član broj: 132242
Poruke: 29
*.adsl.beotel.net.



Profil

icon Re: Mali problem sa e-mailom i izvestajem25.06.2008. u 20:56 - pre 191 meseci
Ovo resenje sa Snapshot-om moram da iskljucim, jer nemam mogucnosti da objasnim krajnjem primaocu, kako da to pregleda. Dakle, program radim za firmu u kojoj covek koji je zaduzen za taj deo posla dnevno salje izvestaj o prodaji tj. fakturu u maticnu firmu u inostranstvu. Problem bi mi bi cak da i ovima ovde objasnim kako to da pregledaju. Zbog svega toga zamolio bih kolegu koji nema problem sa rtf-om i linijama za malo pojasnjenje. Da li za izradu linija koristis Accessov "Line" ili neki drugi nacin. Cini mi se da sam negde na forumu nasao nesto u vezi spartanja linija ispisivanjem koda ili tome slicno, ali ne smem da tvrdim.
 
Odgovor na temu

Miro35
Miroslav Čondrić
BiH

Član broj: 63672
Poruke: 122
*.tel.net.ba.

Sajt: Tel.net.ba


+3 Profil

icon Re: Mali problem sa e-mailom i izvestajem26.06.2008. u 14:56 - pre 191 meseci
Mislim da ste u pravu da crte ne ispisiva,nisam siguran provjeriću.
Evo moj kod:

Private Sub Command44_Click()
On Error GoTo Err_Command44_Click
If IsNull(Me.ADRESA) Then
MsgBox "Ne postoji mail adresa za trenutnog dobavljača!", vbExclamation, "Obavijest"
Exit Sub
End If
If IsNull(DLookup("BrojNarudzbeDob", "tblStaNarudzbeDob", "BrojNarudzbeDob='" & Me.Broj & "'")) Then
MsgBox "Ne postoje podaci za slanje,Izaberite narudžbu za slanje mail-om!", vbExclamation, "Obavijest"
Exit Sub
End If
Dim email As String
Dim stDocName As String

stDocName = "rptIspisNarudzbeMail"
DoCmd.SendObject acReport, stDocName, acFormatRTF, "" & Me!ADRESA, "" & Me!ADRESA, "" & Me!ADRESA, "Narudžba dobavljaču:" & Me!Firma, "Prilog otvoriti u Word-u", , False

Exit_Command44_Click:
Exit Sub

Err_Command44_Click:
MsgBox Err.Description
Resume Exit_Command44_Click
End Sub
miro
 
Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.



+79 Profil

icon Re: Mali problem sa e-mailom i izvestajem26.06.2008. u 17:19 - pre 191 meseci
Zasto ne pokusas potpuno nov pristup. Ovako:

1. nadji na netu neki besplatan program koji dozvoljava da instaliras neki PDF writer (Moze i Adobe Writer ako ga imas). PDF writeri se pojavljuju kao novi printer na listi printera.

2. kad otvoris report, posaljes ga na PDF writer printer => PDF fajl negde na disku, PDF ce da stvori 'fotografiju' reporta, sta god da je na njemu

3. posaljes e-mail sa attachmentom (PDF fajl koji si upravo snimio)

Za ovo ti treba referenca na MS Outlook i MS Office. Tada mozes u HELP-u da vidis kako se programskoi poziva Outlook i kako se dodaje attachment i kako se sve to salje. Ima dosta koda ali nije bog zna kako tesko. Vidi primer koda na kraju poruke.

Treba znati da neki PDF writeri dozvoljavaju da definises ime PDF fajla i path, a neki podrazumevaju nekakav default path i default ime, pa prepisuju preko postojeceg fajla. U svakom slucaju ti znas gde se faj nalazi, pa sve to odradis u jednoj proceduri. kad kliknes na dugnme 'Posalji Fakturu'; onda s eodrade procedurice za 1) kreiranej PDF fajla sa izvestajem i 2)kreiranje Outlook poruke 3) attach fajl na poruku 4) posalji fajl i izvesti korisnika da je sve OK.

Evo nekoliko korisnih linkova: http://www.mvps.org/access/modules/mdl0019.htm
a ako googlas 'Send e-mail from Access" dobices jos neke korisne linkove gde ima puno toga objasnjeno i gotovih primera. Na primer:

http://www.peterssoftware.com/c_emfa.htm

http://www.granite.ab.ca/access/email.htm

Evo gde ima odlican PDF writer, imas besplatnu demo verziju, a moze i da se kupi za 20-30 EU:

http://www.daneprairie.com/

Ovaj PDF writer je bolji od ostalih jer ti dozvoljava da dodelis ime PDF-u (to ti treba da bi specificirao path za attchment)

Evo kako se salje mail iz Accessa, sa attachmentom.
Code:

Function SendOultookMessage(strTo As String, strSubject As String, strMessageBody As String, Optional strAttachment As String = "") As Boolean
'Purpose: send e-mail with optional one attachment
'Requirements: Microsoft Outlook 11.0 Library
'WARNING: OUTLOOK security may cause problems and may need to be updated to allow invoking Outlook from Access
'Examples:
'? SendOultookMessage(strTo:="[email protected]", strSubject:="Test message", strMessageBody:="Plese review attached document", strAttachment:="C:\Messages To Send\Invoice_123456.PDF")
'? SendOultookMessage(strTo:="[email protected]", strMessageBody:="There is no attachment in this one :-)", strSubject:="Test message")


Dim strErrMsg As String 'For Error Handling
Dim olApp As New Outlook.Application
Dim olNameSpace As Outlook.NameSpace
Dim olMail As Outlook.MailItem

On Error GoTo Error_Handler

Set olNameSpace = olApp.GetNamespace("MAPI")
Set olMail = olApp.CreateItem(olMailItem)

With olMail
    .To = strTo
    .Subject = strSubject
    .Body = strMessageBody
    If Len(strAttachment) > 0 Then
        .Attachments.Add strAttachment
    End If
    .ReadReceiptRequested = False
    .Send
End With

MsgBox vbCrLf & "Message has been E-Mailed", _
        vbInformation + vbOKOnly, "SendOultookMessage :"


SendOultookMessage = True

Exit_Here:
Set olApp = Nothing
Set olMail = Nothing
Exit Function
    
Error_Handler:
    Select Case Err
        Case Else
            strErrMsg = strErrMsg & "Error #: " & Format$(Err.Number) & vbCrLf & vbCrLf
            strErrMsg = strErrMsg & "Error Description: " & Err.Description & vbCrLf
            MsgBox strErrMsg, vbInformation, "cmdEmailGraph_Click"
            
    End Select
    Resume Exit_Here
End Function


Eto,imas dosta materijala, pa vidi sta ti odgovara.

:-)
 
Odgovor na temu

kent
Petar Petrovic

Član broj: 132242
Poruke: 29
*.adsl.beotel.net.



Profil

icon Re: Mali problem sa e-mailom i izvestajem26.06.2008. u 19:07 - pre 191 meseci
Veliko hvala na pomoci. Odlucio sam se za PDF.
Na sajtu Microsofta (http://www.microsoft.com/downl...3b07ba5f2e5&DisplayLang=en) se moze naci dodatak (SaveAsPDF.exe) koji se dodaje programima Office-a 2007, a koji omogucava da se izborom opcije Save As dokument snimi direktno u PDF format.
Nakon instalacije se u makrou pored vec osnovnih opcija moze odabrati PDF format za Attach file.
 
Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.rs.



+8 Profil

icon Re: Mali problem sa e-mailom i izvestajem26.06.2008. u 22:01 - pre 191 meseci
Ja bih dodao samo i PDFCreator kao rešenje koje ja koristim, besplatan program koji izuzetno radi svoj posao, ima opcije AutoSave i Send as attachment after saving, tj startuje outlook express sa attachovanom porukom. Naravno ne moraš da imaš instaliran Office 2007 niti Outlook, što je bitno ako računar ima samo Access Runtime.

Takođe imaš primer na http://www.paulsadowski.com/WSH/cdo.htm koji koristi CDO za slanje poruka.
Ozbiljan i odgovoran mladić
 
Odgovor na temu

kent
Petar Petrovic

Član broj: 132242
Poruke: 29
91.148.92.*



Profil

icon Re: Mali problem sa e-mailom i izvestajem26.06.2008. u 22:48 - pre 191 meseci
Hvala na savetu. Program ce doduse raditi na legalnom Accessu 2007, ali je dobro imati informaciju i resenje za svaku situaciju. Hvala
 
Odgovor na temu

kent
Petar Petrovic

Član broj: 132242
Poruke: 29
91.148.92.*



Profil

icon Re: Mali problem sa e-mailom i izvestajem26.06.2008. u 23:00 - pre 191 meseci
I jos samo jedna stvar. Nasao sam ovde na forumu kod za slanje e-maila koji bih hteo da iskoristim, ali uz izvesne dodatke. Naime, hteo bih da se u nazivu prikacenog fajla nalazi i datum ili broj fakture koju saljem, kako primalac ne bi nekim slucajem prekopirao preko postojeceg dokumenta ukoliko bi se on zvao samo "Faktura". Jednostavnije receno potrebno mi je da svaki poslati dokument ima jedinstveno ime. Da li se to u ovom kodu moze doraditi i kako. Evo koda:

Private Sub Command5_Click()
On Error GoTo Err_Command5_Click
Dim email As String
Dim stDocName As String

stDocName = "NazivTvogIzvestaja"
DoCmd.SendObject acReport, stDocName, acFormatRTF, email, , , "Subject", "Prilog otvoriti u Word-u", False

Exit_Command5_Click:
Exit Sub

Err_Command5_Click:
MsgBox Err.Description
Resume Exit_Command5_Click

End Sub
 
Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.rs.



+8 Profil

icon Re: Mali problem sa e-mailom i izvestajem26.06.2008. u 23:26 - pre 191 meseci
Probaj strDocName = "Faktura Br " & Me!BrFakture
Ozbiljan i odgovoran mladić
 
Odgovor na temu

Zidar
Canada

Moderator
Član broj: 15387
Poruke: 3085
*.100.46-69.q9.net.



+79 Profil

icon Re: Mali problem sa e-mailom i izvestajem27.06.2008. u 14:13 - pre 191 meseci
Citat:
Probaj strDocName = "Faktura Br " & Me!BrFakture

Ovo nazalst nece moci. U komandi SendObject Docname predstavlaj ime reporta, a to se ne menja. jedini nacin da PDF koji saljes ima ime jednako broju fakture jeste da ga
1) ili kreiras odmah pod tim imenom
2) kriras ga pod imenom Faktura.PDF pa ga onda preimenujes u sta ti vec treba

Ja obicno radim 1) - kreiram ga pod imenom koje mi treba (zato sam pomenuo Win2Pdf jer ti dozvoljava da kreiras PDF pod razlicitim imenom svaki put

I opcija 2) nije losa - ako znas gde ce se kreirati Faktura.PDF, onda iz Accessa mozes da odradis DOS komandu tipa "Rename file Faktura.PDF 123456.PDF"

Lepo je ako ceo posao mozes da sakrijes iza jednok Click na neko dugme.

Napomena: vise neces moci da koristis SendObject, ako radis sa PDF fajlovima razlicitog imena. Znaci, radio bi ovako:

1. izaberes fakturu za slanje
2. kad kliknes na dugme 'Posalji' desi se sledece:
2.1 kod kreira stImeFajla = = "Faktura Br " & Me!BrFakture (kako lepo predlaze Nikola :-)
2.2 kod procita odnekud strFielPath (dobro ej imati pomocnu tabelu u koju upises path gde ce PDF fajlovi da se snimaju)
2.3 kod aktivira WIn2PDF i posalje parametar strFielPath + stImeFajla (na sajtu za Win2PDF imas primer kako se u VBA kontrolise ima PDF fajla)
2.4 kod kreira tekst poruke = strBody
2.5 kod kreira Subject za poruku = strSubject
2.6 na osnovu KupacID kod procita e-mail adresu kupca iz neke tabele, strTo i strCC ako treba
2.7 kod aktivira Outlook i posalje parametre strTo, strCC, strBody, strSubject i strAttachment = strFielPath + stImeFajla
2.8 kod izvsrsi Outlook.Send komandu


Delove koda za 2.7 i 2.8 imas u mojoj prethodnoj poruci. Ostalo je jednostavno da se uradi. Treba ti nekoliko pomocnih tabela i malo maste i smisla za organizaciju. Ja bih imao odvojeni folder za svakog kupca, gde se cuvaju PDF fajlovi. U slucaju da nije prosao fajl prvi put, imas odakle da ga uzmes. Zatim, ja bih u ime fajla uradio kao KupacID+FakturaID. Na taj nacin u Outlooku mozes da vidis sve fakture koje si poslao grupisane po kupcu.

Komplikovano? Pa i nije, ali zahteva da se malo odmaknes od primitivnih komandi tipa SendObject. One jednostavno ne mogu da odrade sta ti treba. Vredi nauciti kako se salju e-mailovi iz Accessa, to mnogim kompanijama treba a nema da se nadje na trzistu da se kupi.

:-)
 
Odgovor na temu

Trtko
Koprivnica

Član broj: 69494
Poruke: 695
87.252.140.*



+8 Profil

icon Re: Mali problem sa e-mailom i izvestajem28.06.2008. u 20:16 - pre 191 meseci
Najjednostavnije riješenje ti je kao što reče @domaci_a_nas (koliko si piva danas maznuo, ja 4)
da instaliraš pdfprinter (ne znam kako se tačno zove, pogledat ču u ponedjeljak na poslu)

Ja ga koristim baš za slanje narudžbi i upita preko e-maila

U njemu možeš poštelovat da ti snima sve na određeni dio diska, podesiš , snimaj imedokumenta+datum
pa možeš mu reči da ti automatski podigne outlok , prikači taj fajl , ti samo uneseš kome , i subject

Što bi značilo , kad korisnik klikne na tipku "Pošalji e mailom" , tvoj report pošalje direktno na pdfprinter , koji
otvori outlok i prikači tvoj report pretvoren u pdf

A možeš mu samo reči da samo snima u isti fajl
pa ga kasnije , onako kako zidar predlaže, programski preimenuješ u ime koje želiš

Moja korisnica, snima narudžbe na disk (imenarudzbe+datum+vrijeme) pa tako ima arhivu svih
poslanih narudžbi a sortirano joj je u folderu po datumu i vremenu.


Sat vremena več ovo objašnjavam, baš mi neide
odo ja na pivo i na muziku

 
Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.rs.



+8 Profil

icon Re: Mali problem sa e-mailom i izvestajem28.06.2008. u 20:24 - pre 191 meseci
Samo napred Trle, ja popio samo dva piva i dosta mi, moram da radim sutra Taj PDFCreator, to je mnogo dobra stvar, ja sam u početku radio foru da preimenujem report, zatim konvertujem u PDF preko tog PDFCreatora koji daje naziv fajla isti kao naziv reporta. Pošto baza nije razdvojena (sram me bilo), to u multiuser okruženju može da napravi problem, a i bio sam dokon, ja sam našao u registry mesto odakle PDFCreator čita naziv fajla, tako da pre samog štampanja ja promenim taj naziv u registry i sve radi kao bombonica.
Ozbiljan i odgovoran mladić
 
Odgovor na temu

Trtko
Koprivnica

Član broj: 69494
Poruke: 695
87.252.136.*



+8 Profil

icon Re: Mali problem sa e-mailom i izvestajem28.06.2008. u 22:15 - pre 191 meseci
Možda imaš neku stariju verziju PDFcreatora, kod mene nikad nije pravio
probleme, niti sam trebao iči u registre

Na setingsu ljepo odrediš dgdje če spremati PDF fajlove i to je to
Jedino malo pravi probleme kod automatskog slanja e-maila s outlok expresom,
tj kad je uključen access i kad se direktno šalje e mail.

Outlok nešto šteka, nisam istraživao jel nije bilo potrebe, bilo je bitno
samo da on spremi u pdf format.

Nikola , tko vidio nedjeljom raditi,
mi koji preko tjedna radimo subotom i nedjeljom odmaramo :)

hehehehe, šalim se

 
Odgovor na temu

domaci_a_nas
PHP developer

Član broj: 42333
Poruke: 524
*.dynamic.sbb.rs.



+8 Profil

icon Re: Mali problem sa e-mailom i izvestajem28.06.2008. u 23:29 - pre 191 meseci
PDF Creator u AutoSave ima opciju <Title> , tj nazove PDF File kao caption reporta, tako da sam ja otišao u registry i tamo podesio.

Šta ću Trle, zovu ljudi, traže ono programče, pa neki rodoslov nešto...
Ozbiljan i odgovoran mladić
 
Odgovor na temu

[es] :: Access :: Mali problem sa e-mailom i izvestajem

[ Pregleda: 4607 | Odgovora: 17 ] > FB > Twit

Postavi temu Odgovori

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