Notifikationer

Markér alle som læst Log ud

moore Nybegynder

08. december 2005 - 11:38 Der er 28 kommentarer og
1 løsning

<form action> problem

Hej

Har følgende kode, som jeg ikke lige kan få til at virke.
Inde på
www.http://www.thomasknielsen.dk/memphis/index.asp?ID=gastebog
kan man teste det. Den skriver IKKE "TEST AF GÆSTEBOG" som den skal, men i venstre side, står der "tak for tilmelding".
"Tak for tilmelding", skal kun står der, når man klikke på submit knappen i venstre side.

<form action="index.asp?ID=gastebog" method="get">

<input type="text" name="mail">
<input type="submit" value="Tilmeld">

</form>

<%

mail = Request.Form("mail")

if mail<>"" then
response.write "TEST AF GÆSTEBOG"

end if
%>

Synes godt om

kalp Novice

08. december 2005 - 11:49 #1

if request.query("mail")<>"" then
response.write "TEST AF GÆSTEBOG"

Synes godt om

kalp Novice

08. december 2005 - 11:50 #2

if request.querystring("mail")<>"" then
response.write "TEST AF GÆSTEBOG"

kan jeg ikke lige huske

Synes godt om

kalp Novice

08. december 2005 - 12:22 #3

sorry.. misforstod dig vist..

lav en if.. og test..

if Request.Form("submit") = 'Tilmeld'
udskriv Tak for tilmelding

Synes godt om

moore Nybegynder

08. december 2005 - 12:31 #4

Har lavet koden lidt om. Men den skriver stadigvæk .. Tak for tilmelding. Istedet for "TEST AF GÆSTEBOG"

<form action="index.asp?ID=gastebog" method="post">

<input type="text" name="mail">
<input type="submit" value="Skriv i gæstebog" name="gastebog">

</form>

<%

mail = Request.Form("mail")
submit= request.form("gastebog")
if mail<>"" and submit = "gastebog" then
response.write "TEST AF GÆSTEBOG"

end if
%>

Synes godt om

kalp Novice

08. december 2005 - 12:32 #5

Du skal bare requeste submit knappen og tjekke om value er "Tilmeld"

for så er der trykket.. ellers er den tom..

Synes godt om

moore Nybegynder

08. december 2005 - 12:35 #6

Den udskriver ikke noget, når man requester sin form.

<form action="index.asp?ID=gastebog" method="post">

<input type="text" name="mail">
<input type="submit" value="Skriv i gæstebog" name="gastebog">

</form>

<%

submit= request.form("gastebog")

if submit = "gastebog" then
response.write "TEST AF GÆSTEBOG"

end if
%>

Synes godt om

weis Nybegynder

08. december 2005 - 12:37 #7

jeg vil altid fortrække at sætte ASP koden før din form som den her:

<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then

navn = Request.Form("mail")

if mail = "" then
mail_fejl = "* Du skal skrive din mail"
end if

if mail <> "" then
Response.write("TEST AF GÆSTEBOG")
end if

end if
%>

<form action="index.asp?ID=gastebog" method="get">

<input type="text" name="mail"> <% =mail_fejl %>
<input type="submit" value="Tilmeld">

</form>

PS. jeg har også lavet den sådan at hvis mailfeltet ikke er udfyldt får man en fejltekst...!

Synes godt om

weis Nybegynder

08. december 2005 - 12:38 #8

Fejl: navn = Request.Form("mail") skal være mail = Request.Form("mail")

Sådan her:

<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then

mail = Request.Form("mail")

if mail = "" then
mail_fejl = "* Du skal skrive din mail"
end if

if mail <> "" then
Response.write("TEST AF GÆSTEBOG")
end if

end if
%>

<form action="index.asp?ID=gastebog" method="get">

<input type="text" name="mail"> <% =mail_fejl %>
<input type="submit" value="Tilmeld">

</form>

Synes godt om

moore Nybegynder

08. december 2005 - 12:41 #9

Fatter det ikke. Den hopper bare tilbage på forsiden, og i adresselinien står der, så det man har skrevet i mailfeltet.
Hvis i har en mail, kan jeg sende de 2 filer, som jeg bruger. Min index.asp + gastebog.asp

Synes godt om

weis Nybegynder

08. december 2005 - 12:48 #10

prøv at se i din :

<form action="index.asp?ID=gastebog" method="get">

prøv at sætte method="post"

Synes godt om

moore Nybegynder

08. december 2005 - 12:53 #11

det virker... YES SIR..
smid et svar :)

Synes godt om

weis Nybegynder

08. december 2005 - 12:53 #12

her er et svar - takker for point

Synes godt om

moore Nybegynder

08. december 2005 - 13:03 #13

var desværre lidt for hurtigt ude.
Den skriver stadigvæk det samme.
"Tak for tilmelding"

Synes godt om

weis Nybegynder

08. december 2005 - 13:07 #14

kan du ikke poste hele koden, for den kode som du skrev i starten, der står teksten "tak for tilmelding" ikke i, så jeg kan ikke se om det er noget rent tekst eller hvad det er.

Synes godt om

weis Nybegynder

08. december 2005 - 13:08 #15

jeg vil tro at hvis du der hvor det står:

Response.write("TEST AF GÆSTEBOG")

retter det til:

tilmelding = "Tak for tilmelding"
Response.write("TEST AF GÆSTEBOG")

og så der hvor du vil have beskeden "Tak for tilmelding" indsætter koden:

<% =tilmelding %>

Synes godt om

moore Nybegynder

08. december 2005 - 13:12 #16

Har 2 filer.

index.asp

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Sound Of Memphis Officiel Hjemmeside</title>
<link href="stylesheet/screen.css" rel="stylesheet" type="text/css" />
<script language="javascript" src="stylesheet/functions.js" type="text/javascript"></script>
<script type="text/JavaScript">


</script>

<style type="text/css">

</style>

</head>

<body>
<table width="703" border="0" align="center" cellpadding="0" cellspacing="0">

</table>
<table width="703" height="80%" border="0" align="center" cellpadding="0" cellspacing="0" class="table1">

<tr align="left" valign="top" bgcolor="white">
<th height="9" scope="row"><img src="design/spacer.gif" width="5" height="9"></th>
<th height="9" class="table1_ext2" scope="row"><img src="design/spacer.gif" width="5" height="9"></th>
</tr>
<tr align="left" valign="top">
<th width="214" bgcolor="white" scope="row"><table width="194" height="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="white">
<tr>
<th height="15" align="right" valign="middle" scope="col"><img src="design/spacer.gif" width="5" height="5"></th>
</tr>
<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp">HJEM</a></th>
</tr>
<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp?ID=bandet">BANDET</a></th>
</tr>
<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp?ID=booking">BOOKING/KONTAKT</a></th>
</tr>
<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp?ID=pressen">PRESSEN</a></th>
</tr>
<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp?ID=tourdate">SPILLETIDER</a></th>
</tr>
<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp?ID=media">MEDIA</a></th>
</tr>
<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp?ID=nyheder">NYHEDER</a></th>
</tr>

<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>

<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp?ID=links">Links</a></th>
</tr>

<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>

<tr class="menu">
<th height="25" align="right" valign="middle" scope="col"><a href="index.asp?ID=gastebog">Gæstebog</a></th>
</tr>

<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>

<br>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col">Tilmeld dig vores nyhedsbrev<br>

<form action="index.asp" method="post">

<input type="text" name="mail">
<input type="submit" value="Tilmeld">

</form>

<%

mail = Request.Form("mail")

if mail<>"" then

sti_til_textfil = Server.MapPath ("nyhedsbrev/nyhedsbrev.txt") 'Få den fysiske sti til text-filen

Set fso = Server.CreateObject("Scripting.FileSystemObject") 'Objekt til at få adgang til filsystemet

'Åben text-filen (8 = 'for appending') (True = Opret filen, hvis den ikke findes i forvejen)
Set ts = fso.OpenTextFile(sti_til_textfil, 8, True)

ts.WriteLine(mail) 'Skriv linje med "navn;alder" til text-filen
ts.WriteLine(Request.ServerVariables("REMOTE_ADDR")) ' Fang IP adressen

ts.Close 'Luk text-filen
Set ts = Nothing 'Nulstil referencer til Objekter
Set fso = Nothing

response.write "Tak for tilmelding"

end if

response.write "</th>"

%>

</tr>

<tr>
<th align="right" valign="middle" scope="col"><img src="design/dotted.gif" width="194" height="5"></th>
</tr>

<br>
<tr class="menu">
<th height="25" align="right" valign="middle" scope="col">Dato : <%response.write FormatDateTime (now, vbShortDate) %></th>
</tr>

<tr class="menu">
<th height="17" align="right" valign="middle" scope="col"> </th>

<tr>
<th height="100%" align="left" valign="bottom" class="misc" scope="col">
</th>
</tr>
<tr>
<th height="25" align="right" valign="middle" scope="col"></th>
</tr>
</table></th>
<th bgcolor="white" scope="row"><table width="487" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<th height="249" align="left" valign="top" class="table1_ext1" scope="row"><img src="billeder/test1.jpg" width="484" height="249"></th>
</tr>
<tr>
<th align="left" valign="top" bgcolor="white" class="Content1" scope="row"><p><strong> <br>
</strong>

