Guten Tag,
Ich habe ein Script, das bei leeren Datensätzen eine entsprechende Meldung per Email versenden sollte auf DTS.
Es funktioniert, wenn Daten vorhanden sind. Doch ist die Abfrage leer gibt der DTS die Meldung "successfully completed execution of package" doch es wird kein Email mit der entsprechenden Meldung versandt.
Kann mir jemand helfen?
Hier der entsprechende Scriptausschnitt:
Gruss
Tanja
Ich habe ein Script, das bei leeren Datensätzen eine entsprechende Meldung per Email versenden sollte auf DTS.
Es funktioniert, wenn Daten vorhanden sind. Doch ist die Abfrage leer gibt der DTS die Meldung "successfully completed execution of package" doch es wird kein Email mit der entsprechenden Meldung versandt.
Kann mir jemand helfen?
Hier der entsprechende Scriptausschnitt:
Code:
'Falls Daten leer sind Meldung, entsprechende Meldung. If (objRS.Eof and objRS.Bof ) Then strTable = strTable & ("<p><font size='2' face='arial'>Es gibt keine Daten</font>") 'Wenn die Daten nicht leer sind wird weiter gefahren. Else While Not objRS.Eof 'Hier werden die Daten aus den Tabellen gelsen abgefragt. 'Jetzt erstell den Nachrichtenteil des Emails. strTable = FormatRecordset(objRs) 'Jetzt wird das Email mit der HTML-Tabelle versandt. Call send_email("Auswertung", strTable) Wend End If 'Die Variablen werden zurück gesetzt. Set objRS = Nothing End Sub
Tanja
Comment