webForumDet fria alternativet

jmail Object required

ASP

8 svar · 506 visningar · startad av ogge

Medlem sedan okt. 200372 inlägg
Frågan#1

Hej på er igen nu har jag följande bekymmer!

när jag skickar den här bokningen från siten så får jag detta felmeddelande
jag har testat att skriva de olika alt. jag har men han godtar inte nån av dem.

Microsoft VBScript runtime error '800a01a8'

Object required: 'fromemail'

/gunnel/bokning_func.asp, line 44

här är koden jag fetstilar den rad som ska vara " FEL PÅ "

if Request.ServerVariables("REQUEST_METHOD") = "POST" then
	strCAPTCHA = Trim(Request.Form("strCAPTCHA"))
	if strCAPTCHA = Trim(Session("CAPTCHA_" & Session.SessionID)) then
fromemail = Request.Form("email")
fromfornamn = Request.Form("förnamn")
fromefternamn = Request.Form("efternamn")
fromadress = Request.Form("adress")
frompostnummer = Request.Form("postnummer")
fromhemtelefon = Request.Form("hemtelefon")
fromrumstyp = Request.Form("rumstyp")
frompersoner = Request.Form("personer")
frommonth = Request.Form("month")
fromday = Request.Form("day")
fromnights = Request.Form("nights")
fromrequest = Request.Form("request")
Function ReplaceLinebreak(strValue)

End Function

txtBody = "Hej," & vbCrLf & vbCrLf & "Du har fått en bokningsförfrågan från din hemsida." & vbCrLf
txtBody = txtBody & "Från:" & fromemail & vbCrLf & "email:" & fromemail & vbCrLf & "fornamn:" & fromfornamn & vbCrLf
txtBody = txtBody & "efternamn:" & fromefternamn & vbCrLf & "<br>adress:<br>" & fromadress & vbCrLf & "<br>postnummer:<br>" & frompostnummer & vbCrLf
txtBody = txtBody & "hemtelefon:" & fromhemtelefon & vbCrLf & "rumstyp:" & fromrumstyp & vbCrLf & "personer:" & frompersoner & vbCrLf
txtBody = txtBody & "month:" & frommonth & vbCrLf & "day:" & fromday & vbCrLf & "nights:" & fromnights & vbCrLf & "request:"  & fromrequest & vbCrLf

HtmlBody = "<font face=verdana size=4>Hej,<br><br>Du har fått en bokningsförfrågan från din hemsida.<br>"
HtmlBody = HtmlBody & "<b>Från:</b><br>" & fromfornamn & vbCrLf &  "<br>Email:" & fromemail  & vbCrLf & "<br>Förnamn:" & fromfornamn & vbCrLf
HtmlBody = HtmlBody & "<br>Efternamn:" & fromefternamn & vbCrLf & "<br>Adress:" & fromadress & vbCrLf & "<br>Postnummer:" & frompostnummer & vbCrLf
HtmlBody = HtmlBody & "<br>hemtelefon:" & fromhemtelefon & vbCrLf & "<br>rumstyp:"  & fromrumstyp & vbCrLf & "<br>personer:" & frompersoner & vbCrLf
HtmlBody = HtmlBody & "<br>Månad:" & frommonth & vbCrLf & "<br>Dag:" & fromday & vbCrLf & "<br>Hur många nätter:" & fromnights & vbCrLf
HtmlBody = HtmlBody & "<br>Andra Önskemål:"  & fromrequest & vbCrLf

' De flesta mailservrar kräver en giltlig emailadress för den som skickar
[B]msg.From = fromemail
msg.FromName = fromfornamn[/B]
Medlem sedan juni 200032 967 inlägg
#2

Var har du skapat objektet msg?

Medlem sedan okt. 200372 inlägg
#3

jag har en html sida med formulär där
dessa värden som de fyller i som sen skickas till asp sen till mailen.

fromemail = Request.Form("email")
fromfornamn = Request.Form("förnamn")
fromefternamn = Request.Form("efternamn")
fromadress = Request.Form("adress")
frompostnummer = Request.Form("postnummer")
fromhemtelefon = Request.Form("hemtelefon")
fromrumstyp = Request.Form("rumstyp")
frompersoner = Request.Form("personer")
frommonth = Request.Form("month")
fromday = Request.Form("day")
fromnights = Request.Form("nights")
fromrequest = Request.Form("request")
Function ReplaceLinebreak(strValue)
Medlem sedan dec. 19996 721 inlägg
#4

