Hallo!
Der Fehler wird wahrscheinlich dadurch verursacht, dass mehr Daten in
eine Spalten eingef�gt werden soll, als reinpasst. Z. B. Spalte "eMail":
Wenn diese Spalte 25 Zeichen aufnehmen kann und Du hier 26 Zeichen
reinschiebst, gibt es so einen Fehler. M�glicherweise hast Du auch nicht
ber�cksichtigt, dass Unicode-Daten ggf. mehr Speicher ben�tigen. SQL
Server hat keine Unicode-Kompression.
Set RS1 = Server.CreateObject("ADODB.Recordset")
RS1.Open "Select Top 1 * From Empfehlung", _
Application("strConn"), 3, 3, 1
For i = 0 to ubound(...)
RS1.AddNew array("eMail", "SID", "Datum"), _
array(arrRcpt(i), Session("ID"), now())
Comp = RS1.Fields("ID").value
Response.write("Mail ergeht soeben an: "&arrRcpt(i))&"<br>"
JMail.ClearRecipients
JMail.AddRecipient arrRcpt(i)
JMail.Execute
Next
RS1.Close: Set RS1 = nothing
Ansonsten:
- Warum das Recordset in der SChleife �ffnen und schlie�en?
- Warum Keyset-Cursor statt Static-Cursor?
- ...
Freundliche Gr��e
Joachim van de Bruck
| [aspdedatabase] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp