vedhæftning af fil i form, og send med email
Hey alle...Har en form, der skal være et sted hvor de kan tilføje en fil fra deres computer, og når de så trykker send så skal man modtage email'en (med filen som vedhæftning), men er lidt usikker på hvordan det skal klares...
Har min kode:
If Request("firstname") <> "" Then
Dim o
Set o = Server.CreateObject("inetdesigner.stringbuilder")
o.Append "<table border=""0"" cellspacing=""0"" cellpadding=""0"" class=""response"">"
o.Append " <tr>"
o.Append " <td class=""label"">Fornavn</td>"
o.Append " <td class=""input"">" & Request("firstname") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Efternavn</td>"
o.Append " <td class=""input"">" & Request("lastname") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Adresse1</td>"
o.Append " <td class=""input"">" & Request("address1") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Postnr. & by</td>"
o.Append " <td class=""input"">" & Request("zipcode") & " " & Request("city") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Land</td>"
o.Append " <td class=""input"">" & Request("country") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Email</td>"
o.Append " <td class=""input"">" & Request("email") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Telefon</td>"
o.Append " <td class=""input"">" & Request("phone1") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Mobil</td>"
o.Append " <td class=""input"">" & Request("phone2") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Fax</td>"
o.Append " <td class=""input"">" & Request("fax") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Fødselsår</td>"
o.Append " <td class=""input"">" & Request("birthyear") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Nationalitet</td>"
o.Append " <td class=""input"">" & Request("nationality") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Religion</td>"
o.Append " <td class=""input"">" & Request("religion") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Køn</td>"
o.Append " <td class=""input"">" & Request("sex") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Højde</td>"
o.Append " <td class=""input"">" & Request("height") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Vægt</td>"
o.Append " <td class=""input"">" & Request("weight") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Højeste skoletrin</td>"
o.Append " <td class=""input"">" & Request("school") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Sprog talt</td>"
o.Append " <td class=""input"">" & Request("language_spoken") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Sprog skrift</td>"
o.Append " <td class=""input"">" & Request("language_writen") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Tidligere erhvervserfaring</td>"
o.Append " <td class=""input"">" & Request("workexp") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Gift</td>"
o.Append " <td class=""input"">" & Request("married") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Børn</td>"
o.Append " <td class=""input"">" & Request("children") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Ryger</td>"
o.Append " <td class=""input"">" & Request("smoker") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Ren straffeattest</td>"
o.Append " <td class=""input"">" & Request("criminal") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Foretrækker kort-/ langtids vikariater</td>"
o.Append " <td class=""input"">" & Request("vacancies") & "</td>"
o.Append " </tr>"
o.Append " <tr>"
o.Append " <td class=""label"">Beskriv personlighed med 40 ord</td>"
o.Append " <td class=""input"">" & Request("personality") & "</td>"
o.Append " </tr>"
o.Append "</table>"
Dim m
Set m = Server.CreateObject("JMail.Message")
On Error Resume Next
m.From = "mail@navn.com"
m.FromName = "Navn"
m.AddRecipient "mail@navn.com"
m.AddRecipientBCC "support@navn.dk"
m.AddRecipientBCC "udvikling@navn.dk"
m.Subject = "Ansøgningsskema: " & Request("firstname") & " " & Request("lastname")
mhead = "<html><head><link rel=""stylesheet"" type=""text/css"" media=""all"" href=""http://www.navn.com/css/inet_mail.css"" /></head><body><div id=""logo""><div class=""content""><img src=""http://www.navn.com/images/logo_name.gif"" alt=""Rekruttering"" width=""400"" /></div></div><h2>Ansøgningskema:</h2>" & o.ToString & "</body></html>"
m.HTMLBody = mhead
m.MailServerUserName = "mail@navn.com"
m.MailServerPassword = "navn"
m.Send("mail.navn.dk")
Set m = Nothing
%>
<p><b>Tak for din ansøgning</b></p>
<%= o.ToString %>
<%
Set o = Nothing
Else
%>
<p><b>Udfyld ansøgningsskema</b></p>
<form action="/rekruttering.asp" method="post">
<table border="0" cellspacing="0" cellpadding="0" width="400" class="form">
<tbody>
<tr>
<td style="width: 230px;"><label for="firstnamename">Fornavn</label></td>
<td style="width: 230px;"><input type="text" name="firstname"></td>
</tr>
<tr>
<td><label for="lastname">Efternavn</label></td>
<td><input type="text" name="lastname"></td>
</tr>
<tr>
<td><label for="address1">Adresse</label></td>
<td><input type="text" name="address1"></td>
</tr>
<tr>
<td><label for="zipcode">Postnr. & by</label></td>
<td><input type="text" name="zipcode" style="width: 50px; margin-right: 2px;"><input type="text" name="city" style="width: 168px;"></td>
</tr>
<tr>
<td><label for="country">Land</label></td>
<td><input type="text" name="country"></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td><label for="email">Email</label></td>
<td><input type="text" name="email"></td>
</tr>
<tr>
<td><label for="phone1">Telefon</label></td>
<td><input type="text" name="phone1" class="medium"></td>
</tr>
<tr>
<td><label for="phone2">Mobil</label></td>
<td><input type="text" name="phone2" class="medium"></td>
</tr>
<tr>
<td><label for="fax">Fax</label></td>
<td><input type="text" name="fax" class="medium"></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td><label for="birthyear">Fødselsår</label></td>
<td><input type="text" name="birthyear" class="small"></td>
</tr>
<tr>
<td><label for="nationality">Nationalitet</label></td>
<td><input type="text" name="nationality"></td>
</tr>
<tr>
<td><label for="religion">Religion</label></td>
<td><input type="text" name="religion"></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td><label for="sex">Køn</label></td>
<td><select name="sex">
<option value="">Vælg</option>
<option value="M">Mand</option>
<option value="K">Kvinde</option>
</select></td>
</tr>
<tr>
<td><label for="height">Højde</label></td>
<td><input type="text" name="height"></td>
</tr>
<tr>
<td><label for="weight">Vægt</label></td>
<td><input type="text" name="weight"></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td><label for="school">Højeste skoletrin</label></td>
<td><input type="text" name="school"></td>
</tr>
<tr>
<td><label for="language_spoken">Sprog talt</label></td>
<td><textarea name="language_spoken"></textarea></td>
</tr>
<tr>
<td><label for="language_writen">Sprog skrift</label></td>
<td><textarea name="language_writen"></textarea></td>
</tr>
<tr>
<td><label for="workexp">Tidligere arbejdserfaring</label></td>
<td><textarea name="workexp"></textarea></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td><label for="married">Gift</label></td>
<td><select name="married">
<option value="">Vælg</option>
<option value="Ja">Ja</option>
<option value="Nej">Nej</option>
</select></td>
</tr>
<tr>
<td><label for="children">Børn</label></td>
<td><select name="children">
<option value="">Vælg</option>
<option value="Ja">Ja</option>
<option value="Nej">Nej</option>
</select></td>
</tr>
<tr>
<td><label for="smoker">Ryger</label></td>
<td><select name="smoker">
<option value="">Vælg</option>
<option value="Ja">Ja</option>
<option value="Nej">Nej</option>
</select></td>
</tr>
<tr>
<td><label for="criminal">Ren straffeattest</label></td>
<td><select name="criminal">
<option value="">Vælg</option>
<option value="Ja">Ja</option>
<option value="Nej">Nej</option>
</select></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td><label for="vacancies">Foretrækker kort-/ langtids vikariater</label></td>
<td><select name="vacancies">
<option value="">Vælg</option>
<option value="1-3">1-3 måneder</option>
<option value="3+">3 eller flere måneder</option>
</select></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td><label for="personality">Beskriv personlighed med 40 ord</label></td>
<td><textarea name="personality" style="height: 100px;"></textarea></td>
</tr>
<tr>
<td colspan="2"> </td>
</tr>
<tr>
<td colspan="2" style="text-align: right"><input type="submit" name="sbtn" value="Send ansøgning" class="idbtn" /></td>
</tr>
</table>
</form>
<%
End If
%>
