Split med ,-tegnet

kan "replace" bruges?

replace(streng,"-","Med det der skal stå istedet for bindestregen")

- Cyberper

hvad mener du lige helt med dette ?

du kan splitte din streng ved kommaerne;
modtagere=split(modtagerfelt,",")

så har du en array (modtagere) hvori adresserne findes

dvs. hvis feltet hedder CC vil koden se således ud:

modtagere=split(cc,",")
msg.AddRecipientBCC "" & modtagere & ""

?

Kommer med fejlen:

Request object error 'ASP 0208 : 80004005'

Cannot use generic Request collection

/line/ny-email.normal.sender.asp, line 26

Cannot use the generic Request collection after calling BinaryRead.

min fejl, den rigtige fejl er:

Microsoft VBScript runtime error '800a000d'

Type mismatch: '[string: "a@telweb.dk,b@telweb"]'

/line/ny-email.normal.sender.asp, line 26


den anden var fordi jeg lavede en anden fejl i scriptet !!

modtagere=split(cc,",")
for i=0 to ubound(modtagere)
  msg.AddRecipientBCC "" & modtagere(i) & ""
next

løber array'en igennem og laver en msg.AddRecipientBCC for hver modtager i array'en

>juggalo

Kommer med samme fejl
Microsoft VBScript runtime error '800a000d'

Type mismatch: '[string: "a@telweb.dk,stefan@t"]'

/line/ny-email.normal.sender.asp, line 26

den skulle da virke ik ?

kan du ikke prøve at poste hele koden?

Jo, her kommer den:

<%
set msg = Server.CreateOBject( "JMail.Message" )
Set upload = Server.CreateObject( "w3.Upload" )

set attachment = upload.Form( "billag_1" )
if attachment.IsFile then
msg.AddCustomAttachment attachment.filename, attachment.item, false
end if

msg.Logging = true
msg.silent = true

Name = upload.Form("afsender-navn")
SenderEmail = upload.Form("afsender-mail")
Subject = upload.Form ("emne")
Recipient = upload.Form("modtager-mail")


Body = upload.Form("indhold")

msg.From = SenderEmail
msg.FromName = Name

msg.AddRecipient Recipient

if upload.form("cc") > 0 then
cc = upload.form("cc")
modtagere=split(cc,",")
for i=0 to ubound(modtagere)
  msg.AddRecipientBCC "" & modtagere(i) & ""
next
end if

msg.Subject = Subject

msg.Body = Body

if not msg.Send( "websmtp.telweb.dk" ) then
response.redirect "mail.asp?status=<0>&err=" & msg.ErrorMessage & "&log=" & msg.Log &"&source=" & msg.ErrorSource
else
response.redirect "mail.asp?status=<1>"
end if
%>

hvis jeg paster dine kode ind i min editor, kan jeg se at fejlen kommer i linien: if upload.form("cc") > 0 then

prøv lige med: if upload.form("cc")<>"" then

Kanon, det virker !!

tillykke med det =)