Microsoft Access Help
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
 
 
User Name:
Password:
Remember me
Go Back   ASP Free ForumsDatabaseMicrosoft Access Help

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread ASP Free Forums Sponsor:
  #1  
Old January 16th, 2004, 10:56 AM
Alixia Alixia is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Jan 2004
Posts: 2 Alixia User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 0
Question Mailing a sigle record form

Hello,

I have a database where I can input call centre agents performance to a table. In the Form I have it so I can preview a report for the single record I am currently modifying.

What I would like to do is to be able to email this form in .snp format with only that record.

The only way I have managed to find to do it was by previewing the form with that single record, right click on this form and click on send. There must be a way for this to be done automatically. Does anyone know how I could go about doing this?

This is my preview button code:

Code:
Private Sub Command248_Click()
On Error GoTo Err_Command248_Click

    Dim stDocName As String
    Dim stLinkCriteria As String
    
    stDocName = "QualityMonitoringReport"
    stLinkCriteria = "QM_ID=" & Me.QM_ID
    
    DoCmd.OpenReport stDocName, acNormal, , stLinkCriteria
    
Exit_Command248_Click:
    Exit Sub

Err_Command248_Click:
    MsgBox Err.Description
    Resume Exit_Command248_Click
    
End Sub


Thanks!

Reply With Quote
  #2  
Old January 16th, 2004, 11:38 AM
Alixia Alixia is offline
Registered User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Jan 2004
Posts: 2 Alixia User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 0
I fixed it! In case anyone wants to know how to do it, I changed the preview code to:

Code:
Private Sub ViewQM_Click()
On Error GoTo Err_ViewQM_Click

    Dim StDocName As String
    Dim stLinkCriteria As String

    StDocName = "QualityMonitoringReport"
    stLinkCriteria = "QM_ID=" & Me.QM_ID

    DoCmd.OpenReport StDocName, acPreview, , stLinkCriteria
    DoCmd.SendObject acSendReport, StDocName
    DoCmd.Close
    
    
Exit_ViewQM_Click:
    Exit Sub

Err_ViewQM_Click:
    MsgBox Err.Description
    Resume Exit_ViewQM_Click
    
End Sub

Reply With Quote
Reply

Viewing: ASP Free ForumsDatabaseMicrosoft Access Help > Mailing a sigle record form


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump


Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2008 by Developer Shed. All rights reserved. DS Cluster 5 hosted by Hostway
Stay green...Green IT