On Mon, 1 Jan 2001 14:30:04 +0100, "Jon Klose Larsen"
<klose@post8.tele.dk> wrote:
>Hej
>
>Din fejl er en stavefejl...
>Du skriver : reguest
>det skal være : request
>
>Jon
AHHHHH, den havde jeg sgu overset
, men kan du svare mig på hvorfor
den skriver at fejlen ligger i linje 8 ???
>
>
>Ryan Jeppesen <paradise@worldonline.dk> skrev i en
>nyhedsmeddelelse:3a50829b.10454757@news.image.dk...
>> Halløj i NGen
>>
>> Jeg får følgende fejl når jeg kører min asp side
>> " Variablen er ikke defineret: 'Reguest'
>>
>> /kontakt.asp, linje 8 "
>>
>> Hvad hulen er det for en variabel Reguest, jeg har en Reguest.Form,
>> men det er ihvertigfald ikke i linje 8
>>
>> Min kode ser sådan her ud., nogen der ved hvad problemet
>>
>> <% @ Language=VBScript %>
>> <%
>> Option Explicit
>> Response.Expires = 0
>> Dim dtmTime, dtmDate, dtmInternetTime
>> dtmTime = Time
>> dtmDate = Date
>> %>( LINJE 8 )
>>
>> <html>
>> <head>
>> <title>Power-up.dk --> Kontakt</title>
>> <meta http-equiv="Content-Type" content="text/html;
>> charset=iso-8859-1">
>> <LINK REL="SHORTCUT ICON" HREF="
http://power-up.dk/favicon.ico">
>> <LINK rel="stylesheet" href="midtcelle.css" type="text/css">
>> </head>
>>
>>
>> <BODY text="#FFFFFF" bgcolor="#000000">
>> <div align="center">
>> <!--#include virtual="absoluttop.asp" -->
>> <table width="95%" border="1" cellpadding="2" cellspacing="0">
>> <tr valign="top" bgcolor="#000000">
>> <td height="88">
>> <!--#include virtual="top.inc" -->
>> </td>
>> </tr>
>> <tr bgcolor="#000000">
>> <td height="95">
>> <div align="center">
>> <!--#include virtual="rj.asp" -->
>> </div>
>> </td>
>> </tr>
>> <tr bgcolor="#000000">
>> <%
>> Dim strEmne, strNavn , strEmail, strUin, strHp, strBesked
>> strEmne = Trim(Reguest.Form("Emne"))
>> strNavn = Trim(Reguest.Form("Navn"))
>> strEmail = Trim(Reguest.Form("Email"))
>> strUin = Trim(Reguest.Form("Uin"))
>> strHp = Trim(Reguest.Form("Hp"))
>> strBesked = Trim(Reguest.Form("Besked"))
>>
>> If (strEmne <> "" And strNavn <> "" And strEmail <> "" And strUin
>> <> "" And strHp <> "" And strBesked <> "") Then
>> Dim objMail, aRecipients
>> Set objMail = Server.CreateObject("CDONTS.NewMail")
>>
>> objMail.From = "Fra Power-up.dk"
>> objMail.To = "paradise@worldonline.dk"
>> objMail.Subject = "Besked sendt via Power-up.dk"
>>
>> aRecipients = Array("paradise@worldonline.dk")
>>
>> objMail.BCC = Join(aRecipients, ";")
>> objMail.Body = strEmne
>> objMail.Send
>>
>> Response.Write "Din besked er blevet sendt korrekt, jeg vil
>> følge op på den hurtigst muligt"
>>
>> Set obMail = Nothing
>> Else
>> %>
>> <td height="85">
>> <div align="center">
>> <form name="" method="post" action="kontakt-ok.asp">
>> <table width="350" border="1" cellpadding="0"
>> cellspacing="0">
>> <tr>
>> <td>
>> <p>Angående:</p>
>> </td>
>> <td>
>> <input type="text" name="Emne" size="25">
>> </td>
>> </tr>
>> <tr>
>> <td>
>> <p>Navn:</p>
>> </td>
>> <td>
>> <input type="text" name="Navn" size="25">
>> </td>
>> </tr>
>> <tr>
>> <td>
>> <p>Email:</p>
>> </td>
>> <td>
>> <input type="text" name="Email" value="@" size="25">
>> </td>
>> </tr>
>> <tr>
>> <td>
>> <p>Icq nr:</p>
>> </td>
>> <td>
>> <input type="text" name="Uin" size="25">
>> </td>
>>