<%

if request.querystring("ID")="bandet" then
server.execute("bandet.asp")
else

if request.querystring("ID")="booking" then
server.execute("booking.asp")
else

if request.querystring("ID")="pressen" then
server.execute("pressen.asp")
else

if request.querystring("ID")="tourdate" then
server.execute("tourdate.asp")
else

if request.querystring("ID")="nyheder" then
server.execute("nyheder.asp")
else

if request.querystring("ID")="links" then
server.execute("links.asp")
else

if request.querystring("ID")="media" then
server.execute("media.asp")
else

if request.querystring("ID")="gastebog" then
server.execute("gastebog.asp")
else

response.write "<font color='black'>"

response.write "<img src='billeder/plakat1.jpg' width='200' height='250' align='right'>"

response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"
response.write "INFO OG TEKST OM BANDET <br>"

response.write "</th>"
response.write "</tr>"
response.write "</table>"
response.write "</th>"
response.write "</tr>"

end if
end if
end if
end if
end if
end if
end if
end if
%>

</body>
</html>

FIL NR. 2.. gastebog.asp

<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then

mail = Request.Form("mail")
navn = Request.Form("navn")
besked = request.form("tekst")

if mail = "" then
mail_fejl = "* Du skal skrive din mail"
end if

if mail <> "" then
tilmelding = "Tak for tilmelding"
Response.write("TEST AF GÆSTEBOG")

'Response.write "TEST AF GÆSTEBOG"
end if

end if
%>

<form action="index.asp?ID=gastebog" method="post">
<font color="black">

Indtast navn her : <input type="text" name="navn"><br>
Indtast mail her : <input type="text" name="mail"><% =mail_fejl %><br>
Indtast besked her : <textarea name="tekst" rows="6" cols="20"> </textarea><br>

<input type="submit" value="Tilføj" id="btnSubmit">
<% =tilmelding %>
</form>

Synes godt om

weis Nybegynder

08. december 2005 - 13:15 #17

det skulle da gerne virke...! jeg har lige set det på din hjemmeside...! Tak for tilmelding komme først efter man har submitet..!

Synes godt om

moore Nybegynder

08. december 2005 - 13:16 #18

yep.
Men det kommer samtidig i venstre side, under knappen tilmelding.
Og det skal det jo ikke :)

Synes godt om

weis Nybegynder

08. december 2005 - 13:19 #19

så er det fordi du bruger samme funktiop til at kalde "Tak for tilmelding" der hvor man tilføjer nyhedsbrev...!

Synes godt om

weis Nybegynder

08. december 2005 - 13:22 #20

du kan ændre dit :
<input type="text" name="mail">
til
<input type="text" name="mailtagwall">

Husk også de andre steder i koden der ref. til mail formen...! :D

Synes godt om

moore Nybegynder

08. december 2005 - 13:22 #21

Altså..
Jeg har jo på index.asp 1 tilmeldknap.
og på index.asp?ID=gastebog har jeg også 1 tilmeldknap.

Mon man ikke kan gøre det sådan, eller skal gæstebogen åbne op i et nyt vindue.

Jeg kan ikke finde fejlen. :(

Synes godt om

moore Nybegynder

08. december 2005 - 13:26 #22

YES SIR... skulle kalde den noget andet..
nu tror jeg ikke jeg har flere fejl.. lige foreløbig *GG*
takker

Synes godt om

weis Nybegynder

08. december 2005 - 13:27 #23

jeg har lige en rettelse hvis du bruger denne kode, så husker den dine indtsatnigner hvis mailen ikke er korrekt, så skal man ikke skrive hele teksten igen:

<% if Request.ServerVariables("REQUEST_METHOD") = "POST" then

mailtagwall = Request.Form("mailtagwall")
navn = Request.Form("navn")
besked = request.form("tekst")

if mailtagwall = "" then
mailtagwall_fejl = "* Du skal skrive din mail"
end if

if mailtagwall <> "" then
tilmelding = "Tak for tilmelding"
Response.write("TEST AF GÆSTEBOG")

'Response.write "TEST AF GÆSTEBOG"
end if

end if
%>

<form action="index.asp?ID=gastebog" method="post">
<font color="black">

Indtast navn her : <input type="text" name="navn" value="<% =navn %>"><br>
Indtast mail her : <input type="text" name="mailtagwall" value="<% =mailtagwall %>"><% =mailtagwall_fejl %><br>
Indtast besked her : <textarea name="tekst" rows="6" cols="20"> value="<% =besked %>"</textarea><br>

<input type="submit" value="Tilføj" id="btnSubmit">
<% =tilmelding %>
</form>

Synes godt om

weis Nybegynder

08. december 2005 - 13:33 #24

lille rettelse:

<textarea name="tekst" rows="6" cols="20"> value="<% =besked %>"</textarea>
skal være:
<textarea name="tekst" rows="6" cols="20"><% =besked %></textarea><

så skulle jeg heller ikke have andre rettelser :D

Synes godt om

moore Nybegynder

08. december 2005 - 13:36 #25

fandt også fejlen :)
Nu mangler jeg bare at få det smidt ind i scriptet samtidig.
Denne her kode, skal smides ind, der hvor <%=tilmelding%> bliver kørt til slut i scriptet, så det der står i teksten filen kommer nederst på siden.

Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("gastebog/gastebog.txt")
Set f = fso.OpenTextFile(filespec,2)

