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>
3 svar · 341 visningar · startad av webbmannen
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?
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>
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>
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?