Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

estica16

Variavel RESTO nao passa no Firefox

Por , em ASP Clássico

Recommended Posts

estica16    0

estica16
Postado

Pretendo consultar se um cesto de compras tem ja compras feitas ou nao mas a minha variável RESTO nao passa no Firefox

 

No IE, tudo rola maravilha

 

 

'Determinação do id do client - se =0 então é a primeira vezorig=Request("orig")id=Request.Cookies("w14")tipo=Request("tipo")serie_id=Request("serie_id")data_edicao=Request("ano")pag=Request("pag")num_art = 25resto =""n_items = Request("item_id").countfor n=1 to n_items	existe1 = 0	for m=1 to n-1		if Request("item_id").item(m)-Request("item_id").item(n) = 0 then			existe1 = 1		end if	next	if existe1 = 0 then		resto = resto & "item_id=" & Request("item_id").item(n) & "&"	end ifnext

Ja experimentei Request.form mas tambem nao rola...

 

Se alguem me puder ajudar...

 

Obrigado

Compartilhar este post

Link para o post
Compartilhar em outros sites

estica16    0

estica16
Postado

Quando chamo a variável RESTO:

 

<script language="JavaScript">

var b = 'insere_items.asp?<%=resto%>';

alert(b );

...

</script>

 

No IE sai o seguinte:

 

insere_items.asp?item_id=1

 

No FF apenas sai:

 

insere_items.asp?

 

 

Alguem me pode ajudar???

 

Obrigado

Compartilhar este post

Link para o post
Compartilhar em outros sites

Mário Monteiro    179

Mário Monteiro
Postado

deve ter alguma configuração no navegador que impede, o codigo nao faria tal coisa pelo menos nao sem voce forçar esta situação

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Nesse trecho não vejo erro para que não rode no FF. Poste o código completo, ou um link para ver o sistema rodando.

Compartilhar este post

Link para o post
Compartilhar em outros sites

hinom    5

hinom
Postado

de onde vem a variavel RESTO ?você está fazendo requisição de um dado postado ?está chamando o valor de um cookie ou variavel global ou session ?

Compartilhar este post

Link para o post
Compartilhar em outros sites

estica16    0

estica16
Postado

Segue codigo completo...

 

lista_items.asp

 