' Skriv tekst i en linie
f.WriteLine navn
f.WriteLine mailtagwall
f.WriteLine tekst

' Åbn filen til læsning og læs linie
Set f = fso.OpenTextFile(filespec,1)
Response.write f.ReadLine

f.Close
%>

Synes godt om

weis Nybegynder

08. december 2005 - 13:41 #26

koden:

Set fso = CreateObject("Scripting.FileSystemObject")
filespec = Server.Mappath("gastebog/gastebog.txt")
Set f = fso.OpenTextFile(filespec,2)

' Skriv tekst i en linie
f.WriteLine navn
f.WriteLine mailtagwall
f.WriteLine tekst

' Åbn filen til læsning og læs linie
Set f = fso.OpenTextFile(filespec,1)
Response.write f.ReadLine

f.Close

skal stå der hvor du har Response.write("TEST AF GÆSTEBOG") stående

Synes godt om

moore Nybegynder

08. december 2005 - 13:45 #27

yep.
Men kan man ikke smide det stykke kode i en function, og så køre den til sidste i scriptet.

Synes godt om

weis Nybegynder

08. december 2005 - 14:13 #28

muligvis, men jeg vil mene det her fungere bedre

Synes godt om

moore Nybegynder

08. december 2005 - 14:15 #29

Yep.. Bruger også den løsning nu :)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS

10/07

Stortest af robotplæneklippere: Governator-maskine til krævende og store plæner

10/07

EU: Facebook og Instagram skal straks skrue ned for 'doom scrolling'-funktioner, der gør folk bimmelim

10/07

Nørgaard: Chok! Et offentligt it-system er kommet skidt fra start

10/07

Microsoft lukker for kendt funktion efter næsten 20 år

10/07

Mortens hjemmebyggede AI-løsning indsamler data om hans høns og koster kun én krone om dagen

10/07

Microsoft melder ud: Derfor kan du forvente langt flere Windows-opdateringer fremover

10/07

It-beredskabet sejler fuldstændigt hos Nets: Får skrappe påbud efter store nedbrud har lammet Danmark

10/07

Digital suverænitet: Derfor er kortlægning helt central - sådan bør du gribe det an

10/07

Danmarks Statistik satser tungt på open source i stort projekt til 270 millioner kroner: Disse open source-løsninger er i spil

10/07

En lang, gribende og dødelig gåtur baseret på den første bog Stephen King skrev

10/07

Metas egen AI-chip er udviklet på rekordtid: Vil øge regnekraft med svimlende høje tal

Vis flere artikler

IT-JOB

Paychex Europe

Product Manager, AI & Shared Capabilities

Capgemini Danmark A/S

Open Application (Denmark)

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Cyberdivisionen søger leder til Lokal IT Servicecenter i Holstebro

TV2

iOS udvikler til TV 2 Teknologi

Semler IT

Power Platform Specialist til Semler IT

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I går 22:40	Nye toldregler = nye svindelmuligheder Af nu_igen i Andet software
09/0715:37	Et wifi net til en kolonihave uden wifi Af Andershoegh i Andet hardware
09/0714:29	IIS Kan ikke Redirecte til anden side Af bsn i Webservere
09/0714:19	ESET Af hkprofil i Backup- & Antivirus
09/0712:16	diskpart - slet harddisk Af Uvanga i Windows

White papers

Samarbejde mellem AI og mennesker styrker sikkerheden
Konica Minolta
Undgå at printeren bliver svageste led i sikkerheden
Konica Minolta
Dine data ligger i Europa – men hvem har reelt kontrollen?
Keepit
De spørgsmål 200+ danske virksomheder stiller om print – samlet i én guide
Konica Minolta

Flere white papers »