14/04/2003, 15:12
|
| | | Fecha de Ingreso: diciembre-2002 Ubicación: argentina... de ahí seran veinte cuadras
Mensajes: 382
Antigüedad: 22 años, 4 meses Puntos: 0 | |
| incluido1 y dos son identicos, salvo porque abren <> tablas:
incluido1:
<%Dim objConn, objRS
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject("ADODB.Recordset")
Dim strDatabaseType
'aca elijo con quien me conecto
'strDatabaseType = "Access"
strDatabaseType = "MSDE"
'abro la coneccion (en este caso abre con access)
If strDatabaseType = "Access" Then
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=E:\BRN\texto\texto.mdb;" & _
"Persist Security Info=False"
Else
objConn.Open "Provider=SQLOLEDB;Persist Security Info=False;" & _
"User ID=sa; password =jt;Initial Catalog=BRN;" & _
"Initial File Name=G:\BIBLIOTECAS\BRN_Data.mdf"
End If
%>
el code es muuuuuyyyy largo, podría resumirlo un poco, pero de todas maneras creo que el problema esta aca:
asi anda bien:
<!--#include file= "connectionpubna.asp" -->
<html>
<head>
</head>
asi me tira el error:
<%
base= request.form("base")
if base = "pubna" then%>
<!--#include file= "connectionpubna.asp" -->
<%else%>
<!--#include file= "connectiontexto.asp" -->
<%end if%>
<html>
<head>
</head>
no creo que esté mas abajo... o si?
__________________
Juan Pablo |