com miscelania

[Carcleo 4]

Nos testes que fiz, puz uma variavel asp DfModulo_f num codigo javascript Confirm, e percebi que ate ali a variavel vai bem, só que eu preciso dela é na segunda parte do javascript como segue o código:

response.write "<script>if (confirm('Já existe esta pergunta cadastrada em outro módulo. Prosegue "&DfModulo_f&"?')){document.location.href='faq.asp?action=gravarinclusao&action2=gravarvalores&DfModulo_f="&DfModulo_f&"&DfPergunta_f="&DfPergunta_f&"&DfMemo_f="&DfMemo_f&"'} else {document.location.href='faq.asp?action=incluir'}</script>"

E agora, como fazer a variavel asp chegar na 2ª parte do JavaScript

[Crystian 0]

isso tah sendo declarado dentro de uma function? Aonde você chama isso?Não entendi tua pergunta direito...

[fael 1]

Ele quer colocar o resultado de uma variável asp dentro de um link com location.href. O nome da variável é DfModulo_f

[Carcleo 4]

Segue o código completo:

 

<%  ' #############################   Inclusão   ###########################   If Request.QueryString("action") = "gravarinclusao" then       DfId_f = request.Form("FormId")	       DfModulo_f = request.Form("FormModulo")	       DfPergunta_f = request.Form("FormPergunta")	       DfMemo_f = request.Form("FormTexto")	               strSQl = "select * from tbFaq where DfPergunta= '"&DfPergunta_f&"'"       Set Rs_FaqPerguntasVerifica = Conn.EXECUTE(strSQl)          if not Rs_FaqPerguntasVerifica.eof then       if trim(Rs_FaqPerguntasVerifica("DfModulo")) = trim(DfModulo_f) then             response.write "<script>alert('Já existe esta pergunta cadastrda, por favor altere-a!'); document.location='faq.asp?action=editar'</script>"          else             response.write "<script>if (confirm('Já existe esta pergunta cadastrada em outro módulo. Prosegue?')){document.location.href='faq.asp?action=gravarinclusao&action2=incluivalores'} else {document.location.href='faq.asp?action=incluir'}</script>"             if action2 = "gravarvalores"  then 	             strSQlInsert = "INSERT INTO tbFaq(DfModulo, DfPergunta, DfMemo, DfAutor) values('"&DfModulo_f&"' , '"&Replace(DfPergunta_f,"'","''")&"', '"&Replace(DfMemo_f,"'","''")&"' , '"&trim(Nome_usu)&"')"                Set Rs_FaqInsert = Conn.EXECUTE(strSQlInsert)                  if Err.Number = 0 then                   response.write "<script>alert('Inclusão efetuada com sucesso!'); document.location='faq.asp?action=incluir'</script>"                else                   response.write "<script>alert('Erro. Tente de Novo!'); document.location='faq.asp?action=incluir'</script>"                end if	    end if    end if         else          strSQlInsert = "INSERT INTO tbFaq(DfModulo, DfPergunta, DfMemo, DfAutor) values('"&DfModulo_f&"' , '"&Replace(DfPergunta_f,"'","''")&"', '"&Replace(DfMemo_f,"'","''")&"' , '"&trim(Nome_usu)&"')"          Set Rs_FaqInsert = Conn.EXECUTE(strSQlInsert)            if Err.Number = 0 then             response.write "<script>alert('Inclusão efetuada com suscesso!'); document.location='faq.asp?action=incluir'</script>"          else             response.write "<script>alert('Erro. Tente de Novo!'); document.location='faq.asp?action=incluir'</script>"          end if            end if       end if' #############################   Fim da Inclusão   ###########################%>  

Aqui o Formulario

 

<%' #############################   Form de Inclusão   ###########################   If Request.QueryString("action") = "incluir" Then  %></div><p><center><table cellspacing="0" cellpadding="2" border="0" width="580" bgcolor="#8193A7"><tr>    <td align="center" valign="middle" class="toptab"><p><B>:: Inclusão de Documentos ::</B>          <br>          <%            sNomForm = "formInsere"'Recebe o nome do formulario principal da pagina            sNomCampo = "FormTexto"' Recebe o nome do campo que vai armazernar as alterações no editor            sValInicialCampo = ""'Receber o valor que vem do banco de dados para o editor            strSQl = "select * from tbModulo"            Set Rs_FaqSelectInsert = Conn.EXECUTE(strSQl)            %></p>           <link href="../JSeditor/css/aec.css" rel="stylesheet" type="text/css">              <form action="faq.asp?action=gravarinclusao" method=POST  name="formInsere" id="form" onsubmit="document.<%=sNomForm%>.<%=sNomCampo%>.value = Composition.document.body.innerHTML">           <P>  <TABLE cellSpacing=5 cellPadding=0 width="100%" border=0 bgcolor="#D3DBDE">  <TR>   <TD vAlign=center width=65 align=right>Módulo:</TD>   <TD><select name="FormModulo">                        <OPTION value="" selected>Escolha o Módulo</OPTION>                        <%  	 DesenharTabela=True  	 if not Rs_FaqSelectInsert.eof then       Do Until Rs_FaqSelectInsert.Eof=true                               DfModuloInsert = Rs_FaqSelectInsert("DfNome")         DfIdInsert = Rs_FaqSelectInsert("DfId")                              Response.write "<option value="&DfIdInsert&">"&DfModuloInsert&"</option>"         Rs_FaqSelectInsert.MoveNext                    Loop 	 else              response.Write("Não Há Módulos Cadastrados")  	 END IF  	 %>              </select>  </TD>  </TR>  <TR>   <TD vAlign=center width=65 align=right>Pergunta:</TD>   <TD><INPUT size=50 name=FormPergunta value=""></TD>  </TR>  <TR>   <TD vAlign=center width=65 align=right>Texto:</TD>      <TD><!--#include file="JSeditor/editor.asp" --></TD>  </TR>  <TR>   <TD vAlign=top width=130>  </TD>   <TD><input type="submit" class="submit" name="submit" value="Gravar Faq"  onClick="return CriticaFormularioFaqCadastra()"></TD>  </TR>  </TABLE>         </FORM>  </td> </tr></table><%end if' #############################   Fim do Form de Inclusão   ###########################%>

