webForumDet fria alternativet

Skicka - ta emot värde

ASP

3 svar · 341 visningar · startad av webbmannen

Medlem sedan dec. 1999826 inlägg
Frågan#1

Har nu prövat allt möjligt som jag sett och läst men inte hamnat rätt :(

Problematik:
Min kontaktsida skickar inmatad information till en valideringssida. Denna ska sedan gå tillbaka till kontaktsidan och säga tack eller meddela eventuella felinmatningar.

contact.asp har just nu (förutom formuläret) denna kodsnutt:

<%
Response.Buffer = True

id = 0

	If id > 0 Then
%>
<Script language="JavaScript">
<!--
	open('message.asp?id=' + <%=id%>,"Message","scrollbars=0,resizable=0,left=300,top=100,height=250,width=250");
//-->
</script>
<%
	End If
%>

contactdata.asp som validerar infot från contact.asp ser ut så här (i sin helhet):

<%
	Response.Buffer = True

    Dim strcompany, strperson, strmail, strhomepage, strmessage, id

	id = 4

    strcompany = Request.Form("txtcompany")
    If Len(strcompany) = 0 Then strcompany = "Inga uppgifter för företag"

	strperson = Request.Form("txtperson")
	If Len(strperson) = 0 Then id = 1

	strmail = Request.Form("txtmail")
	If Len(strmail) = 0 Then id = 2
	If Len(strmail) < 5 Then id = 2
	If instr(strmail,"@") = 0 Then id = 2
	If instr(strmail,".") = 0 Then id = 2

    strhomepage = Request.Form("txthomepage")
    If Len(strhomepage) = 0 Then strhomepage = "Inga uppgifter för hemsida"

	strmessage = Request.Form("txtmessage")
	If Len(strmessage) = 0 Then id = 3

	Set mail = CreateObject("CDONTS.NewMail")
    mail.To = "sten.mortensen@comtech-data.se"
    mail.From = Request.Form("txtmail")
    mail.Subject = "Meddelande skickat från webbmannens hemsida!"

	contents = "<br><b>Message sent: </b>"& now() &"<br><br><b>Company: </b>"& strcompany & "<br><b>Contact person: </b>" & strperson & "<br><b>E-mail: </b><a href='mailto:"& strmail &"'>"& strmail &"</a> <br><b>Homepage: </b><a href='"& strhomepage &"'>" & strhomepage & "</a><br><br><b>Message: </b>" & strmessage

	mail.Body = contents
	mail.BodyFormat = 0 
	mail.MailFormat = 0
    mail.Send

    Set mail = Nothing

Response.Redirect "contact.asp"
%>

Hur sjutton får jag informationen om id att registreras på contact.asp efter besöket på contactdata.asp

(med reservation för småfel då "trial and error" försöken varit många)

/webb

------------------
Vem ska du göra glad imorgon?

Medlem sedan juni 200032 967 inlägg
#2

Response.Redirect "contact.asp?id=" & id

eller missförstår jag dig helt och hållet?

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
if i'm not back in five minutes, just wait longer.</A>

Medlem sedan juni 200032 967 inlägg
#3

du måste då i contact.asp också plocka in id med request.querystring.

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
if i'm not back in five minutes, just wait longer.</A>

Medlem sedan dec. 1999826 inlägg
#4

Response.Redirect "contact.asp?id=" & id

Detta har jag haft med vid flera försök tidigare men tydligen med fel mottagarkommando på kontaktsidan :/

Med id = Request.QueryString("id") så fungerar det nu som det ska :)

Stort tack @anders :e

/webb

------------------
Vem ska du göra glad imorgon?

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