<html><head><style type="text/css"><!--body {	background-image: url(../imagens/bg_pontos1.gif);}--></style><link href="../_includes/geral.css" rel="stylesheet"></head><BODY VLINK="#00FF00" bgcolor="#D4DDDD" text="#006394" link="#FFCC00" class="body"><%'PÁGINA QUE É CHAMADA A PARTIR DA IFRMCARTAS.ASP E QUE APRESENTA UMA LISTA DAS CARTAS DA SÉRIE SELECCINADADAdsn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=D:\Webroot\gestao\Database\cartas.mdb"Set db = Server.CreateObject("ADODB.Connection")db.Mode = 3db.Open dsnSet rs = Server.CreateObject("ADODB.RecordSet")'***************************************'Determinação do id do client - se =0 então é a primeira vezorig=Request("orig")id=Request.Cookies("w14")tipo=Request("tipo")serie_id=Request("serie_id")data_edicao=Request("ano")pag=Request("pag")num_art = 25resto =""n_items = Request("item_id").countfor n=1 to n_items	existe1 = 0	for m=1 to n-1		if Request("item_id").item(m)-Request("item_id").item(n) = 0 then			existe1 = 1		end if	next	if existe1 = 0 then		resto = resto & "item_id=" & Request("item_id").item(n) & "&"	end ifnext' ***************************************'Listagens de Items das series%> <center>  <br>  <div id="aguardar"> <MARQUEE DIRECTION=LEFT BEHAVIOR=SCROLL SCROLLAMOUNT=10 SCROLLDELAY=200><font face="Verdana" size="4" color="#006394"> 	Aguarde um momento, por favor.</font></MARQUEE> </div></center><%q = "SELECT * FROM series_ where serie_id='" & serie_id & "'"rs.Open q, db%> <center>  <table width="90%" border="0" align="center" cellspacing="0" cellpadding="0" bgcolor="#D4DDDD" bordercolor="#006394" >	<tr>	  <td width="91%"> 		<table width="91%" border="1" align="center" cellspacing="6" bgcolor="#D4DDDD" bordercolor="#E9DECD" bordercolorlight="#8A3400" bordercolordark="#E9DECD">		  <tr>			<td width="91%"> 			  <table width="100%" border="1" cellspacing="1" cellpadding="2" bordercolor="#E9DECD" bordercolorlight="#8A3400" bordercolordark="#E9DECD">				<tr>				  <td align="center"> <font face="Verdana" size="4" color="#CA7910"><%=rs.fields("titulo")%></font><br>					<font face="Verdana" size="4" color="#CA7910"><b><%=rs.fields("sub_titulo")%></b></font> 				  </td>				</tr>			  </table>			</td>		  </tr>		</table>	  </td>	</tr>  </table><%rs.Closeif data_edicao="todas" then	q = "SELECT * FROM cartas_ where serie_id='" & serie_id & "'"else	q = "SELECT * FROM cartas_ where serie_id='" & serie_id & "' and data_edicao='" & data_edicao & "' order by item_id"end ifrs.Open q, db%> <script language="JavaScript">var	b = 'insere_items.asp?<%=resto%>';var	c = 'id=<%=id%>';var	d = 'tipo=<%=tipo%>';var	e = 'orig=<%=orig%>';var i=0;resto='" & resto & "';function fun() {	for(i=0; i<form.elements.length; i++) 		if(form.elements[i].status == true)			b = b + form.elements[i].name + '=' + form.elements[i].value + '&';			alert(form.elements[1].value); 		// 2			alert(form.elements[1].name); 		// item_id			alert(b);				// FF --> insere_items.asp? // IE --> insere_items.asp?item_id=1&			b = b.substring(0, b.length - 1);			alert(b.length); 			// FF --> 16		   // IE --> 26			alert(b); 				//  FF --> insere_items.asp // IE --> insere_items.asp?item_id=1	if(b != 'insere_items.asp') {		b = b + '&' + c + '&' + d + '&' + e;		window.showModalDialog(b,null,'help:no; dialogWidth:220px; dialogHeight:120px; scroll:yes; status:no;'); 		alert(b); 					// FF --> não chega aki // IE --> insere_items.asp?item_id=1&id=576&tipo=1&orig=cartas	}}</script><%cont=0dim inter_pag()while not rs.EOF	cont=cont+1	rs.movenextwendrs.closepags = 1 + Int((cont -1) / num_art)redim inter_pag(pags,2)rs.Open q, dblmin= pag * num_art + 1lmax = (pag+1) * num_artif lmax > cont then	lmax=contend if' response.write "pag=" & pag & " cont=" & cont%>   <form id="form">	<center>	  <table width="90%" border="0" align="center" cellspacing="0" cellpadding="0" bgcolor="#D4DDDD" bordercolor="#006394">		<tr>		  <td width="91%"> 			<table width="91%" border="1" align="center" cellspacing="6" bgcolor="#D4DDDD" bordercolor="#E9DECD" bordercolorlight="#8A3400" bordercolordark="#E9DECD">			  <tr>				<td width="91%"> 				  <table width="100%" border="1" cellspacing="1" cellpadding="2" bordercolor="#E9DECD" bordercolorlight="#8A3400" bordercolordark="#E9DECD">					<%					if pag+1<>pags then					%> 					<tr>					  <td align="center" colspan="5"> <font size="1" face="Verdana,Arial" color="#DF8B28">Assinale 						os artigos que pretende adquirir.<br>						Inclua-os no seu Cesto de Compras.</font> </td>					</tr>					<%					end if					%> 					<tr> 					  <td align="center" width="12%"><font face="Verdana" size="2" color="#006394"><b>Folha</b></font></td>					  <td align="center"><font face="Verdana" size="2" color="#006394"><b>Nome</b></font></td>					  <td align="center" width="12%"><font face="Verdana" size="2" color="#006394"><b>Edição</b></font></td>					  <td align="center" width="11%"><font face="Verdana" size="2" color="#006394"><b>Preço s/IVA<br>						€</b></font></td>					  <td align="center" width="13%"><font face="Verdana" size="2" color="#006394"><b>Adquirir</b></font></td>					</tr>					<%					reg = 1					while not rs.EOF					if reg mod num_art = 1 then						inter_pag(1+int((reg-1)/num_art),1) = rs.fields("no_folha")					end if					if reg mod num_art = 0 then						inter_pag(1+int((reg-1)/num_art),2) = rs.fields("no_folha")					end if					if reg = cont then						inter_pag(pags,2) = rs.fields("no_folha")					end if					if reg >= lmin and reg<=lmax then					%> 					<tr> <!--<input type="hidden" name="id" value="<%=rs.fields("item_id")%>">--> 					  <td><font face="Verdana" size="2" color="#006394"><%=rs.fields("no_folha")%></font></td>					  <td width="200"><font face="Verdana" size="2" color="#006394"><%=rs.fields("nome")%></font></td>					  <td align="center"><font face="Verdana" size="2" color="#006394"><%=rs.fields("data_edicao")%></font></td>					  <!--<td align="center"><font face="Verdana" size="2" color="#006394"><%=int(0.5 + rs.fields("preco") * 100) / 100%></font></td>--> 					  <td align="center"><font face="Verdana" size="2" color="#006394"><%=FormatNumber(round(rs.fields("preco"),2),2)%></font></td>					  <%					  existe = 0					  for n = 1 to n_items						dabase = rs.fields("item_id").value - Request("item_id").item(n)						if dabase = 0  then							existe1 = 0						for m=1 to n-1							if Request("item_id").item(m) -Request("item_id").item(n) = 0 then								existe1 = 1							end if						next					  if existe =0 then					  %> 					  <td align="center">						<input type="checkbox" name="item_id" value="<%=rs.fields("item_id")%>" CHECKED>					  </td>					  <%					  existe = 1					  end if					  end if					  next					  if existe = 0 then					  %> 					  <td align="center">						<input type="checkbox" name="item_id" value="<%=rs.fields("item_id")%>">					  </td>					  <%					  end if					  end if					  rs.MoveNext					  reg = reg + 1					  wend					  %>					</tr>				  </table>				</td>			  </tr>			</table>		  </td>		</tr>	  </table>	</center>	<center>	  <table width="90%" border="0" align="center" cellspacing="0" cellpadding="0" bgcolor="#D4DDDD" bordercolor="#E9DECD" bordercolorlight="#8A3400" bordercolordark="#E9DECD">		<tr>		  <td width="91%"> 			<table width="91%" border="1" align="center" cellspacing="2" bgcolor="#D4DDDD" bordercolor="#E9DECD" bordercolorlight="#8A3400" bordercolordark="#E9DECD">			  <tr>				<td width="91%"> 				  <table width="100%" border="1" cellspacing="1" cellpadding="2" bordercolor="#E9DECD" bordercolorlight="#8A3400" bordercolordark="#E9DECD">					<tr>					  <td align="center">						<%						for i = 1 to pags						if pag + 1 = i then						%>						<font face="Verdana" size="1" color="#DF8B28">(<%=inter_pag(i,1) & "-" & inter_pag(i,2)%>)</font> 						<%						else						%>						<label onMouseOver="this.style.cursor='HAND';" onClick="fun1(form,<%=i%>);"><font face="Verdana" size="1" color="#006394"><u>(<%=inter_pag(i,1) & "-" & inter_pag(i,2)%>)</u></font></label> 						<%						end if						next						%>					  </td>					</tr>				  </table>				</td>			  </tr>			</table>		  </td>		</tr>	  </table>	</center>	<br>	<a href="#" onMouseOver="this.style.cursor='HAND';" onClick="fun(form);"><font face="Verdana" size="2" color="#CA7910"><u><b>Pôr 	  no cesto de compras</b></u></font></a>  </form>    <p><br>	<a href="#" onMouseOver="this.style.cursor='HAND';" onClick="window.open('<%=orig & ".asp?orig=" & orig & "&id=" & id%>','_parent');"> 	<font face="Verdana" size="2" color="#CA7910"><b><u>Voltar à lista de produtos</u></b></font></a>	</p></center><%rs.Closedb.Close%> <script FOR=window EVENT=onload LANGUAGE="JScript">aguardar.style.display='none'</SCRIPT></body></html>

 

