yo ya hice eso de los permisos y todo
pero me sale este error
Tipo de error:
Provider (0x80004005)
Error no especificado
/pruebas/lista.asp, línea 8
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/cnnSGC.asp" -->
<%
Dim rst_Lista
Dim rst_Lista_numRows
Set rst_Lista = Server.CreateObject("ADODB.Recordset")
rst_Lista.ActiveConnection = MM_cnnSGC_STRING <--------ESTA ES LA LINEA 8
rst_Lista.Source = "SELECT * FROM Archivos ORDER BY Id_Num ASC"
rst_Lista.CursorType = 0
rst_Lista.CursorLocation = 2
rst_Lista.LockType = 1
rst_Lista.Open()
rst_Lista_numRows = 0
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
rst_Lista_numRows = rst_Lista_numRows + Repeat1__numRows
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Administración Del Sistema De Gestión De Calidad</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
body {
background-image: url(IMG/fondoestrellagrande2.JPG);
background-attachment:fixed;
}
body,td,th {
font-family: Verdana, Arial, Helvetica, sans-serif;
font-size: 12px;
}
-->
</style>
<script type="text/javascript" src="Menus/stmenu.js"></script>
</head>
<body>
<div align="center">
<table width="800" height="529" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="90" colspan="3" valign="top">
<p align="center"><img src="IMG/baner.JPG" width="790" height="90"></p> </td>
</tr>
<tr>
<td valign="top" rowspan="2" width="55">
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p> </p>
<p></td>
<td height="26" valign="top" background="IMG/barramenu2.JPG"><script type="text/javascript" src="Menus/MenuVerde.js"></script></td>
<td valign="top" rowspan="2" width="56">
</td>
</tr>
<tr>
<td valign="top" height="361" width="689">
<table border="1">
<tr>
<td>Id_Num</td>
<td>Nombre</td>
<td>Codigo</td>
<td>Fecha</td>
<td>Ruta</td>
</tr>
<% While ((Repeat1__numRows <> 0) AND (NOT rst_Lista.EOF)) %>
<tr>
<td><%=(rst_Lista.Fields.Item("Id_Num").Value)%> </td>
<td><%=(rst_Lista.Fields.Item("Nombre").Value)%> </td>
<td><%=(rst_Lista.Fields.Item("Codigo").Value)%> </td>
<td><%=(rst_Lista.Fields.Item("Fecha").Value)%></td>
<td><%=(rst_Lista.Fields.Item("Ruta").Value)%></td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
rst_Lista.MoveNext()
Wend
%>
</table></td>
</tr>
<tr>
<td valign="top" colspan="3" height="52">
<p align="center" style="line-height: 150%; margin-top: -6px; margin-bottom: -6px"><img src="IMG/pie%20de%20pag.bmp" width="800" height="52"></p> </td>
</tr>
</table>
</div>
</body>
</html>
<%
rst_Lista.Close()
Set rst_Lista = Nothing
%>