conexion con bd no me funciona

lexus · #1 (**permalink**) 29/12/2002, 09:52

saludos, hace rato pregunte sobre como conectar bases de datos de INTERBASE con ASP, ya encontre varias formas de conectar pero no he logrado como hacerlo

tengo el driver XTG Systems InterBase 6 ODBC Driver
esta es una forma de hacerlo

conn.open "Provider=MSDASQL.1;UID=wwwuser;PWD=vaporware; Data Source=libroniXTG"

------------------------

yo antes con las bases de datos lo hacia asi y me funcionaba perfectamente, habra alguna forma de hacerlo asi, con ruta completa de la ubicacion de la bd, y con un ejemplo de sql y open, y esas cosas..

esta era la forma con access.

<%
'definicion de variables
Dim basedatos,con,rs
'nombre de la bd
basedatos = "../bdgrl/shatt3r.mdb"

Set con = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
con ="DRIVER={Microsoft Access Driver (*.mdb)};uid=;pwd=Shat3ArP2m;"
con = con & "DBQ=" & server.mappath(basedatos)
%>

dim sql

sql = "SELECT campo1, campo2 FROM quejas"
rs.Open sql, con, 3, 3

alguien me puede decir como seria eso con una de interbase?
muchas gracias

lexus · #2 (**permalink**) 31/12/2002, 06:35

alguen tiene alguna idea¿ porfavor denme una manito

lexus · #3 (**permalink**) 01/01/2003, 14:56

Alguien sabe como hacer una conexion completa con esa base de datos..

o almenos un recordset?

por favor, es que llevo preguntando hace mucho y al parecer nadie sabe, no se donde pueda encontrar un ejemplo para poder empezar a trabajar..

Nochero · #4 (**permalink**) 01/01/2003, 16:35

Proba con esta cadena :

"DRIVER={XTG Systems InterBase6 ODBC driver};DB=xx.xx.xx.xx:C:\Data\mibase.gdb;UID=wwwu ser;PWD=vaporware"

donde xx.xx.xx.xx es la dirección IP donde se encuentra el servidor de Interbase.

suerte

Linterns · #5 (**permalink**) 02/01/2003, 08:09

Paso a paso como conectar una BD Interbase con ASP

paso a paso

Suerte

DARIOI · #6 (**permalink**) 30/01/2003, 14:04

HOLA HAS ESTO:
CONFIG.ASP
<%
'variables
Dim strSQLServerName 'ip del servidor de base de datos
Dim strSQLDBUserName 'usuario que fue creado para accesar la base de datos
Dim strSQLDBPassword 'password que fue creado para accesar la base de datos
Dim strSQLDBName 'nombre de la base de datos creada a mano
'detalles del sql server 2000
strSQLServerName = "XXX.XXX.XX.XX" 'ip del servidor de base de datos
strSQLDBUserName = "sa" 'usuario que fue creado para accesar la base de datos
strSQLDBPassword = "" 'password que fue creado para accesar la base de datos
strSQLDBName = "MIBASESQL" 'nombre de la base de datos creada a mano
'nota:
'optimisado para SQL OLE DB Driver
'si usa sistemas DSN para conectar la SQL Server database la performance es menor
'SQL Server OLE Driver
VARconnString = "Provider=SQLOLEDB;Server=" & strSQLServerName & ";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"
%>

LUEGO DEFAULT.ASP

<% Option Explicit %>

<%
Response.Buffer = False
%>
<html>
<head>
<title>MI PAGINA</title>

</head>
<body bgcolor="#FFFF00" text="#333333">
<table width="40%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td align="center">MI PAGINA</td>
</tr>
</table>

<table width="50%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td><font face="Verdana, Arial, Helvetica, sans-serif" size="2"> 
<%
Dim adoCon 'variable coneccion a base de datos
Dim VARconnString 'driver, path y nombre de la base de datos
Dim strSQL 'query de la base de datos
Dim intBadWordLoopCounter 'filtraje a db contador
Dim blnErrorOccured 'vuelva a true si un error ocurre
'resumen sobre todos los errores
On Error Resume Next
'inicializa variable
blnErrorOccured = False
'evalua que no este en blanco
If NOT Request.Form("name") = "" Then 'SI TUBIERAS UN FORM
Set adoCon = Server.CreateObject("ADODB.Connection")
VARconnString = "Provider=SQLOLEDB;Server=" & strSQLServerName & ";User ID=" & Request.Form("name") & ";Password=" & Request.Form("password") & ";Database=" & strSQLDBName & ";"
adoCon.Open VARconnString