(Ayuda asp) Intranet o Explorador de datos

[icarballo]

Amigos necesito una intranet web o un explorador de datos parecida a esta que les estoy mostrando, esta no me funciona porque en IE7 da un error que e tratado de arreglar y no le e encotrado el error.

Les agradesco si tienen alguna que sea free, o algo parecido

[kikeuntercio]

ya probastes con el front page de microshit
si quieres uno gratuito tendrias que darte gusto buscando en www.sourceforge.net

[icarballo]

Fijate que el problema que me da es que no me crea la carpeta en la ruta que le e asignado, eso es todo.


Tengo otra que estaba programando, y el clavo que me da es cuando hace la consulta con la base de datos me da error en la consulta

Código: [Seleccionar]

rs.ActiveConnection = MM_Connection_STRING , si alguien puede aydarme o darme una orientacion de cual es el error.

Código: [Seleccionar]

<!--Inicia coneccion-->
<%
if instr(LCASE(request.Servervariables("url")),"admin")>0 then
MM_Connection_STRING ="Provider=MSDASQL; Driver={Microsoft Access Driver (*.mdb)};Dbq="&Server.MapPath("MyDB.mdb") & ";"
else
MM_Connection_STRING ="Provider=MSDASQL; Driver={Microsoft Access Driver (*.mdb)};Dbq="&Server.MapPath("..\intranet\MyDB.mdb") & ";"
end if
%>
<!--Termina coneccion-->


<%Dim page%>
<%
if request.Form("login")<>"" then
set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_Connection_STRING
rs.Source = "SELECT * FROM usuarios WHERE [usuario]='" & request.Form("login") & "' AND [pass]='" & request.Form("password") & "'"
rs.CursorType = 0
rs.CursorLocation = 3
rs.LockType = 1
'response.write(MM_Connection_STRING)
'response.End()
rs.Open()
rs_numRows = rs.recordCount
response.Write("SELECT * FROM usuarios WHERE [usuario]='" & request.Form("login") & "' AND [password]='" & request.Form("password") & "'")
response.Write("<br>")
response.Write(rs_numRows)
if request.QueryString("ingles")<>1 then
If rs_numRows=0 then
response.Redirect("members.asp?resp=1")
Else
session("member")="OK"
session("uid")=rs.Fields("id_usuario")
response.Redirect("membersonly.asp")
End if
else
If rs_numRows=0 then
response.Redirect("members.asp?resp=1&ingles=1")
Else
session("member")="OK"
session("uid")=rs.Fields("id_usuario")
response.Redirect("membersonly.asp&ingles=1")
End if
end if
End if
%>

[freezer27]

eso parece DinoASP (o mejor conocido ASP Clásico jajaja).

[icarballo]

ya probastes con el front page de microshit
si quieres uno gratuito tendrias que darte gusto buscando en www.sourceforge.net

Gracias entonctre uno mas actualizado