erro http 500
gente
este codigo sempre funcionou
agora estou com o windows vista e o iis do vista
e este codigo não quer funcionar, deveria abrir uma base de dados e mostrar uma lista de emails
o que faltou eu configurar no iis ??
tenho certeza que não tem erro neste cofigo
<%@LANGUAGE="VBSCRIPT"%>
<html><head><title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head><body>
<%
Server.ScriptTimeout = 3600
set conn = server.CreateObject ("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("bancodedados.mdb")
set lista = server.CreateObject ("ADODB.Recordset")
lista.Open "SELECT * FROM email order by codigo ",conn,3,3
%>
<table border="1" align="center" bordercolor="#FFFFFF" bgcolor="#FFFFFF" >
<%
codigo=1
do while not lista.eof
if lista("uf")="RS" then
bgcolor="#00FFFF"
elseif lista("uf")="SP" then
bgcolor="#FF99FF"
else
bgcolor="#00CCFF"
end if
%>
<tr bgcolor="<%=bgcolor%>">
<td> <div align="center"><font size="2" face="Verdana"><%=codigo%></font></div></td>
<td><font size="2" face="Verdana"><%=lista("nome")%></font></td>
<td><font size="2" face="Verdana"><%=lista("email")%></font></td>
<td><font size="2" face="Verdana"><%=lista("uf")%></font></td>
<td><font size="2" face="Verdana"><%=lista("localizou")%></font></td>
</tr>
<% lista.movenext
codigo=codigo+1
loop %>
</table>
<%
set lista = nothing
set conn = nothing
%>
</body>
</html>Discussão (3)
Carregando comentários...