Jo, men var kommer "msg" ifrån?

Medlem sedan okt. 200372 inlägg
#5

emission skrev:

Jo, men var kommer "msg" ifrån?

' De flesta mailservrar kräver en giltlig emailadress för den som skickar
msg.From = fromemail
msg.FromName = fromfornamn
' Lägg till mottagare
msg.AddRecipient "info@gotlan.se", "bokningsFörfrågningar"
' Ämnet i meddelandet
msg.Subject = "Bokning från sajten"
' Skapa mailet
msg.Body = txtBody
msg.HTMLBody = HtmlBody

' Skicka mailet
msg.Send("smtp03.crystone.se")
' Allt gick bra
Response.write "Bokningen har skickats!"
Set msg = Nothing
	else
    response.write("<script>" & vbCrLf)
    response.write("history.back()")
    response.write(vbCrLf & "</script>")
    	end if 
end if
%>
	</body>

</html>
Medlem sedan juni 20019 519 inlägg
#6

.. ser fortfarande inte var du skapar msg...

Medlem sedan okt. 200372 inlägg
#7

voigtann1 skrev:

.. ser fortfarande inte var du skapar msg...

aha du menar vart de ska skapas skrives.

[CODE] <input class="txtf" type="text" name="efternamn" tabindex="2" /></td>
</tr>
</table>
</td>
<td width="1" height="68"><spacer type="block" width="1" height="68"></td>
</tr>
<tr height="65">
<td content="content" csheight="46" width="176" height="65" colspan="8" valign="top" xpos="120">Adress<br />
<input class="txtf" type="text" name="adress" tabindex="3" /></td>
<td content="content" csheight="46" width="176" height="65" colspan="7" valign="top" xpos="318">postal code<br />
<input class="txtf" type="text" name="postnummer" size="13" tabindex="4" /></td>
<td width="36" height="65" colspan="2"></td>
<td width="1" height="65"><spacer type="block" width="1" height="65"></td>
</tr>
<tr height="3">
<td width="318" height="3" colspan="11"></td>
<td content="content" csheight="46" width="166" height="73" colspan="5" rowspan="2" valign="top" xpos="318">E-mail:<br />
<input class="txtf" type="text" name="email" tabindex="6" /></td>
<td width="46" height="73" colspan="4" rowspan="2"></td>
<td width="1" height="3"><spacer type="block" width="1" height="3"></td>
</tr>
<tr height="70">
<td width="120" height="70"></td>
<td content="content" csheight="46" width="160" height="70" colspan="7" valign="top" xpos="120">Home phone:<br />
<input class="txtf" type="text" name="hemtelefon" tabindex="5" /></td>
<td width="38" height="70" colspan="3"></td>
<td width="1" height="70"><spacer type="block" width="1" height="70"></td>
</tr>
<tr height="5">
<td width="296" height="5" colspan="9"></td>
<td content="content" csheight="46" width="192" height="71" colspan="8" rowspan="2" valign="top" xpos="296">How many:<br />
<select name="personer" size="1" tabindex="8">
<option value="personer">How many people</option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5 eller fler">5 or more</option>
</select></td>
<td width="42" height="71" colspan="3" rowspan="2"></td>
<td width="1" height="5"><spacer type="block" width="1" height="5"></td>
</tr>
<tr height="66">
<td width="120" height="66"></td>
<td content="content" csheight="46" width="160" height="66" colspan="7" valign="top" xpos="120">Choose roomtype:<br />
<select name="rumstyp" size="1" tabindex="7">
<option value="rumstyp">Roomtype</option>
<option value="dubbelrum">Doubleroom</option>
<option value="enkelrum">Singelroom</option>
<option value="vandrarhem">Youthhostel</option>
<option value="Lägenhet">Apartement</option>
</select></td>
<td width="16" height="66"></td>
<td width="1" height="66"><spacer type="block" width="1" height="66"></td>
</tr>
<tr height="1">
<td width="366" height="1" colspan="13"></td>
<td content="content" csheight="48" width="128" height="48" colspan="5" rowspan="2" valign="top" xpos="366">How many nights<br />
<select name="nights" size="1" tabindex="11">
<option value="nights">How many nights</option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="1 vecka">1 week</option>
<option value="2 Veckor">2 Weeks</option>
</select></td>
<td width="36" height="48" colspan="2" rowspan="2"></td>
<td width="1" height="1"><spacer type="block" width="1" height="1"></td>
</tr>
<tr height="47">
<td width="120" height="47"></td>
<td content="content" csheight="47" width="112" height="47" colspan="5" valign="top" xpos="120">Month to arrive<br />
<select name="month" size="1" tabindex="9">
<option value="month">Month</option>
<option value="Januari">January</option>
<option value="Februari">February</option>
<option value="Mars">Mars</option>
<option value="April">April</option>
<option value="Maj">May</option>
<option value="Juni">June</option>
<option value="Juli">July</option>
<option value="Augusti">August</option>
<option value="September">September</option>
<option value="Oktober">October</option>
<option value="November">November</option>
<option value="December">December</option>
</select></td>
<td width="16" height="47"></td>
<td content="content" csheight="46" width="96" height="47" colspan="5" valign="top" xpos="248">Day to arrive<br />
<select name="day" size="1" tabindex="10">
<option value="day">Date</option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
<option value="13">13</option>
<option value="14">14</option>
<option value="15">15</option>
<option value="16">16</option>
<option value="17">17</option>
<option value="18">18</option>
<option value="19">19</option>
<option value="20">20</option>
<option value="21">21</option>
<option value="22">22</option>
<option value="23">23</option>
<option value="24">24</option>
<option value="25">25</option>
<option value="26">26</option>
<option value="27">27</option>
<option value="28">28</option>
<option value="29">29</option>
<option value="30">30</option>
<option value="31">31</option>
</select></td>
<td width="22" height="47"></td>
<td width="1" height="47"><spacer type="block" width="1" height="47"></td>
</tr>
<tr height="163">
<td content="content" csheight="154" width="508" height="163" colspan="19" valign="top" xpos="0">Other requests<br />
<textarea name="request" rows="7" cols="60" tabindex="12"></textarea></td>
<td width="22" height="163"></td>
<td width="1" height="163"><spacer type="block" width="1" height="163"></td>
</tr>
<tr height="32">
<td width="184" height="32" colspan="4"></td>
<td content="content" csheight="24" width="208" height="32" colspan="11" valign="top" xpos="184"><img style="border:1px solid #cccccc;background-color:#FFFFFF" src="bokningverimg.asp" alt="Verifieringskod" height="21" width="86" align="absmiddle" />(verifieringskod)</td>
<td width="138" height="32" colspan="5"></td>
<td width="1" height="32"><spacer type="block" width="1" height="32"></td>
</tr>
<tr height="67">
<td width="128" height="67" colspan="2"></td>
<td content="content" csheight="46" width="260" height="67" colspan="12" valign="top" xpos="128">State the numbers as in the picture above!<br />
<input id="strCAPTCHA" class="txtf" type="text" name="strCAPTCHA" maxlength="8" tabindex="13" /></td>
<td width="142" height="67" colspan="6"></td>
<td width="1" height="67"><spacer type="block" width="1" height="67"></td>
</tr>
<tr height="32">
<td width="140" height="32" colspan="3"></td>
<td content="content" csheight="32" width="78" height="32" colspan="2" valign="top" xpos="140"><input class="but" type="submit" name="submit" value="Send" tabindex="14" /></td>
<td width="14" height="32"></td>
<td content="content" csheight="32" width="85" height="32" colspan="4" valign="top" xpos="232"><input type="reset" value="Reset"></td>

							CODE\]
Medlem sedan juni 20019 519 inlägg
#8

Menar objektet "msg"... den måste ju skapas någon gång annars fungera det ju inte med de värden du försöker fylla msg med.

Medlem sedan okt. 200372 inlägg
#9

voigtann1 skrev:

Menar objektet "msg"... den måste ju skapas någon gång annars fungera det ju inte med de värden du försöker fylla msg med.

du hade rätt hade missat den hade blivit deletad
' Skapa JMail meddelande Objektet
set msg = Server.CreateOBject( "JMail.Message" )

290 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
123 ms — deklarationer (db)
0 ms — hämta statistik (cache)
162 ms — hämta tråd, inlägg och bilagor (db)
126 ms — ändringar (db)