Hej Per,
Nu tror du sikkert jeg er et helt vildt fæ, men jeg kan ikke få det helt til at virke. Når jeg udfylder felterne i post.htm og ikke vedhæfter en fil lader det til at virke, da jeg bliver præsenteret med beskeden "Tak for din henvendelse", men jeg modtager desværre ingen mail. Vælger jeg at vedhæfte en fil får jeg fejlen:
error '80004005'
Unspecified error
/omd/omd_profil/sendt.asp, line 29
-------------------------------------------------------------------------------
Det er sikkert mig, som gør et eller andet helt galt, men hvad..
min post.htm ser således ud:
------------------------------------------------------------------------------
<html><body bgcolor="#E7E5D0" text="#000000">
<form method=POST action=sendt.asp><br>
<table width="29%" border="1" align="center">
<tr>
<td colspan="2" height="123"><img src="images/header.gif" width="608" height="136"></td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">Fornavn*</font></td>
<td width="54%">
<input type="text" name="fornavn" size="20">
</td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">Efternavn*</font>
<td width="54%">
<input type="text" name="efternavn" size="20">
</td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">Adresse*</font>
<td width="54%">
<input type="text" name="adresse" size="20">
</td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">Anden
Adresse</font>
<td width="54%">
<input type="text" name="adresse2" size="20">
</td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">By*</font>
<td width="54%">
<input type="text" name="by" size="20">
</td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">Postnr.*</font>
<td width="54%">
<input type="text" name="postnr" size="20" maxlength="4">
</td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">Telefonnr.*</font>
<td width="54%">
<input type="text" name="tlf" size="20" maxlength="8">
</td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">Mbl.
nr.</font>
<td width="54%">
<input type="text" name="mob" size="20">
</td>
</tr>
<tr>
<td width="46%"><font face="Arial, Helvetica, sans-serif" size="2">E-mail
*</font><td width="54%">
<input type="text" name="email" size="20">
</td>
</tr>
<tr>
<td width="46%">
Vedhæft<td width="54%">
<input type="file" name="file" size="20"></td>
</tr>
<tr>
<td width="46%">
<input type=submit name="submit" value="Indsend ansøgning">
<td width="54%"> </td>
</tr>
</table>
</form>
</body>
</html>
-----------------------------------------------------------------------------
Min sendt.asp ser således ud:
-----------------------------------------------------------------------------
<%
dim fornavn, efternavn, adresse, postnr, by, email, besked, file, cdomail
fornavn = Request.Form("fornavn")
efternavn = Request.Form("efteravn")
adresse = Request.Form("adresse")
postnr = Request.Form("postnr")
by = Request.Form("by")
email = Request.Form("E-mail")
besked = Request.Form("besked")
file = Request.Form("file")
Session("fornavn") = fornavn
Session("efternavn") = efternavn
Session("adresse") = adresse
Session("postnr") = postnr
Session("by") = by
Session("E-mail") = email
Session("besked") = besked
Session("file") = file
if file <> "" Then
set cdomail=createobject("cdonts.newmail")
cdomail.from= email
cdomail.to="fox2scully@sol.dk"
cdomail.subject="beta e-mail modul w/attachfile"
cdomail.body="Navn: " & fornavn & vbcrlf & "Efternavn: " & efternavn & vbcrlf & "Adresse: " & adresse & vbcrlf & "Postnr: " & postnr & vbcrlf & "By: " & by & vbcrlf & "Email: " & email & vbcrlf & vbcrlf & vbcrlf & "Besked: " & vbcrlf & besked
cdomail.AttachFile(file)
cdomail.send
Set cdomail = Nothing
else
set cdomail=createobject("cdonts.newmail")
cdomail.from= email
cdomail.to="fox2scully@sol.dk"
cdomail.subject="beta e-mail modul w/attachfile"
cdomail.body="Navn: " & fornavn & vbcrlf & "Efternavn: " & efternavn & vbcrlf & "Adresse: " & adresse & vbcrlf & "Postnr: " & postnr & vbcrlf & "By: " & by & vbcrlf & "Email: " & email & vbcrlf & vbcrlf & vbcrlf & "Besked: " & vbcrlf & besked
cdomail.send
Set cdomail = Nothing
end if
%>
<html>
Tak for din henvendelse
<p><font face="Arial"><a href="post.htm"><font color="#000000">tilbage til
ansøgning</font></a></font></p><body bgcolor="#E7E5D0">
</html>
-------------------------------------------------------------------------------
Kan du med lethed se, hvad det er jeg gør galt?
Pft.
Martin
