Nemme point

Her får den der udfylder formulare en eMail med en fil vedhæftet.
Samtidig får aRecipient en kopi & det er her problemet opstår for han skal kun have informationer fra formularen strName strAdress osv. og uden en vedhæftet fil
Hvordan skriver man det..

gandalfthewhite har løbet de properties igennem der er på CDONTS objectet, og han tør sige ret sikkert, at jeg ikke kan undgå filen bliver vedhæftet til BCC modtagerne.
Hvis jeg skal undgå dette bliver jeg nød til at oprette en ny indstands af CDONTS og så generere mailen to gange - dog uden attach den ene gang.

jeg har prøvet med:
men det er kun strEmail der får
Så spørgsmålet er hvordan skriver man 2 indstands af CDONTS??????????

<% @LANGUAGE = VBScript %>
<% Option Explicit %>
<html>
<head>
    <title>test</title>
    <title>test</title>
</head>
<body bgcolor=#ffffff>
<%
Dim strName, strEmail, strAdress, strQuery, strBy
strName = Trim(Request.Form(\"ClientName\"))
strEmail = Trim(Request.Form(\"ClientEmail\"))
strAdress = Trim(Request.Form(\"ClientAdress\"))
strQuery = Trim(Request.Form(\"ClientQry\"))
strBy = Trim(Request.Form(\"ClientBy\"))

If (strName <> \"\" And strAdress <> \"\" And strBy <> \"\") Then
    Dim objMail, aRecipients, tmp
    tmp = \"Navn \" & Strname & vbcrlf & \"Email \" & strEmail & vbcrlf & \"Adresse \" & strAdress & vbcrlf & \"Query \" & strQuery & vbcrlf & \"By \" & strby
    Set objMail = Server.CreateObject(\"CDONTS.NewMail\")
   
    objMail.From = \"11@xx.dk\"
    objMail.To = strEmail
    objMail.Subject = \"Fremsendelse af opstilling via eMail til \" & strName
    objMail.AttachFile Server.MapPath(\"../Pdfer/1809_d6.PDF\")
    objMail.Body = \"Hermed fremsendes den xxxxxxxxxxxxxxxxxxxxxxxxxxdddddbestilte opstilling! \" & strName
    objMail.Send
   
    Response.Write \"Tak for din bestilling! \" & strName
    Set objMail = Nothing


   
    Set myMail = Server.CreateObject(\"CDONTS.NewMail\")
myMail.Send \"11@xx.dk\", \"22@xx.dk\", _
    \"Fremsendelse af opstilling via eMail til \" & strName, tmp, 0
Set myMail = Nothing
%>

<h1>&nbsp;</h1>

<p>&nbsp;</p>

<FORM ACTION=\"<%=Request.ServerVariables(\"SCRIPT_NAME\")%>\" METHOD=POST>
<TABLE BORDER=0>
<tr><td>Name:</td><td><IMG border=0 src=\"../images/stjerne.gif\" width=\"10\" height=\"10\"></td><td><INPUT NAME=\"ClientName\" VALUE=\"\" SIZE=57></td></tr>
<tr><td>Adresse:</td><td><IMG border=0 src=\"../images/stjerne.gif\"></td><td><!--webbot
    bot=\"Validation\" S-Validation-Constraint=\"Greater than\"
    S-Validation-Value=\"1\" --><input type=\"text\" name=\"ClientAdress\" size=\"57\"></td></tr>
<tr><td>Postnr. og by:</td><td><IMG border=0 src=\"../images/stjerne.gif\" width=\"10\" height=\"10\"></td><td><!--webbot
    bot=\"Validation\" S-Validation-Constraint=\"Greater than\"
    S-Validation-Value=\"1\" --><input type=\"text\" name=\"ClientBy\" size=\"57\"></td></tr>
<tr><td>Tlf:</td><td></td><td><input type=\"text\" name=\"telefon\" size=\"18\">Tlf (arbejde/mobil):<input type=\"text\" name=\"TlfArbejde\" size=\"16\"></td></tr>
<tr><td>eMail:</td><td></td><td><INPUT TYPE=TEXT NAME=\"ClientEmail\" VALUE=\"\" SIZE=40></td></tr>
<tr><td valign=top>Comment/Question</td><td></td><td><TEXTAREA NAME=\"ClientQry\" COLS=40 ROWS=10></TEXTAREA></td></tr>
<tr><td></td><td></td><td>&nbsp;
    <p><INPUT TYPE=SUBMIT VALUE=\"Send\"></p>
  </td></tr>
</TABLE>
</FORM>

<% End If %>

<p>&nbsp;</p>

</body></html>