webForumDet fria alternativet

Förhandsgranska formulär...

JavaScript

30 svar · 710 visningar · startad av Method · sida 2 av 2

Trådstarten, av Method

Jag sökte lite och hittade detta inlägg <http://cgi.webforum.nu/wf/Forum11/HTML/004215.html> inlägg #9 Janspeed men jag får inte det att fungera att den skickar til olika sidor beronde på vilken knapp man klickar på. Har någon nån lösning på detta? Jag vill ha en preview knapp och en skicka in knapp Tack på förhand Jonas

Läs hela trådstarten →
@nderss avatar@ndersMedlem sedan juni 200032 967 inlägg
#21

en fråga om det fönstret man öppnar med din kod Anders, blir det scrolllist på fönstret så att man kan sccrolla upp o ner?

näe, men lägg till scrollbars=yes så blir det det. :)

<button value="1" onclick="document.forms[0].action='preview.asp'; window.open('','lilleman','width=400,height=500,scrollbars=yes'); document.forms[0].target='lilleman'; document.forms[0].submit();">

berätta hur det går!

mvh,

MethodMedlem sedan apr. 2001357 inlägg
#22

Helt underbart precis som jag vill ha det :) :)

Tack igen !!!!! ;)

Tack så mycket

Jonas

MethodMedlem sedan apr. 2001357 inlägg
#23

En liten fråga bara ;)

när jag klickar på förhandsgranska och sen klickar på skicka in så öppnas jobb_ok.asp i ett nytt fönster

men klickar jag på skicka in direkt utan att förhandsgranska så öppnas det "vanligt"

hur kommer det sig?

denna kod använder jag

<input class="send" type="button" name="" value="F&ouml;rhandsgranska" onclick="document.forms[0].action='preview.asp'; window.open('','preview','width=400,height=500,scrollbars=yes'); document.forms[0].target='preview'; document.forms[0].submit();">
																<input class="send" type="button" name="" value="Skicka in" onclick="document.forms[0].action='jobb_ok.asp'; document.forms[0].submit();">

tack på förhand

Jonas

@nderss avatar@ndersMedlem sedan juni 200032 967 inlägg
#24

vad vill du ska hända när man klickar 'skicka in'?

det är ingen hejd på dina frågor... ;)

MethodMedlem sedan apr. 2001357 inlägg
#25

Att man skickar formuläret till databasen utan att öppna ett nytt fönster.

Frågar man inte får man inget veta... ;)

@nderss avatar@ndersMedlem sedan juni 200032 967 inlägg
#26

du råkar inte ha kvar target="_blank" i din <form>-tagg?

MethodMedlem sedan apr. 2001357 inlägg
#27

nope, har bara detta

<form action ="jobb_ok.asp" method = "post">
@nderss avatar@ndersMedlem sedan juni 200032 967 inlägg
#28

ok, nu fattar jag ingenting. :)

försök igen:

  1. vad händer nu?
  2. vad vill du ska hända?
  3. visa hela koden.
MethodMedlem sedan apr. 2001357 inlägg
#29
  1. vad händer nu?

Nu händer detta:
klickar jag på |förhandsgranska| så öppnas fönstret och det funkar, när jag har klickat på |förhandsgranska| och sen klickar på |skicka in| så öppnas jobb_ok.asp också i ett nytt fönster.

men klickar jag inte på |förhandsgranska| innan utan klickar på |skicka in| direkt när jag har fyllt i formuläret så öppnas inte jobb_ok.asp i ett nytt fönster (så vill jag ha det).

  1. vad vill du ska hända?

Att klickar man på |förhandsgranska| skall ett nytt fönster öppnas med preview.asp i.

klickar jag på |skicka in| så skall jobb_ok.asp INTE öppnas i ett nytt fönster utan öppnas i samma fönster som formuläret.

  1. visa hela koden.
<html>

	<head>
		<meta http-equiv="content-type" content="text/html;charset=iso-8859-1">
		<meta name="generator" content="Adobe GoLive 5">
		<title>Lägg till nytt jobb</title>
		<%Session.LCID = 1053%>
		<!-- kollar om användaren använder Microsoft Internet Explorer. -->
		<%
		Kolla = Request.ServerVariables("HTTP_USER_AGENT")
		If Instr(Kolla, "MSIE") then
		%>
		<style type="text/css">
			<!--
			input { color: #000000; background-color: #FFFFFF; font-size: 11px; border: 1px #000000 solid; font-family: Verdana}
			select { color: #000000; background-color: #FFFFFF; font-size: 11px; border: 1px #000000 solid ; font-family: Verdana}
			textarea { color: #000000; background-color: #FFFFFF; font-size: 11px; border: 1px #000000 solid ; font-family: Verdana}
			.send { color: #000000; background-color: #D4D0C8; font-size: 11px; border: 1px #808080 solid; font-family: Verdana}
			.clear { color: #000000; background-color: #D4D0C8; font-size: 11px; border: 1px #808080 solid; font-family: Verdana}
			-->
		</style>
		<!-- Om den inte använder MSIE så skriver den inte ut koden ovan. -->
		<%
		else

		Response.Write ""
		end if
		%>
		<link rel="stylesheet" href="text.css">
	</head>

<body bgcolor="#ffffff">
<form action ="jobb_ok.asp" method = "post">
			<table border="0" cellpadding="8" cellspacing="0" width="500">
				<tr>
					<td colspan="2" bgcolor="#d2d2d2" class="h2">Formul&auml;r f&ouml;r nytt jobb</td>
				</tr>
				<tr>
					<td width="50%" bgcolor="#e4e4e4"><span class="bold">Titel: </span>p&aring; jobbet som s&ouml;kes<br>
						<input type = "text" name ="Huvudrubrik" size="45" maxlength="100"><br>
								</td>
					<td bgcolor="#e4e4e4"><span class="bold">Kontor:<br>
						</span><select name="kontor" size=1>
							<!-- Öppnar databasen, anger vad dsn har för namn. Och hämtar info från kolumnen kontor utan att hämta dubletter i tabellen kontaktpersoner. --><%
								Set MinCon = Server.CreateObject("ADODB.Connection")
								Set rs = Server.CreateObject("ADODB.Recordset")
								MinCon.Open "DSN=bdab1;UID=;PWD="
								SQL = "SELECT DISTINCT kontor FROM kontor ORDER BY kontor ASC"
								rs.Open SQL, MinCon
								response.write "<option value="""">-- Välj kontor --</option>"
								Do While Not rs.EOF
								%>
								<option><%=rs("kontor")%></option><!-- Hoppar ner en rad och läser nästa rad. --><%
								rs.MoveNext
								Loop
								Response.Write "<option>_____________________</option>"
								%>
						</select></td>
				</tr>
				<tr>
					<td colspan="2" bgcolor="#e4e4e4"><span class="bold">1:a rubriken:</span> t ex Arbetsuppgifter<br>
						<input type = "text" name ="Rubrik 1" size="76" maxlength="100" value="Arbetsuppgifter"></td>
				</tr>
				<tr>
								<td colspan="2" bgcolor="#e4e4e4"><span class="bold">1:a stycket:<br>
						</span><font face="Verdana" size="1"><textarea name="Text 1" rows=6 cols="75"></textarea></font></td>
							</tr>
				<tr>
					<td colspan="2" bgcolor="#e4e4e4"><span class="bold">2:a rubriken:</span> t ex Kvalifikationer<br>
						<input type = "text" name ="Rubrik 2" size="76" maxlength="100" value="Kvalifikationer"></td>
				</tr>
				<tr>
								<td colspan="2" bgcolor="#e4e4e4"><span class="bold">2:a stycket:<br>
						</span><font face="Verdana" size="1"><textarea name="Text 2" rows=6 cols="75"></textarea></font></td>
							</tr>
						<tr>
							<td colspan="2" bgcolor="#e4e4e4"><span class="bold">Kontaktpersoner f&ouml;r jobbans&ouml;kan: </span>v&auml;lj enligt nummerordningen<br>
					</td>
						</tr>
						<tr>
					<td width="50%" bgcolor="#e4e4e4"><SELECT NAME = "kpers" SIZE = 1>
									<!-- Öppnar databasen, hämtar all info från kolumnen Namn från tabellen kontaktpersoner. -->
									<%
									Set MinCon = Server.CreateObject("ADODB.Connection")
									Set rs = Server.CreateObject("ADODB.Recordset")
									MinCon.Open "DSN=bdab1;UID=;PWD="
									SQL = "SELECT Namn FROM kontaktpersoner WHERE kontakt = 'ja' ORDER BY Namn ASC"
									rs.Open SQL, MinCon
									response.write "<option value="""">1</option>"
									Do While Not rs.EOF
									%>
									<option><%=rs("Namn")%></option>
									<!-- Hoppar ner en rad och läser nästa rad. -->
									<%
									rs.MoveNext
									Loop
									Response.Write "<option>_____________________</option>"
									%></SELECT></td>
					
					<td bgcolor="#e4e4e4" align="left"><SELECT NAME = "kpers2" SIZE = 1>
						<!-- Öppnar databasen och hämtar all info från kolumnen Namn i tabellen kontaktpersoner. -->
						<%
						Set MinCon = Server.CreateObject("ADODB.Connection")
						Set rs = Server.CreateObject("ADODB.Recordset")
						MinCon.Open "DSN=bdab1;UID=;PWD="
						SQL = "SELECT Namn FROM kontaktpersoner WHERE kontakt = 'ja' ORDER BY Namn ASC"
						rs.Open SQL, MinCon
						response.write "<option value="""">2</option>"
						Do While Not rs.EOF
						%>
						<option><%=rs("Namn")%></option>
						<!-- Hoppar ner en rad och läser nästa rad. -->
						<%
						rs.MoveNext
						Loop
						Response.Write "<option>_____________________</option>"
						%></SELECT></td>
				</tr>
				<tr>
					<td width="50%" bgcolor="#e4e4e4"><SELECT NAME = "kpers3" SIZE = 1>
						<!-- Öppnar databasen, hämtar all info från kolumnen Namn från tabellen kontaktpersoner. -->
						<%
						Set MinCon = Server.CreateObject("ADODB.Connection")
						Set rs = Server.CreateObject("ADODB.Recordset")
						MinCon.Open "DSN=bdab1;UID=;PWD="
						SQL = "SELECT Namn FROM kontaktpersoner WHERE kontakt = 'ja' ORDER BY Namn ASC"
						rs.Open SQL, MinCon
						response.write "<option value="""">3</option>"
						Do While Not rs.EOF
						%>
						<option><%=rs("Namn")%></option>
						<!-- Hoppar ner en rad och läser nästa rad. -->
						<%
						rs.MoveNext
						Loop
						Response.Write "<option>_____________________</option>"
						%></SELECT></td>
					<td bgcolor="#e4e4e4" align="left"><SELECT NAME = "kpers4" SIZE = 1>
						<!-- Öppnar databasen och hämtar all info från kolumnen Namn i tabellen kontaktpersoner. -->
						<%
						Set MinCon = Server.CreateObject("ADODB.Connection")
						Set rs = Server.CreateObject("ADODB.Recordset")
						MinCon.Open "DSN=bdab1;UID=;PWD="
						SQL = "SELECT Namn FROM kontaktpersoner WHERE kontakt = 'ja' ORDER BY Namn ASC"
						rs.Open SQL, MinCon
						response.write "<option value="""">4</option>"
						Do While Not rs.EOF
						%>
						<option><%=rs("Namn")%></option>
						<!-- Hoppar ner en rad och läser nästa rad. -->
						<%
						rs.MoveNext
						Loop
						Response.Write "<option>_____________________</option>"
						%></SELECT></td>
				</tr>
						<tr>
							<td colspan="2" bgcolor="#e4e4e4"><span class="bold">Datum:</span> (Det datum som ans&ouml;kan senast skall vara inne)<br>
						
						
										Datumet måste hålla detta formatet YYYY-MM-DD<br>
						<input type = "text" name ="datum" value="<%=date%>" size="32" maxlength="100"></td>
						</tr>
				<tr>
					<td colspan="2" align="right" bgcolor="#e4e4e4"><input class="send" type="button" name="" value="F&ouml;rhandsgranska" onclick="document.forms[0].action='preview.asp'; window.open('','preview','width=400,height=500,scrollbars=yes'); document.forms[0].target='preview'; document.forms[0].submit();">
																<input class="send" type="button" name="" value="Skicka in" onclick="document.forms[0].action='jobb_ok.asp'; document.forms[0].submit();"></td>
				</tr>

				<tr>
					<td bgcolor="#d2d2d2" width="50%"></td>
					<td bgcolor="#d2d2d2"><input type="hidden" name="adddate" value="<%=date%>"></td>
				</tr>
			</table>
		</form>
				
				
</body>

</html>

hoppas att detta skall hjälpa :)

tack på förhand

@nderss avatar@ndersMedlem sedan juni 200032 967 inlägg
#30

aha! nu fattar jag!

prova detta:

<input class="send" type="button" name="" value="Skicka in" onclick="document.forms[0].target='_self'; document.forms[0].action='jobb_ok.asp'; document.forms[0].submit();">

mvh,

MethodMedlem sedan apr. 2001357 inlägg
#31

Jippie!!! :) :)

det funkar tack Anders

269 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
123 ms — deklarationer (db)
0 ms — hämta statistik (cache)
141 ms — hämta tråd, inlägg och bilagor (db)
125 ms — ändringar (db)