ciao ti ho risp anche in privato,
mi esce questo errore che mi dava anche ieri :
-------------------------------------------------
Microsoft VBScript runtime error '800a01a8'
Object required: ''
/0016/test/IT/test.asp, line 8
-------------------------------------------------
ho fatto un 1° file index.html :
<html>
<head>Test </head>
<body>
<form method="POST" action="test.asp" align="center">
<tr>
<TD>
<font face="Arial" size="2" color="#000000">
Riferimento:</font>
</TD>
<TD>
<INPUT NAME="riferimento" SIZE="10" VALUE="0">
</TD>
</tr>
<tr>
<td colspan="2">
<INPUT TYPE="submit" NAME="P4" tabindex="1" VALUE="Cerca i dati impostati">
<INPUT TYPE="reset" NAME="P5" tabindex="2" VALUE="Annulla i criteri">
</td>
</tr>
</form>
</body>
</html>
------------------------------------------------------------
e il secondo file test.asp :
------------------------------------------------------------
<!--#include file ="base.asp"-->
<%
Dim camporicerca, arrayslash, primadelloslash, dopoloslash
camporicerca = Request("riferimento")
arrayslash = Split(camporicerca, "/")
primadelloslash = arrayslash(0)
dopoloslash = arrayslash(1)
rs.Open "SELECT * FROM INDICE WHERE ID_Z3 = " & primadelloslash & " AND Z56 = " & dopoloslash, cn, 1
If rs.EOF Then
Response.Write "NON CI SONO DATI"
Else
%>
<table>
<%
While rs.EOF = False
%>
<tr>
<td><%=rs("Z4")%></td>
<td><%=rs("Z5")%></td>
<td><%=rs("Z6")%></td>
</tr>
<%
rs.MoveNext
Wend
%>
</table>
<%
End If
rs.Close
%>
------------------------------------------------------------
Quando puoi mi rispondi, ti aspetto...