[Crystian 0]

Bom, vamos ver se eu entendi...

Tenta criar uma variavel em JS e "jogar" o valor da variavel ASP dentro, dae depois você pode usar essa variavel em qualquer parte daquele documento.

 

ASP

var  =  &DfModulo_f& 

 

Abraço

 

Ps.: Não sei como colocar uma variavel ASP...

[Carcleo 4]

Cara descobri onde esta o erro,

 

Preciso fazer o codigo abaixo:

response.write "<script>if (confirm('Já existe esta pergunta cadastrada em outro módulo. Prosegue?')){</script>"    strSQlInsert = "INSERT INTO tbFaq(DfModulo, DfPergunta, DfMemo, DfAutor) values('"&DfModulo_f&"' , '"&Replace(DfPergunta_f,"'","''")&"', '"&Replace(DfMemo_f,"'","''")&"' , '"&trim(Nome_usu)&"')"Set Rs_FaqInsert = Conn.EXECUTE(strSQlInsert)  if Err.Number = 0 then   response.write "<script>alert('Inclusão efetuada com sucessoooo!'); document.location='faq.asp?action=incluir'</script>"else   response.write "<script>alert('Erro. Tente de Novo!'); document.location='faq.asp?action=incluir'</script>"end if	    response.write "<script>} else {document.location.href='faq.asp?action=incluir'}</script>"

Funcionar da seguinte forma:

response.write "<script>if (confirm('Já existe esta pergunta cadastrada em outro módulo. Prosegue?')){INSTRUÇÃO .ASP, VEJA ELA NO CODIGO ACIMA} else {document.location.href='faq.asp?action=incluir'}</script>"

Ou seja, tertei que por um código asp dentro de um JavaScript.

 

Tentei do geito que esta mas ele nao executa o Confirm() por que o codigo JavaScript num ta todo, tem como contornar essa situação?

 

 

Ou se for o caso, na instrução JavaScript abaixo:

response.write "<script>if (confirm('Já existe esta pergunta cadastrada em outro módulo. Prosegue?')){document.location.href='faq.asp?action2=gravarvalores&DfModulo_f="&DfModulo_f&"DfPergunta_f="&DfPergunta_f&"DfMemo_f="&DfMemo_f&"'} else {document.location.href='faq.asp?action=incluir'}</script>"

a forma que estou enviando parametros com variaveis asp ta certo?

 

document.location.href='faq.asp?action2=gravarvalores&DfModulo_f="&DfModulo_f&"...

Porque quando chega no faq.asp?action2=gravarvalores, ele diz que os dados de entrada nao chegam, e agora?

 

Olha a forma como to recuperando:

<%if Request.QueryString("action2") = "gravarvalores"  then 	    strSQlInsert = "INSERT INTO tbFaq(DfModulo, DfPergunta, DfMemo, DfAutor) values('"&Request.QueryString(DfModulo_f)&"' , '"&Request.QueryString(Replace(DfPergunta_f,"'","''"))&"', '"&Request.QueryString(Replace(DfMemo_f,"'","''"))&"' , '"&trim(Nome_usu)&"')"   Set Rs_FaqInsert = Conn.EXECUTE(strSQlInsert)     if Err.Number = 0 then      response.write "<script>alert('Inclusão efetuada com sucesso!'); document.location='faq.asp?action=incluir'</script>"   else      response.write "<script>alert('Erro. Tente de Novo!'); document.location='faq.asp?action=incluir'</script>"   end if	end if%>

Ta certo Isso?

[fael 1]

Carcleo, Faz o que o Crystian falou, declara uma variável no javascript e atribui o valor da variável asp à ela. Por exemplo:

ASP

 var  = =DfModulo_f 

E onde você está colocando a variável DfModulo_f, troque para a variável JS. Entendeu?