Error al conectarme desde mi pagina a mi base mysql

Probá esta conexion y fijate si funciona:

<%
on error resume next
dim adoRS
dim adoConn

set adoConn = Server.CreateObject("ADODB.Connection")
set adoRS = Server.CreateObject("ADODB.Recordset")

adoConn.Open "Provider=XXX.XXX.XXX.XXX;3306;" & _
"Data Source=basededatos;" & _
"User Id=userid;" & _
"Password=password"

if adoConn.errors.count = 0 then
response.write "OK"
else
response.write "ERROR"
end if
%>

O fihate haciendo un telnet a esa ip y ese puerto si te responde, o si
haciendo un ping te respondetenes acceso al server? Estás en la misma
red?

FF
www.francofigun.com.ar
www.microsofties.com.ar
MSN:
UIN: 305336919
Yahoo MSN:

"Ivan Díaz" escribió en el mensaje
news:%23KoCP$$

Buenas!!

Soy nuevo con mysql, no tengo mucha idea lo poco que he hecho ha sido con
manuales y ejemplos de páginas web, pero me da un error y no se si es por
los permisos o por que, os lo explico y me hechais una mano porque seguro
que es una novatada lo que toy haciendo.Mi codigo de conexion es el
siguiente,

dim conn
dim conn_string
conn_string >

"Driver={MySQL};Server2.168.1.103;Port306;Database=etsedi;Uid=root;Pwd> "

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open(conn_string)
strQuery = "SELECT * FROM etsedi"
Set rsdiaz = conn.Execute(strQuery) (linea 17)
el error es el siguiente:

ADODB.Connection.1 error '80004005'

SQLState: S1000
Native Error Code: 2003
[TCX][MyODBC]Can't connect to MySQL server on '192.168.1.103' (115)


/codigo5.asp, line 17

Mister!!!

me funciono muchas gracias,el server esta en la misma red, una ulima duda
xq ahora no me va las consultas, mi codgo es este, antes tenia rsdiaz pra
referirme a la base de datos,
if scodigo <> 0 then
for x=1 to 8
scon=(num&x&"")
rsdiaz.movefirst
response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
z=0
do while not rsdiaz.eof
numdos = eval(scon)
if numdos = rsdiaz("codigo") then
if x=1 then
response.Write("<td><strong>primera</strong>:"&rsdiaz("primera")&"</td>")
response.Write("<td><strong>segunda</strong>:"&rsdiaz("segunda")& "</td>")
txt1=rsdiaz("primera")
txt2=rsdiaz("segunda")

ahora para referirme a ella?? tengo q usar adoRS??, xq se me pasa de tiempo

Active Server Pages error 'ASP 0113'
Script timed out

/codigo5.asp

The maximum amount of time for a script to execute was exceeded. You can
change this limit by specifying a new value for the property
Server.ScriptTimeOut or by changing the value in the ASP administration
tools.