[Resolvido] FirePHP pra ASP Clássico

[BRN Souza 0]

Alguém conhece alguma extensão pro Firebug que permita o uso diretamento do ASP Clássico (tal qual o FirePHP faz)?

Ou ainda como as soluções existentes mandam a mensagem diretamente do servidor para o firebug cliente?

Eu só achei o FireAtlas (pra .NET), mas não consegui usar com ASP Clássico.

[Patrique 0]

Em ASP classico eu nunca vi e acredito que infelismente não tenha, mais fiquemos no aguardo quem sabe alguém conheça.

[xanburzum 169]

você quer um Debug para ASP, informaçoes sobre o ambiente ,variaveis ,sessions, application, etc

 

ve se ajuda esse aki....

 

link

[BRN Souza 0]

O que eu queria mesmo era usar o firebug com o ASP do mesmo jeito que faço com o FirePHP (quando programando com PHP).

É muito bom de debugar

[Ted k' 126]

sempre usei o velho Response.Write, o ASP amigo já é uma linguagem que não tem mais atualização, por isso que não há essas ferramentas para ela, ao contrário do .net que vem crescendo.

[BRN Souza 0]

Pois é... mas a solução pra ASP Clássico deve ser boba de criar. Eu só precisava entender como as extensões pra PHP, ou ASP.NET fazem.

Andei dando uma olhada e vi que eles usam cookies. Mas não consegui ir além disso.

Quando eu seto um cookie usando asp na página ele já vai imediatamente pra máquina do camarada mesmo antes de o script ASP terminar de executar? Se funcionar asssim, talvez esteja aí a solução.

Mas isso é só um palpite baseado no "quase nada" que eu entendi.

[xanburzum 169]

realmente para as variaveis sempre infalível é o bom e velho

reponse.write(variavel)
response.end()

porem ,baseado neste testador de consultas SQL, você pode adaptá-lo...

 

<%Response.Buffer = True%>
<title>Testador SQL</title>
<form name="FORM1" method="POST" action="SQL.ASP?CONTEUDO=<%=Request.Form("COMMAND")%>">
<p>
<input type="text" name="COMMAND" size="156" value="<%=Request.QueryString("Conteudo")%>" style="font-family: System"></p>
<p>
<input type="submit" value="EXECUTE" name="EXECUTE" style="font-family: System"><input type="reset" value="CLEAR" name="CLEAR" style="font-family: System"></p>
</form><%
 If Request.Form <> "" Then
  SQL = UCase(Request.Form("COMMAND"))
  Server.ScriptTimeout=6000000
  Set Conn = Server.CreateObject("ADODB.Connection")
  Conn.CursorLocation = 3
  Conn.CommandTimeout = 600
  'Crie sua conexão aqui...
constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("db/quaddra.mdb")
Set conexao=Server.CreateObject("ADODB.Connection")
Conn.open constring 
 
  Set SQLTeste = Conn.Execute(SQL)
   If Not SQLTeste.EOF Then%>
   <table border=1 bordercolor="#C0C0C0" style="border-collapse: collapse" cellpadding="0" cellspacing="0"><%
	qcampos = SQLTeste.fields.count -1%>
	<tr><%
	 For i = 0 To qcampos%>
	  <td><font face="System" size=1><span style="background-color: #FFFF00"><b><%=SQLTESTE(i).name%></b></span> </td><%
	 Next%>
	</tr><%	
	Do While Not SQLTeste.EOF%>
	 <tr><%
	  For i = 0 To qcampos%>
	   <td><font face="System" size=1><%=SQLTESTE.fields(i).value%> </td><%
	  Next
	  SQLTeste.MoveNext
	 Loop
	 SQLTeste.Close%>
	</tr>
   </table><% 
   End If 
 End If
%>

 

pegando os valores e testando...

[BRN Souza 0]

ACHEI!!!!!!!!!!!!

 

http://www.firephp.org/Wiki/Libraries/ActiveServerPages

 

http://github.com/smith/firephp-prototype/tree/master

 

Testei aqui e funcionou beleza.

[Patrique 0]

Howwww, legal cara, e obrigado por disponibilizar com a galera!

 

[]'s