mailsender til flere modtager efter valg

formularen ser således ud:

<form id="kontakt" method="post" action="mail_sender.asp"
enctype="multipart/form-data">

<table width="100%" cellpadding="3" cellspacing="0" border="0" bgcolor="#ffffff">
<tr valign="top">

<table BORDER="0" width="540">
<tr VALIGN="top">
<td>Modtager:</td>
<td><select NAME="mailtoperson" onChange="msg(this.form)" size="1">
<option value="-- Vælg --">-- Vælg --</option>
<option value="www@www.ww">Josephine - Stengaard</option>
<option value="www@www.ww">Henrik - Stengaard</option>
<option value="www@www.ww">Webmaster - Familien-stengaard & lkongen</option>
</select></td>
</tr>
<tr VALIGN="top">
<td>Dit navn:</td>
<td><input TYPE="text" SIZE="45" NAME="name" onChange="msg(this.form)"></td>
</tr>
<tr VALIGN="top">
<td>Din email:</td>
<td><input TYPE="text" SIZE="45" NAME="email" onChange="msg(this.form)"></td>
</tr>
<tr VALIGN="top">
<td>Angående:</td>
<td><select NAME="priority" onChange="msg(this.form)" size="1">
<option value="Normal">Normal </option>
<option value="Kontakt mig">Kontakt mig</option>
<option value="Ingen svar kræves">Ingen svar kræves</option>
<option value="Haster">Haster</option>
</select></td>
</tr>
<tr VALIGN="top">
<td>Overskrift:</td>
<td><input TYPE="text" SIZE="45" NAME="subject" onChange="msg(this.form)"></td>
</tr>
<tr VALIGN="top">
<td valign="top">Besked:</td>
<td><textarea NAME="message" COLS="45" ROWS="5" WRAP="virtual" OnChange="msg(this.form)"></textarea></td>
</tr>
<tr>
<td></td>
<td><input TYPE="submit" VALUE="Send besked"> <input TYPE="reset" VALUE="Slet"></td>
</tr>
</table>
</form>

mailsender ser således ud men jeg er ikke helt sikker på hvad der skal ændres i scriptet for at den sender mailen til den person man har valg i formularen:

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

msg.Logging = true
msg.silent = true

name = upload.Form("navn")
senderEmail = upload.Form("mail")
subject = upload.Form("emne")
recipient = ("navn@domæne.dk")
body = upload.Form("besked")
ip = Request.ServerVariables("REMOTE_ADDR")

msg.From = SenderEmail
msg.FromName = Name
msg.AddRecipient Recipient
msg.AddRecipientBCC senderEmail
msg.Subject = Subject

msg.Body = "Meddelelse den " & Date & " klokken " & Time & " fra: " & recipient & vbCrLf & "Navn: " & name & vbCrLf & "Mail: " & senderEmail & vbCrLf & "Emne:" & vbCrLf & subject & vbCrLf & "Tekst: " & vbCrLf & body

if not msg.Send("ip-adresse") then
msg.Send("mail.domain.dk")
Response.write "<pre>" & msg.log & "</pre>"
else
Response.write "<p>Meddelelse afsendt den " & Date & " klokken " & Time & "<br /><br /><b>Fra: </b>" & name & "<br /><br />" & "<b>Mail: </b><a href='mailto:" & senderEmail & "'>" & senderEmail & "</a> <br /><br />" & "<b>Emne: </b>" & subject & "<br /><br /><b>Tekst: </b>" & body & "<br /><br />Tak for din henvendelse. Jeg vender tilbage så hurtigt som muligt." & "</p>"
end if
%>