hi all
Question:
we use a Access 2000 Frontend to query a MS SQL Customer DB
so far so good, all works fine, exect the following
(see code below):
Private Sub Befehl108_Click()
On Error GoTo Err_Befehl108_Click
Dim stDocName As String
stDocName = "Datenblatt_NT"
DoCmd.OpenReport stDocName, acPreview, , "[ID]=" & Me![ID]
DoCmd.SendObject acSendReport, "Datenblatt_NT", acFormatRTF, "", , , "Serverplatzbestellung", "", True
Exit_Befehl108_Click:
Exit Sub
Err_Befehl108_Click:
MsgBox Err.Description
Resume Exit_Befehl108_Click
and the same statements for the linux variant
Private Sub Befehl107_Click()
On Error GoTo Err_Befehl107_Click
Dim stDocName As String
stDocName = "Datenblatt_Linux"
DoCmd.OpenReport stDocName, acPreview, , "[ID]=" & Me![ID]
DoCmd.SendObject acSendReport, "Datenblatt_Linux", acFormatRTF, "", , , "Serverplatzbestellung", "message", True
Exit_Befehl107_Click:
Exit Sub
Err_Befehl107_Click:
MsgBox Err.Description
Resume Exit_Befehl107_Click
End Sub
this code generates the preview and automatically a predefined mail with the Data Sheets attached as RTF Format
on the original report all parameters will be filled in correctly but the mail attached RTF Documents are empty
why?
any idea?
i don't know if the following will pay a role:
the datasheets are normal (with a OLE Link) Word Documents and the necessary datas came from a simple SQL Query to the Customer Database
thanks in advance for your trouble
best regards
E.Altherr
Question:
we use a Access 2000 Frontend to query a MS SQL Customer DB
so far so good, all works fine, exect the following
(see code below):
Private Sub Befehl108_Click()
On Error GoTo Err_Befehl108_Click
Dim stDocName As String
stDocName = "Datenblatt_NT"
DoCmd.OpenReport stDocName, acPreview, , "[ID]=" & Me![ID]
DoCmd.SendObject acSendReport, "Datenblatt_NT", acFormatRTF, "", , , "Serverplatzbestellung", "", True
Exit_Befehl108_Click:
Exit Sub
Err_Befehl108_Click:
MsgBox Err.Description
Resume Exit_Befehl108_Click
and the same statements for the linux variant
Private Sub Befehl107_Click()
On Error GoTo Err_Befehl107_Click
Dim stDocName As String
stDocName = "Datenblatt_Linux"
DoCmd.OpenReport stDocName, acPreview, , "[ID]=" & Me![ID]
DoCmd.SendObject acSendReport, "Datenblatt_Linux", acFormatRTF, "", , , "Serverplatzbestellung", "message", True
Exit_Befehl107_Click:
Exit Sub
Err_Befehl107_Click:
MsgBox Err.Description
Resume Exit_Befehl107_Click
End Sub
this code generates the preview and automatically a predefined mail with the Data Sheets attached as RTF Format
on the original report all parameters will be filled in correctly but the mail attached RTF Documents are empty
why?
any idea?
i don't know if the following will pay a role:
the datasheets are normal (with a OLE Link) Word Documents and the necessary datas came from a simple SQL Query to the Customer Database
thanks in advance for your trouble
best regards
E.Altherr