Mas vejam o k reparei e realmente onde se perde a variável resto no FF...

 

'Determinação do id do client - se =0 então é a primeira vezorig=Request("orig")id=Request.Cookies("w14")tipo=Request("tipo")serie_id=Request("serie_id")data_edicao=Request("ano")pag=Request("pag")num_art = 25resto ="" // substituindo aki --> resto="item_id=1" --> sai item_id=1n_items = Request("item_id").countfor n=1 to n_itemsexiste1 = 0for m=1 to n-1if Request("item_id").item(m)-Request("item_id").item(n) = 0 thenexiste1 = 1end ifnextif existe1 = 0 thenresto = resto & "item_id=" & Request("item_id").item(n) & "&" // substituindo resto por item_id=1 nao sai nadaend ifnext

Mais uma vez obrigado pela ajuda

 

Cumps

 

-----------------------------------------------------------------------------------

Post Mesclado

-----------------------------------------------------------------------------------

 

E passar o codigo que esta em ASP para dentro do javascript???

 

var n_items='<%=n_items%>';var item_id='<%=item_id%>';for (n=1; n<=n_items; n++){	var existe1 = 0	for (m=1; m=n-1; m++){		if (Request(item_id).item(m)-Request(item_id).item(n) == 0){			existe1 = 1			}	if (existe1 == 0) { 		resto = resto + item_id= + Request(item_id).item(n) + "&"		}	}	}

Mas da-me erro.

 

K esta mal neste codigo???

 

Cumps

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito