ayuda con provider

Gracias miguel!!

Me vino a la perfección, pero no se porque han venido esos fallos, de modo
local no me pasaban y en internet si, sabes porque puede ser? es la primera
vez que subo una página en asp y me esta pillando por todos lados


Microsoft VBScript runtime error '800a01a8'
Object required: 'driver={MySQL ODBC 3'

/codigo5.asp, line 51



for x=1 to 8
scon=(scodigo&x&"")

response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
z=0
%>
<script language="JavaScript" type="text/JavaScript">
alert("llega")
</script>
<%
while not rs.eof *** linea 51***
scon = eval(scon)
if scon = rs("codigo") then
if x=1 then
response.Write("<td><strong>primera</strong>:"&rs("primera")&"</td>")
response.Write("<td><strong>segunda</strong>:"&rs("segunda")& "</td>")
txt1=rs("primera")
txt2=rs("segunda")
end if

"Miguel González" escribió en el mensaje
news:

Hola Ivan, se me ocurren los siguientes pasos:

1) Cabe repasar el formulario de envio (el origen del dato que falta), no
sea que el dato no se esté enviando.

2) Ya que utilizas el método "GET", Verifica que en la URL de envio, la

que

llama a la pagina ASP, exista el dato "textcodigo=algo".

3) Si existe el dato, intenta mostrarlo al principio de la página ASP:

<%Response.Write Request.QueryString("textcodigo")%>

4) En vez de "Eval()", utiliza:

<%scodigo = CStr(scodigo)%>

Prueba a ver si así se soluciona.

Saludos!
Miguel



"Ivan" escribió en el mensaje
news:
> Hola Miguel!
>
> No me coje el valor, el formulario lo envio en metodo get, tengo ese
método
> en las otras páginas pero solo me da error en esta, si le meto el valor

a

> mano si me lo escribe, es un poco raro no??he mirado todo la verda, si

es

en
> la linea del eval() el error y al poner response.write(scodigo) no me

hace

> nada
>
>
>
> "Miguel González" escribió en el mensaje
> news:
> > Hola Ivan!
> >
> > Cuál es la línea 39?
> >
> > Por el error que envias parece ser la que contiene la función

"Eval()".

Es
> > posible que el dato que pasas en la variable "scodigo" no pueda ser
> evaluado
> > apropiadamente. Haz un "<%Response.Write scodigo%>" a ver que es lo

que

> > contiene la variable.
> >
> > Saludos!
> > Miguel
> >
> >
> > "Ivan" escribió en el mensaje
> > news:%23UfsA%
> > > Hola Miguel
> > >
> > > Ya esta miguel se conecta, haciendo la prueba del "Test Data Source"
al
> > > final salio, el usuario no era root, muchas gracias por todo te has
> > portado,
> > > pero si me haces un ultima favor, me da en la linea 39 este fallo:
> > >
> > >
> > > Microsoft VBScript runtime error '800a000d'
> > >
> > > Type mismatch: '[undefined]'
> > >
> > > /codigo5.asp, line 39
> > >
> > >
> > >
> > > y este es el codigo, te pongo el de conexion pero no creo q sea eso,
no
> > > entiendo xq en mi ordenador si me iba
> > >
> > > strcon = "driver={MySQL ODBC 3.51
> > > Driver};server=localhost;uid=ODBC;pwd=;database=test;option387"
> > > Set rs = Server.CreateObject("ADODB.Connection")
> > > rs.ConnectionTimeout(0
> > > rs.CommandTimeout`
> > > rs.Open strcon
> > >
> > > num = eval(scodigo)
> > > response.write(textos)
> > > texto=textos
> > >
> > > Gracias
> > >
> > > "Miguel González" escribió en el mensaje
> > > news:#
> > > > Hola Ivan.
> > > >
> > > > ¿Has probado el DSN desde el Administrador de DSN?
> > > >
> > > > Si mal no recuerdo hay un boton "Test Data Source" o algo así...
> > > >
> > > > Con ello puedes verificar si la conexión a la DB es correcta y
deducir
> > si
> > > es
> > > > un problema del servidor Web o propiamente de la Conexión a la DB.
> > > >
> > > > Otra cosa, ¿en tu cadena de conexión utilizas la DB llamada

"test"?.

> Si
> > es
> > > > otra base de datos deberías corregir este dato.
> > > >
> > > > También otra cosa, por la forma de conectarte, parece que usas un
DSN
> de
> > > > usuario, pero si estas usando un DSN de sistema, la forma de
referirse
> > al
> > > > mismo en ASP es:
> > > >
> > > > <%
> > > > Set strcon = Server.CreateObject("ADODB.Connection")
> > > > strcon.Open nombreDSNdeSistema
> > > > %>
> > > >
> > > > Prueba a ver, ahora tengo que irme. Mañana me dices.
> > > >
> > > > Suerte!
> > > >
> > > > Saludos!
> > > > Miguel
> > > >
> > > >
> > > > "Ivan" escribió en el mensaje
> > > > news:%
> > > > > Hola Miguel!!
> > > > >
> > > > > Me as devuelto la ilusion!!Ahora por lo menos contacta con ella,
> solo
> > > que
> > > > el
> > > > > usuario root tiene acceso denegado, y e puesto ese usuario en
system
> > dns
> > > > > como user, contraseña tb y le pongo la misma en la conexion y
> > localhost,
> > > > > pero me da este error:
> > > > >
> > > > > ADODB.Connection.1 error '80004005'
> > > > > SQLState: S1000
> > > > > Native Error Code: 1045
> > > > > [TCX][MyODBC]Access denied for user: '' (Using
> password:
> > > > YES)
> > > > >
> > > > >
> > > > > /codigo5.asp, line 31
> > > > >
> > > > > y yo tengo puesto esto
> > > > >
> > > > > strcon = "driver={MySQL ODBC 3.51
> > > > >
> Driver};server=localhost;uid=root;pwdE43;database=test;option387"
> > > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > > rs.ConnectionTimeout(0
> > > > > rs.CommandTimeout`
> > > > > rs.Open strcon
> > > > >
> > > > >
> > > > > SQL="SELECT * FROM etsedi"
> > > > > oConn.Open SQL, oConn,1,3
> > > > >
> > > > >
> > > > >
> > > > > "Miguel González" escribió en el mensaje
> > > > > news:
> > > > > > Hola Ivan!
> > > > > >
> > > > > > Por lo que veo usas MySql.
> > > > > >
> > > > > > ¿Tienes instalado el correspondiente conector ODBC para este
tipo
> de
> > > > base
> > > > > de
> > > > > > datos?
> > > > > >
> > > > > > Si no lo tienes debes descargarlo desde:
> > > > > > http://www.mysql.com/products/connector/odbc/
> > > > > >
> > > > > > En la FAQ de ODBC de MySql encontrarás más info sobre el tema:
> > > > > > http://dev.mysql.com/doc/connector/...faq_3.html
> > > > > >
> > > > > > Saludos!
> > > > > > Miguel
> > > > > >
> > > > > >
> > > > > > "Ivan Díaz" escribió en el mensaje
> > > > > > news:
> > > > > > >
> > > > > > > Hola jefes!!
> > > > > > >
> > > > > > > Me esta dando este error continuamente, el provider no se
donde
> > > > ponerlo,
> > > > > > es
> > > > > > > que la verdad, o no se para que vale, o también creo que yo

no

> > > tengo,
> > > > mi
> > > > > > > base de datos esta en mi servidor y quiero cogerla de el,
ademas
> > > esta
> > > > en
> > > > > > la
> > > > > > > unidad f: no en la c: que me aconsejais??Este es el codigo y
el
> > > error
> > > > > > >
> > > > > > > dim rs
> > > > > > >
> > > > > > > dim oConn
> > > > > > >
> > > > > > > Set oConn = Server.CreateObject("ADODB.Connection")
> > > > > > >
> > > > > > > set rs = Server.CreateObject("ADODB.Recordset")
> > > > > > >
> > > > > > > oConn.Open "provider=F:\\mysql\data\etsedi\etsedi.frm;" & _
> > > > ****linea
> > > > > > > 31****
> > > > > > >
> > > > > > > "data source2.168.1.100;" & _
> > > > > > >
> > > > > > > "initial catalog=etsedi;" & _
> > > > > > >
> > > > > > > "user id=root;" & _
> > > > > > >
> > > > > > > "passwordE43;"
> > > > > > >
> > > > > > > SQL="SELECT * FROM etsedi"
> > > > > > >
> > > > > > > oConn.Open SQL, oConn,1,3
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > Tipo de error:
> > > > > > > ADODB.Connection (0x800A0E7A)
> > > > > > > Provider cannot be found. It may not be properly installed.
> > > > > > > /etsedi/TMP5iu7qxyepi.asp, line 31
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > > >
> > > >
> > >
> > >
> >
>
>

Jejeje... nos pasa a todos Ivan... es la "Ley de Murphy"!

En este tema intervienen muchos factores, configuración del servidor web,
restricciones del proveedor, etc. Siempre hay que hacer ajustes de última
hora. Con práctica se reducen mucho, pero no por completo... en fin. Suerte!

Saludos!
Miguel


"Ivan" escribió en el mensaje
news:

Gracias miguel!!

Me vino a la perfección, pero no se porque han venido esos fallos, de modo
local no me pasaban y en internet si, sabes porque puede ser? es la

primera

vez que subo una página en asp y me esta pillando por todos lados


Microsoft VBScript runtime error '800a01a8'
Object required: 'driver={MySQL ODBC 3'

/codigo5.asp, line 51



for x=1 to 8
scon=(scodigo&x&"")

response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
z=0
%>
<script language="JavaScript" type="text/JavaScript">
alert("llega")
</script>
<%
while not rs.eof *** linea 51***
scon = eval(scon)
if scon = rs("codigo") then
if x=1 then
response.Write("<td><strong>primera</strong>:"&rs("primera")&"</td>")
response.Write("<td><strong>segunda</strong>:"&rs("segunda")& "</td>")
txt1=rs("primera")
txt2=rs("segunda")
end if

"Miguel González" escribió en el mensaje
news:
> Hola Ivan, se me ocurren los siguientes pasos:
>
> 1) Cabe repasar el formulario de envio (el origen del dato que falta),

no

> sea que el dato no se esté enviando.
>
> 2) Ya que utilizas el método "GET", Verifica que en la URL de envio, la
que
> llama a la pagina ASP, exista el dato "textcodigo=algo".
>
> 3) Si existe el dato, intenta mostrarlo al principio de la página ASP:
>
> <%Response.Write Request.QueryString("textcodigo")%>
>
> 4) En vez de "Eval()", utiliza:
>
> <%scodigo = CStr(scodigo)%>
>
> Prueba a ver si así se soluciona.
>
> Saludos!
> Miguel
>
>
>
> "Ivan" escribió en el mensaje
> news:
> > Hola Miguel!
> >
> > No me coje el valor, el formulario lo envio en metodo get, tengo ese
> método
> > en las otras páginas pero solo me da error en esta, si le meto el

valor

a
> > mano si me lo escribe, es un poco raro no??he mirado todo la verda, si
es
> en
> > la linea del eval() el error y al poner response.write(scodigo) no me
hace
> > nada
> >
> >
> >
> > "Miguel González" escribió en el mensaje
> > news:
> > > Hola Ivan!
> > >
> > > Cuál es la línea 39?
> > >
> > > Por el error que envias parece ser la que contiene la función
"Eval()".
> Es
> > > posible que el dato que pasas en la variable "scodigo" no pueda ser
> > evaluado
> > > apropiadamente. Haz un "<%Response.Write scodigo%>" a ver que es lo
que
> > > contiene la variable.
> > >
> > > Saludos!
> > > Miguel
> > >
> > >
> > > "Ivan" escribió en el mensaje
> > > news:%23UfsA%
> > > > Hola Miguel
> > > >
> > > > Ya esta miguel se conecta, haciendo la prueba del "Test Data

Source"

> al
> > > > final salio, el usuario no era root, muchas gracias por todo te

has

> > > portado,
> > > > pero si me haces un ultima favor, me da en la linea 39 este fallo:
> > > >
> > > >
> > > > Microsoft VBScript runtime error '800a000d'
> > > >
> > > > Type mismatch: '[undefined]'
> > > >
> > > > /codigo5.asp, line 39
> > > >
> > > >
> > > >
> > > > y este es el codigo, te pongo el de conexion pero no creo q sea

eso,

> no
> > > > entiendo xq en mi ordenador si me iba
> > > >
> > > > strcon = "driver={MySQL ODBC 3.51
> > > > Driver};server=localhost;uid=ODBC;pwd=;database=test;option387"
> > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > rs.ConnectionTimeout(0
> > > > rs.CommandTimeout`
> > > > rs.Open strcon
> > > >
> > > > num = eval(scodigo)
> > > > response.write(textos)
> > > > texto=textos
> > > >
> > > > Gracias
> > > >
> > > > "Miguel González" escribió en el mensaje
> > > > news:#
> > > > > Hola Ivan.
> > > > >
> > > > > ¿Has probado el DSN desde el Administrador de DSN?
> > > > >
> > > > > Si mal no recuerdo hay un boton "Test Data Source" o algo así...
> > > > >
> > > > > Con ello puedes verificar si la conexión a la DB es correcta y
> deducir
> > > si
> > > > es
> > > > > un problema del servidor Web o propiamente de la Conexión a la

DB.

> > > > >
> > > > > Otra cosa, ¿en tu cadena de conexión utilizas la DB llamada
"test"?.
> > Si
> > > es
> > > > > otra base de datos deberías corregir este dato.
> > > > >
> > > > > También otra cosa, por la forma de conectarte, parece que usas

un

> DSN
> > de
> > > > > usuario, pero si estas usando un DSN de sistema, la forma de
> referirse
> > > al
> > > > > mismo en ASP es:
> > > > >
> > > > > <%
> > > > > Set strcon = Server.CreateObject("ADODB.Connection")
> > > > > strcon.Open nombreDSNdeSistema
> > > > > %>
> > > > >
> > > > > Prueba a ver, ahora tengo que irme. Mañana me dices.
> > > > >
> > > > > Suerte!
> > > > >
> > > > > Saludos!
> > > > > Miguel
> > > > >
> > > > >
> > > > > "Ivan" escribió en el mensaje
> > > > > news:%
> > > > > > Hola Miguel!!
> > > > > >
> > > > > > Me as devuelto la ilusion!!Ahora por lo menos contacta con

ella,

> > solo
> > > > que
> > > > > el
> > > > > > usuario root tiene acceso denegado, y e puesto ese usuario en
> system
> > > dns
> > > > > > como user, contraseña tb y le pongo la misma en la conexion y
> > > localhost,
> > > > > > pero me da este error:
> > > > > >
> > > > > > ADODB.Connection.1 error '80004005'
> > > > > > SQLState: S1000
> > > > > > Native Error Code: 1045
> > > > > > [TCX][MyODBC]Access denied for user: '' (Using
> > password:
> > > > > YES)
> > > > > >
> > > > > >
> > > > > > /codigo5.asp, line 31
> > > > > >
> > > > > > y yo tengo puesto esto
> > > > > >
> > > > > > strcon = "driver={MySQL ODBC 3.51
> > > > > >
> > Driver};server=localhost;uid=root;pwdE43;database=test;option387"
> > > > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > > > rs.ConnectionTimeout(0
> > > > > > rs.CommandTimeout`
> > > > > > rs.Open strcon
> > > > > >
> > > > > >
> > > > > > SQL="SELECT * FROM etsedi"
> > > > > > oConn.Open SQL, oConn,1,3
> > > > > >
> > > > > >
> > > > > >
> > > > > > "Miguel González" escribió en el mensaje
> > > > > > news:
> > > > > > > Hola Ivan!
> > > > > > >
> > > > > > > Por lo que veo usas MySql.
> > > > > > >
> > > > > > > ¿Tienes instalado el correspondiente conector ODBC para este
> tipo
> > de
> > > > > base
> > > > > > de
> > > > > > > datos?
> > > > > > >
> > > > > > > Si no lo tienes debes descargarlo desde:
> > > > > > > http://www.mysql.com/products/connector/odbc/
> > > > > > >
> > > > > > > En la FAQ de ODBC de MySql encontrarás más info sobre el

tema:

> > > > > > > http://dev.mysql.com/doc/connector/...faq_3.html
> > > > > > >
> > > > > > > Saludos!
> > > > > > > Miguel
> > > > > > >
> > > > > > >
> > > > > > > "Ivan Díaz" escribió en el mensaje
> > > > > > > news:
> > > > > > > >
> > > > > > > > Hola jefes!!
> > > > > > > >
> > > > > > > > Me esta dando este error continuamente, el provider no se
> donde
> > > > > ponerlo,
> > > > > > > es
> > > > > > > > que la verdad, o no se para que vale, o también creo que

yo

no
> > > > tengo,
> > > > > mi
> > > > > > > > base de datos esta en mi servidor y quiero cogerla de el,
> ademas
> > > > esta
> > > > > en
> > > > > > > la
> > > > > > > > unidad f: no en la c: que me aconsejais??Este es el codigo

y

> el
> > > > error
> > > > > > > >
> > > > > > > > dim rs
> > > > > > > >
> > > > > > > > dim oConn
> > > > > > > >
> > > > > > > > Set oConn = Server.CreateObject("ADODB.Connection")
> > > > > > > >
> > > > > > > > set rs = Server.CreateObject("ADODB.Recordset")
> > > > > > > >
> > > > > > > > oConn.Open "provider=F:\\mysql\data\etsedi\etsedi.frm;" &

_

> > > > > ****linea
> > > > > > > > 31****
> > > > > > > >
> > > > > > > > "data source2.168.1.100;" & _
> > > > > > > >
> > > > > > > > "initial catalog=etsedi;" & _
> > > > > > > >
> > > > > > > > "user id=root;" & _
> > > > > > > >
> > > > > > > > "passwordE43;"
> > > > > > > >
> > > > > > > > SQL="SELECT * FROM etsedi"
> > > > > > > >
> > > > > > > > oConn.Open SQL, oConn,1,3
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > > Tipo de error:
> > > > > > > > ADODB.Connection (0x800A0E7A)
> > > > > > > > Provider cannot be found. It may not be properly

installed.

> > > > > > > > /etsedi/TMP5iu7qxyepi.asp, line 31
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > > >
> > > > >
> > > >
> > > >
> > >
> >
> >
>

Miguel una ultima ayuda,
el rs.movefirst y do while no rs.eof no me funcionan me da error, me da a mi
que la conexion con la tabla no anda muy fina, puede ser de eso no??

Microsoft VBScript runtime error '800a01b6'
Object doesn't support this property or method: 'moveFirst'

/codigo5.asp, line 43



codigo:

dim num
dim scodigo
dim textos
dim numdos
dim strcon
dim rs
dim x
Request.ServerVariables("QUERY_STRING")
scodigo= request.QueryString("textcodigo")
textos= request.QueryString("texto")
response.Write(scodigo)
Server.ScriptTimeout 0


strcon = "driver={MySQL ODBC 3.51
Driver};server=localhost;uid=ODBC;pwd=;database=test;option387"
Set rs = Server.CreateObject("ADODB.Connection")
rs.ConnectionTimeout(0
rs.CommandTimeout`
rs.Open strcon


response.write(textos)
texto=textos
%>





</p><table width="75%" border="1"><%
if scodigo <> 0 then
%>
<script language="JavaScript" type="text/JavaScript">
alert("llega1")
</script>

<%
for x=1 to 8
scon=(scodigo&x&"")
rs.moveFirst ***linea 43 ***
response.Write(scon)
response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
z=0




"Miguel González" escribió en el mensaje
news:

Jejeje... nos pasa a todos Ivan... es la "Ley de Murphy"!

En este tema intervienen muchos factores, configuración del servidor web,
restricciones del proveedor, etc. Siempre hay que hacer ajustes de última
hora. Con práctica se reducen mucho, pero no por completo... en fin.

Suerte!

Saludos!
Miguel


"Ivan" escribió en el mensaje
news:
> Gracias miguel!!
>
> Me vino a la perfección, pero no se porque han venido esos fallos, de

modo

> local no me pasaban y en internet si, sabes porque puede ser? es la
primera
> vez que subo una página en asp y me esta pillando por todos lados
>
>
> Microsoft VBScript runtime error '800a01a8'
> Object required: 'driver={MySQL ODBC 3'
>
> /codigo5.asp, line 51
>
>
>
> for x=1 to 8
> scon=(scodigo&x&"")
>
> response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
> z=0
> %>
> <script language="JavaScript" type="text/JavaScript">
> alert("llega")
> </script>
> <%
> while not rs.eof *** linea 51***
> scon = eval(scon)
> if scon = rs("codigo") then
> if x=1 then
> response.Write("<td><strong>primera</strong>:"&rs("primera")&"</td>")
> response.Write("<td><strong>segunda</strong>:"&rs("segunda")& "</td>")
> txt1=rs("primera")
> txt2=rs("segunda")
> end if
>
> "Miguel González" escribió en el mensaje
> news:
> > Hola Ivan, se me ocurren los siguientes pasos:
> >
> > 1) Cabe repasar el formulario de envio (el origen del dato que falta),
no
> > sea que el dato no se esté enviando.
> >
> > 2) Ya que utilizas el método "GET", Verifica que en la URL de envio,

la

> que
> > llama a la pagina ASP, exista el dato "textcodigo=algo".
> >
> > 3) Si existe el dato, intenta mostrarlo al principio de la página ASP:
> >
> > <%Response.Write Request.QueryString("textcodigo")%>
> >
> > 4) En vez de "Eval()", utiliza:
> >
> > <%scodigo = CStr(scodigo)%>
> >
> > Prueba a ver si así se soluciona.
> >
> > Saludos!
> > Miguel
> >
> >
> >
> > "Ivan" escribió en el mensaje
> > news:
> > > Hola Miguel!
> > >
> > > No me coje el valor, el formulario lo envio en metodo get, tengo ese
> > método
> > > en las otras páginas pero solo me da error en esta, si le meto el
valor
> a
> > > mano si me lo escribe, es un poco raro no??he mirado todo la verda,

si

> es
> > en
> > > la linea del eval() el error y al poner response.write(scodigo) no

me

> hace
> > > nada
> > >
> > >
> > >
> > > "Miguel González" escribió en el mensaje
> > > news:
> > > > Hola Ivan!
> > > >
> > > > Cuál es la línea 39?
> > > >
> > > > Por el error que envias parece ser la que contiene la función
> "Eval()".
> > Es
> > > > posible que el dato que pasas en la variable "scodigo" no pueda

ser

> > > evaluado
> > > > apropiadamente. Haz un "<%Response.Write scodigo%>" a ver que es

lo

> que
> > > > contiene la variable.
> > > >
> > > > Saludos!
> > > > Miguel
> > > >
> > > >
> > > > "Ivan" escribió en el mensaje
> > > > news:%23UfsA%
> > > > > Hola Miguel
> > > > >
> > > > > Ya esta miguel se conecta, haciendo la prueba del "Test Data
Source"
> > al
> > > > > final salio, el usuario no era root, muchas gracias por todo te
has
> > > > portado,
> > > > > pero si me haces un ultima favor, me da en la linea 39 este

fallo:

> > > > >
> > > > >
> > > > > Microsoft VBScript runtime error '800a000d'
> > > > >
> > > > > Type mismatch: '[undefined]'
> > > > >
> > > > > /codigo5.asp, line 39
> > > > >
> > > > >
> > > > >
> > > > > y este es el codigo, te pongo el de conexion pero no creo q sea
eso,
> > no
> > > > > entiendo xq en mi ordenador si me iba
> > > > >
> > > > > strcon = "driver={MySQL ODBC 3.51
> > > > >

Driver};server=localhost;uid=ODBC;pwd=;database=test;option387"

> > > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > > rs.ConnectionTimeout(0
> > > > > rs.CommandTimeout`
> > > > > rs.Open strcon
> > > > >
> > > > > num = eval(scodigo)
> > > > > response.write(textos)
> > > > > texto=textos
> > > > >
> > > > > Gracias
> > > > >
> > > > > "Miguel González" escribió en el mensaje
> > > > > news:#
> > > > > > Hola Ivan.
> > > > > >
> > > > > > ¿Has probado el DSN desde el Administrador de DSN?
> > > > > >
> > > > > > Si mal no recuerdo hay un boton "Test Data Source" o algo

así...

> > > > > >
> > > > > > Con ello puedes verificar si la conexión a la DB es correcta y
> > deducir
> > > > si
> > > > > es
> > > > > > un problema del servidor Web o propiamente de la Conexión a la
DB.
> > > > > >
> > > > > > Otra cosa, ¿en tu cadena de conexión utilizas la DB llamada
> "test"?.
> > > Si
> > > > es
> > > > > > otra base de datos deberías corregir este dato.
> > > > > >
> > > > > > También otra cosa, por la forma de conectarte, parece que usas
un
> > DSN
> > > de
> > > > > > usuario, pero si estas usando un DSN de sistema, la forma de
> > referirse
> > > > al
> > > > > > mismo en ASP es:
> > > > > >
> > > > > > <%
> > > > > > Set strcon = Server.CreateObject("ADODB.Connection")
> > > > > > strcon.Open nombreDSNdeSistema
> > > > > > %>
> > > > > >
> > > > > > Prueba a ver, ahora tengo que irme. Mañana me dices.
> > > > > >
> > > > > > Suerte!
> > > > > >
> > > > > > Saludos!
> > > > > > Miguel
> > > > > >
> > > > > >
> > > > > > "Ivan" escribió en el mensaje
> > > > > > news:%
> > > > > > > Hola Miguel!!
> > > > > > >
> > > > > > > Me as devuelto la ilusion!!Ahora por lo menos contacta con
ella,
> > > solo
> > > > > que
> > > > > > el
> > > > > > > usuario root tiene acceso denegado, y e puesto ese usuario

en

> > system
> > > > dns
> > > > > > > como user, contraseña tb y le pongo la misma en la conexion

y

> > > > localhost,
> > > > > > > pero me da este error:
> > > > > > >
> > > > > > > ADODB.Connection.1 error '80004005'
> > > > > > > SQLState: S1000
> > > > > > > Native Error Code: 1045
> > > > > > > [TCX][MyODBC]Access denied for user: '' (Using
> > > password:
> > > > > > YES)
> > > > > > >
> > > > > > >
> > > > > > > /codigo5.asp, line 31
> > > > > > >
> > > > > > > y yo tengo puesto esto
> > > > > > >
> > > > > > > strcon = "driver={MySQL ODBC 3.51
> > > > > > >
> > >

Driver};server=localhost;uid=root;pwdE43;database=test;option387"

> > > > > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > > > > rs.ConnectionTimeout(0
> > > > > > > rs.CommandTimeout`
> > > > > > > rs.Open strcon
> > > > > > >
> > > > > > >
> > > > > > > SQL="SELECT * FROM etsedi"
> > > > > > > oConn.Open SQL, oConn,1,3
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > "Miguel González" escribió en el mensaje
> > > > > > > news:
> > > > > > > > Hola Ivan!
> > > > > > > >
> > > > > > > > Por lo que veo usas MySql.
> > > > > > > >
> > > > > > > > ¿Tienes instalado el correspondiente conector ODBC para

este

> > tipo
> > > de
> > > > > > base
> > > > > > > de
> > > > > > > > datos?
> > > > > > > >
> > > > > > > > Si no lo tienes debes descargarlo desde:
> > > > > > > > http://www.mysql.com/products/connector/odbc/
> > > > > > > >
> > > > > > > > En la FAQ de ODBC de MySql encontrarás más info sobre el
tema:
> > > > > > > > http://dev.mysql.com/doc/connector/...faq_3.html
> > > > > > > >
> > > > > > > > Saludos!
> > > > > > > > Miguel
> > > > > > > >
> > > > > > > >
> > > > > > > > "Ivan Díaz" escribió en el

mensaje

> > > > > > > > news:
> > > > > > > > >
> > > > > > > > > Hola jefes!!
> > > > > > > > >
> > > > > > > > > Me esta dando este error continuamente, el provider no

se

> > donde
> > > > > > ponerlo,
> > > > > > > > es
> > > > > > > > > que la verdad, o no se para que vale, o también creo que
yo
> no
> > > > > tengo,
> > > > > > mi
> > > > > > > > > base de datos esta en mi servidor y quiero cogerla de

el,

> > ademas
> > > > > esta
> > > > > > en
> > > > > > > > la
> > > > > > > > > unidad f: no en la c: que me aconsejais??Este es el

codigo

y
> > el
> > > > > error
> > > > > > > > >
> > > > > > > > > dim rs
> > > > > > > > >
> > > > > > > > > dim oConn
> > > > > > > > >
> > > > > > > > > Set oConn = Server.CreateObject("ADODB.Connection")
> > > > > > > > >
> > > > > > > > > set rs = Server.CreateObject("ADODB.Recordset")
> > > > > > > > >
> > > > > > > > > oConn.Open "provider=F:\\mysql\data\etsedi\etsedi.frm;"

&

_
> > > > > > ****linea
> > > > > > > > > 31****
> > > > > > > > >
> > > > > > > > > "data source2.168.1.100;" & _
> > > > > > > > >
> > > > > > > > > "initial catalog=etsedi;" & _
> > > > > > > > >
> > > > > > > > > "user id=root;" & _
> > > > > > > > >
> > > > > > > > > "passwordE43;"
> > > > > > > > >
> > > > > > > > > SQL="SELECT * FROM etsedi"
> > > > > > > > >
> > > > > > > > > oConn.Open SQL, oConn,1,3
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > Tipo de error:
> > > > > > > > > ADODB.Connection (0x800A0E7A)
> > > > > > > > > Provider cannot be found. It may not be properly
installed.
> > > > > > > > > /etsedi/TMP5iu7qxyepi.asp, line 31
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > > >
> > > >
> > >
> > >
> >
>
>

Hola Ivan!

Es posible que la consulta a la tabla no esté devolviendo registros...

(Postea el SQL que procesas)

Siempre es recomendable verificar que el "recordset" no esté vacío. Yo suelo
utilizar el siguiente esquema:

<%
If rs.RecordCount > 0 Then
rs.MoveFirst
Do While Not rs.EOF
' Aqui proceso los registros
rs.MoveNext
Loop
Else
Response.Write "No hay datos"
End If
%>

Intenta "capturar" si está vacío el "recordset". Si hay datos en la tabla ya
tienes delimitado el problema:

a) El SQL no está construido adecuadamente para mostrarlos.

ó

b) Las opciones de apertura del "recordset" impiden que pueda ser recorrido.

Saludos!
Miguel


"Ivan" escribió en el mensaje
news:

Miguel una ultima ayuda,
el rs.movefirst y do while no rs.eof no me funcionan me da error, me da a

mi

que la conexion con la tabla no anda muy fina, puede ser de eso no??

Microsoft VBScript runtime error '800a01b6'
Object doesn't support this property or method: 'moveFirst'

/codigo5.asp, line 43



codigo:

dim num
dim scodigo
dim textos
dim numdos
dim strcon
dim rs
dim x
Request.ServerVariables("QUERY_STRING")
scodigo= request.QueryString("textcodigo")
textos= request.QueryString("texto")
response.Write(scodigo)
Server.ScriptTimeout 0


strcon = "driver={MySQL ODBC 3.51
Driver};server=localhost;uid=ODBC;pwd=;database=test;option387"
Set rs = Server.CreateObject("ADODB.Connection")
rs.ConnectionTimeout(0
rs.CommandTimeout`
rs.Open strcon


response.write(textos)
texto=textos
%>





</p><table width="75%" border="1"><%
if scodigo <> 0 then
%>
<script language="JavaScript" type="text/JavaScript">
alert("llega1")
</script>

<%
for x=1 to 8
scon=(scodigo&x&"")
rs.moveFirst ***linea 43 ***
response.Write(scon)
response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
z=0




"Miguel González" escribió en el mensaje
news:
> Jejeje... nos pasa a todos Ivan... es la "Ley de Murphy"!
>
> En este tema intervienen muchos factores, configuración del servidor

web,

> restricciones del proveedor, etc. Siempre hay que hacer ajustes de

última

> hora. Con práctica se reducen mucho, pero no por completo... en fin.
Suerte!
>
> Saludos!
> Miguel
>
>
> "Ivan" escribió en el mensaje
> news:
> > Gracias miguel!!
> >
> > Me vino a la perfección, pero no se porque han venido esos fallos, de
modo
> > local no me pasaban y en internet si, sabes porque puede ser? es la
> primera
> > vez que subo una página en asp y me esta pillando por todos lados
> >
> >
> > Microsoft VBScript runtime error '800a01a8'
> > Object required: 'driver={MySQL ODBC 3'
> >
> > /codigo5.asp, line 51
> >
> >
> >
> > for x=1 to 8
> > scon=(scodigo&x&"")
> >
> > response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
> > z=0
> > %>
> > <script language="JavaScript" type="text/JavaScript">
> > alert("llega")
> > </script>
> > <%
> > while not rs.eof *** linea 51***
> > scon = eval(scon)
> > if scon = rs("codigo") then
> > if x=1 then
> > response.Write("<td><strong>primera</strong>:"&rs("primera")&"</td>")
> > response.Write("<td><strong>segunda</strong>:"&rs("segunda")&

"</td>")

> > txt1=rs("primera")
> > txt2=rs("segunda")
> > end if
> >
> > "Miguel González" escribió en el mensaje
> > news:
> > > Hola Ivan, se me ocurren los siguientes pasos:
> > >
> > > 1) Cabe repasar el formulario de envio (el origen del dato que

falta),

> no
> > > sea que el dato no se esté enviando.
> > >
> > > 2) Ya que utilizas el método "GET", Verifica que en la URL de envio,
la
> > que
> > > llama a la pagina ASP, exista el dato "textcodigo=algo".
> > >
> > > 3) Si existe el dato, intenta mostrarlo al principio de la página

ASP:

> > >
> > > <%Response.Write Request.QueryString("textcodigo")%>
> > >
> > > 4) En vez de "Eval()", utiliza:
> > >
> > > <%scodigo = CStr(scodigo)%>
> > >
> > > Prueba a ver si así se soluciona.
> > >
> > > Saludos!
> > > Miguel
> > >
> > >
> > >
> > > "Ivan" escribió en el mensaje
> > > news:
> > > > Hola Miguel!
> > > >
> > > > No me coje el valor, el formulario lo envio en metodo get, tengo

ese

> > > método
> > > > en las otras páginas pero solo me da error en esta, si le meto el
> valor
> > a
> > > > mano si me lo escribe, es un poco raro no??he mirado todo la

verda,

si
> > es
> > > en
> > > > la linea del eval() el error y al poner response.write(scodigo) no
me
> > hace
> > > > nada
> > > >
> > > >
> > > >
> > > > "Miguel González" escribió en el mensaje
> > > > news:
> > > > > Hola Ivan!
> > > > >
> > > > > Cuál es la línea 39?
> > > > >
> > > > > Por el error que envias parece ser la que contiene la función
> > "Eval()".
> > > Es
> > > > > posible que el dato que pasas en la variable "scodigo" no pueda
ser
> > > > evaluado
> > > > > apropiadamente. Haz un "<%Response.Write scodigo%>" a ver que es
lo
> > que
> > > > > contiene la variable.
> > > > >
> > > > > Saludos!
> > > > > Miguel
> > > > >
> > > > >
> > > > > "Ivan" escribió en el mensaje
> > > > > news:%23UfsA%
> > > > > > Hola Miguel
> > > > > >
> > > > > > Ya esta miguel se conecta, haciendo la prueba del "Test Data
> Source"
> > > al
> > > > > > final salio, el usuario no era root, muchas gracias por todo

te

> has
> > > > > portado,
> > > > > > pero si me haces un ultima favor, me da en la linea 39 este
fallo:
> > > > > >
> > > > > >
> > > > > > Microsoft VBScript runtime error '800a000d'
> > > > > >
> > > > > > Type mismatch: '[undefined]'
> > > > > >
> > > > > > /codigo5.asp, line 39
> > > > > >
> > > > > >
> > > > > >
> > > > > > y este es el codigo, te pongo el de conexion pero no creo q

sea

> eso,
> > > no
> > > > > > entiendo xq en mi ordenador si me iba
> > > > > >
> > > > > > strcon = "driver={MySQL ODBC 3.51
> > > > > >
Driver};server=localhost;uid=ODBC;pwd=;database=test;option387"
> > > > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > > > rs.ConnectionTimeout(0
> > > > > > rs.CommandTimeout`
> > > > > > rs.Open strcon
> > > > > >
> > > > > > num = eval(scodigo)
> > > > > > response.write(textos)
> > > > > > texto=textos
> > > > > >
> > > > > > Gracias
> > > > > >
> > > > > > "Miguel González" escribió en el mensaje
> > > > > > news:#
> > > > > > > Hola Ivan.
> > > > > > >
> > > > > > > ¿Has probado el DSN desde el Administrador de DSN?
> > > > > > >
> > > > > > > Si mal no recuerdo hay un boton "Test Data Source" o algo
así...
> > > > > > >
> > > > > > > Con ello puedes verificar si la conexión a la DB es correcta

y

> > > deducir
> > > > > si
> > > > > > es
> > > > > > > un problema del servidor Web o propiamente de la Conexión a

la

> DB.
> > > > > > >
> > > > > > > Otra cosa, ¿en tu cadena de conexión utilizas la DB llamada
> > "test"?.
> > > > Si
> > > > > es
> > > > > > > otra base de datos deberías corregir este dato.
> > > > > > >
> > > > > > > También otra cosa, por la forma de conectarte, parece que

usas

> un
> > > DSN
> > > > de
> > > > > > > usuario, pero si estas usando un DSN de sistema, la forma de
> > > referirse
> > > > > al
> > > > > > > mismo en ASP es:
> > > > > > >
> > > > > > > <%
> > > > > > > Set strcon = Server.CreateObject("ADODB.Connection")
> > > > > > > strcon.Open nombreDSNdeSistema
> > > > > > > %>
> > > > > > >
> > > > > > > Prueba a ver, ahora tengo que irme. Mañana me dices.
> > > > > > >
> > > > > > > Suerte!
> > > > > > >
> > > > > > > Saludos!
> > > > > > > Miguel
> > > > > > >
> > > > > > >
> > > > > > > "Ivan" escribió en el mensaje
> > > > > > > news:%
> > > > > > > > Hola Miguel!!
> > > > > > > >
> > > > > > > > Me as devuelto la ilusion!!Ahora por lo menos contacta con
> ella,
> > > > solo
> > > > > > que
> > > > > > > el
> > > > > > > > usuario root tiene acceso denegado, y e puesto ese usuario
en
> > > system
> > > > > dns
> > > > > > > > como user, contraseña tb y le pongo la misma en la

conexion

y
> > > > > localhost,
> > > > > > > > pero me da este error:
> > > > > > > >
> > > > > > > > ADODB.Connection.1 error '80004005'
> > > > > > > > SQLState: S1000
> > > > > > > > Native Error Code: 1045
> > > > > > > > [TCX][MyODBC]Access denied for user: ''

(Using

> > > > password:
> > > > > > > YES)
> > > > > > > >
> > > > > > > >
> > > > > > > > /codigo5.asp, line 31
> > > > > > > >
> > > > > > > > y yo tengo puesto esto
> > > > > > > >
> > > > > > > > strcon = "driver={MySQL ODBC 3.51
> > > > > > > >
> > > >
Driver};server=localhost;uid=root;pwdE43;database=test;option387"
> > > > > > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > > > > > rs.ConnectionTimeout(0
> > > > > > > > rs.CommandTimeout`
> > > > > > > > rs.Open strcon
> > > > > > > >
> > > > > > > >
> > > > > > > > SQL="SELECT * FROM etsedi"
> > > > > > > > oConn.Open SQL, oConn,1,3
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > > "Miguel González" escribió en el

mensaje

> > > > > > > > news:
> > > > > > > > > Hola Ivan!
> > > > > > > > >
> > > > > > > > > Por lo que veo usas MySql.
> > > > > > > > >
> > > > > > > > > ¿Tienes instalado el correspondiente conector ODBC para
este
> > > tipo
> > > > de
> > > > > > > base
> > > > > > > > de
> > > > > > > > > datos?
> > > > > > > > >
> > > > > > > > > Si no lo tienes debes descargarlo desde:
> > > > > > > > > http://www.mysql.com/products/connector/odbc/
> > > > > > > > >
> > > > > > > > > En la FAQ de ODBC de MySql encontrarás más info sobre el
> tema:
> > > > > > > > > http://dev.mysql.com/doc/connector/...faq_3.html
> > > > > > > > >
> > > > > > > > > Saludos!
> > > > > > > > > Miguel
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > "Ivan Díaz" escribió en el
mensaje
> > > > > > > > > news:
> > > > > > > > > >
> > > > > > > > > > Hola jefes!!
> > > > > > > > > >
> > > > > > > > > > Me esta dando este error continuamente, el provider no
se
> > > donde
> > > > > > > ponerlo,
> > > > > > > > > es
> > > > > > > > > > que la verdad, o no se para que vale, o también creo

que

> yo
> > no
> > > > > > tengo,
> > > > > > > mi
> > > > > > > > > > base de datos esta en mi servidor y quiero cogerla de
el,
> > > ademas
> > > > > > esta
> > > > > > > en
> > > > > > > > > la
> > > > > > > > > > unidad f: no en la c: que me aconsejais??Este es el
codigo
> y
> > > el
> > > > > > error
> > > > > > > > > >
> > > > > > > > > > dim rs
> > > > > > > > > >
> > > > > > > > > > dim oConn
> > > > > > > > > >
> > > > > > > > > > Set oConn = Server.CreateObject("ADODB.Connection")
> > > > > > > > > >
> > > > > > > > > > set rs = Server.CreateObject("ADODB.Recordset")
> > > > > > > > > >
> > > > > > > > > > oConn.Open

"provider=F:\\mysql\data\etsedi\etsedi.frm;"

&
> _
> > > > > > > ****linea
> > > > > > > > > > 31****
> > > > > > > > > >
> > > > > > > > > > "data source2.168.1.100;" & _
> > > > > > > > > >
> > > > > > > > > > "initial catalog=etsedi;" & _
> > > > > > > > > >
> > > > > > > > > > "user id=root;" & _
> > > > > > > > > >
> > > > > > > > > > "passwordE43;"
> > > > > > > > > >
> > > > > > > > > > SQL="SELECT * FROM etsedi"
> > > > > > > > > >
> > > > > > > > > > oConn.Open SQL, oConn,1,3
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > Tipo de error:
> > > > > > > > > > ADODB.Connection (0x800A0E7A)
> > > > > > > > > > Provider cannot be found. It may not be properly
> installed.
> > > > > > > > > > /etsedi/TMP5iu7qxyepi.asp, line 31
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > > >
> > > > >
> > > >
> > > >
> > >
> >
> >
>

Hola Miguel!

Esa cadena esta muy fina, pero lo que me pasa que mi conexion con la tabla
no va(espero que sea la tabla) la he modificado y me dice que no existe

SQLState: S1000
Native Error Code: 1146
[TCX][MyODBC]Table 'test.etsedi' doesn't exist


"Miguel González" escribió en el mensaje
news:

Hola Ivan!

Es posible que la consulta a la tabla no esté devolviendo registros...

(Postea el SQL que procesas)

Siempre es recomendable verificar que el "recordset" no esté vacío. Yo

suelo

utilizar el siguiente esquema:

<%
If rs.RecordCount > 0 Then
rs.MoveFirst
Do While Not rs.EOF
' Aqui proceso los registros
rs.MoveNext
Loop
Else
Response.Write "No hay datos"
End If
%>

Intenta "capturar" si está vacío el "recordset". Si hay datos en la tabla

ya

tienes delimitado el problema:

a) El SQL no está construido adecuadamente para mostrarlos.

ó

b) Las opciones de apertura del "recordset" impiden que pueda ser

recorrido.

Saludos!
Miguel


"Ivan" escribió en el mensaje
news:
> Miguel una ultima ayuda,
> el rs.movefirst y do while no rs.eof no me funcionan me da error, me da

a

mi
> que la conexion con la tabla no anda muy fina, puede ser de eso no??
>
> Microsoft VBScript runtime error '800a01b6'
> Object doesn't support this property or method: 'moveFirst'
>
> /codigo5.asp, line 43
>
>
>
> codigo:
>
> dim num
> dim scodigo
> dim textos
> dim numdos
> dim strcon
> dim rs
> dim x
> Request.ServerVariables("QUERY_STRING")
> scodigo= request.QueryString("textcodigo")
> textos= request.QueryString("texto")
> response.Write(scodigo)
> Server.ScriptTimeout 0
>
>
> strcon = "driver={MySQL ODBC 3.51
> Driver};server=localhost;uid=ODBC;pwd=;database=test;option387"
> Set rs = Server.CreateObject("ADODB.Connection")
> rs.ConnectionTimeout(0
> rs.CommandTimeout`
> rs.Open strcon
>
>
> response.write(textos)
> texto=textos
> %>
>
>
>
>
>
> </p><table width="75%" border="1"><%
> if scodigo <> 0 then
> %>
> <script language="JavaScript" type="text/JavaScript">
> alert("llega1")
> </script>
>
> <%
> for x=1 to 8
> scon=(scodigo&x&"")
> rs.moveFirst ***linea 43 ***
> response.Write(scon)
> response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
> z=0
>
>
>
>
> "Miguel González" escribió en el mensaje
> news:
> > Jejeje... nos pasa a todos Ivan... es la "Ley de Murphy"!
> >
> > En este tema intervienen muchos factores, configuración del servidor
web,
> > restricciones del proveedor, etc. Siempre hay que hacer ajustes de
última
> > hora. Con práctica se reducen mucho, pero no por completo... en fin.
> Suerte!
> >
> > Saludos!
> > Miguel
> >
> >
> > "Ivan" escribió en el mensaje
> > news:
> > > Gracias miguel!!
> > >
> > > Me vino a la perfección, pero no se porque han venido esos fallos,

de

> modo
> > > local no me pasaban y en internet si, sabes porque puede ser? es la
> > primera
> > > vez que subo una página en asp y me esta pillando por todos lados
> > >
> > >
> > > Microsoft VBScript runtime error '800a01a8'
> > > Object required: 'driver={MySQL ODBC 3'
> > >
> > > /codigo5.asp, line 51
> > >
> > >
> > >
> > > for x=1 to 8
> > > scon=(scodigo&x&"")
> > >
> > > response.Write("<tr><td><strong>numero</strong>:"&scon&"</td>")
> > > z=0
> > > %>
> > > <script language="JavaScript" type="text/JavaScript">
> > > alert("llega")
> > > </script>
> > > <%
> > > while not rs.eof *** linea 51***
> > > scon = eval(scon)
> > > if scon = rs("codigo") then
> > > if x=1 then
> > >

response.Write("<td><strong>primera</strong>:"&rs("primera")&"</td>")

> > > response.Write("<td><strong>segunda</strong>:"&rs("segunda")&
"</td>")
> > > txt1=rs("primera")
> > > txt2=rs("segunda")
> > > end if
> > >
> > > "Miguel González" escribió en el mensaje
> > > news:
> > > > Hola Ivan, se me ocurren los siguientes pasos:
> > > >
> > > > 1) Cabe repasar el formulario de envio (el origen del dato que
falta),
> > no
> > > > sea que el dato no se esté enviando.
> > > >
> > > > 2) Ya que utilizas el método "GET", Verifica que en la URL de

envio,

> la
> > > que
> > > > llama a la pagina ASP, exista el dato "textcodigo=algo".
> > > >
> > > > 3) Si existe el dato, intenta mostrarlo al principio de la página
ASP:
> > > >
> > > > <%Response.Write Request.QueryString("textcodigo")%>
> > > >
> > > > 4) En vez de "Eval()", utiliza:
> > > >
> > > > <%scodigo = CStr(scodigo)%>
> > > >
> > > > Prueba a ver si así se soluciona.
> > > >
> > > > Saludos!
> > > > Miguel
> > > >
> > > >
> > > >
> > > > "Ivan" escribió en el mensaje
> > > > news:
> > > > > Hola Miguel!
> > > > >
> > > > > No me coje el valor, el formulario lo envio en metodo get, tengo
ese
> > > > método
> > > > > en las otras páginas pero solo me da error en esta, si le meto

el

> > valor
> > > a
> > > > > mano si me lo escribe, es un poco raro no??he mirado todo la
verda,
> si
> > > es
> > > > en
> > > > > la linea del eval() el error y al poner response.write(scodigo)

no

> me
> > > hace
> > > > > nada
> > > > >
> > > > >
> > > > >
> > > > > "Miguel González" escribió en el mensaje
> > > > > news:
> > > > > > Hola Ivan!
> > > > > >
> > > > > > Cuál es la línea 39?
> > > > > >
> > > > > > Por el error que envias parece ser la que contiene la función
> > > "Eval()".
> > > > Es
> > > > > > posible que el dato que pasas en la variable "scodigo" no

pueda

> ser
> > > > > evaluado
> > > > > > apropiadamente. Haz un "<%Response.Write scodigo%>" a ver que

es

> lo
> > > que
> > > > > > contiene la variable.
> > > > > >
> > > > > > Saludos!
> > > > > > Miguel
> > > > > >
> > > > > >
> > > > > > "Ivan" escribió en el mensaje
> > > > > > news:%23UfsA%
> > > > > > > Hola Miguel
> > > > > > >
> > > > > > > Ya esta miguel se conecta, haciendo la prueba del "Test Data
> > Source"
> > > > al
> > > > > > > final salio, el usuario no era root, muchas gracias por todo
te
> > has
> > > > > > portado,
> > > > > > > pero si me haces un ultima favor, me da en la linea 39 este
> fallo:
> > > > > > >
> > > > > > >
> > > > > > > Microsoft VBScript runtime error '800a000d'
> > > > > > >
> > > > > > > Type mismatch: '[undefined]'
> > > > > > >
> > > > > > > /codigo5.asp, line 39
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > y este es el codigo, te pongo el de conexion pero no creo q
sea
> > eso,
> > > > no
> > > > > > > entiendo xq en mi ordenador si me iba
> > > > > > >
> > > > > > > strcon = "driver={MySQL ODBC 3.51
> > > > > > >
> Driver};server=localhost;uid=ODBC;pwd=;database=test;option387"
> > > > > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > > > > rs.ConnectionTimeout(0
> > > > > > > rs.CommandTimeout`
> > > > > > > rs.Open strcon
> > > > > > >
> > > > > > > num = eval(scodigo)
> > > > > > > response.write(textos)
> > > > > > > texto=textos
> > > > > > >
> > > > > > > Gracias
> > > > > > >
> > > > > > > "Miguel González" escribió en el mensaje
> > > > > > > news:#
> > > > > > > > Hola Ivan.
> > > > > > > >
> > > > > > > > ¿Has probado el DSN desde el Administrador de DSN?
> > > > > > > >
> > > > > > > > Si mal no recuerdo hay un boton "Test Data Source" o algo
> así...
> > > > > > > >
> > > > > > > > Con ello puedes verificar si la conexión a la DB es

correcta

y
> > > > deducir
> > > > > > si
> > > > > > > es
> > > > > > > > un problema del servidor Web o propiamente de la Conexión

a

la
> > DB.
> > > > > > > >
> > > > > > > > Otra cosa, ¿en tu cadena de conexión utilizas la DB

llamada

> > > "test"?.
> > > > > Si
> > > > > > es
> > > > > > > > otra base de datos deberías corregir este dato.
> > > > > > > >
> > > > > > > > También otra cosa, por la forma de conectarte, parece que
usas
> > un
> > > > DSN
> > > > > de
> > > > > > > > usuario, pero si estas usando un DSN de sistema, la forma

de

> > > > referirse
> > > > > > al
> > > > > > > > mismo en ASP es:
> > > > > > > >
> > > > > > > > <%
> > > > > > > > Set strcon = Server.CreateObject("ADODB.Connection")
> > > > > > > > strcon.Open nombreDSNdeSistema
> > > > > > > > %>
> > > > > > > >
> > > > > > > > Prueba a ver, ahora tengo que irme. Mañana me dices.
> > > > > > > >
> > > > > > > > Suerte!
> > > > > > > >
> > > > > > > > Saludos!
> > > > > > > > Miguel
> > > > > > > >
> > > > > > > >
> > > > > > > > "Ivan" escribió en el mensaje
> > > > > > > > news:%
> > > > > > > > > Hola Miguel!!
> > > > > > > > >
> > > > > > > > > Me as devuelto la ilusion!!Ahora por lo menos contacta

con

> > ella,
> > > > > solo
> > > > > > > que
> > > > > > > > el
> > > > > > > > > usuario root tiene acceso denegado, y e puesto ese

usuario

> en
> > > > system
> > > > > > dns
> > > > > > > > > como user, contraseña tb y le pongo la misma en la
conexion
> y
> > > > > > localhost,
> > > > > > > > > pero me da este error:
> > > > > > > > >
> > > > > > > > > ADODB.Connection.1 error '80004005'
> > > > > > > > > SQLState: S1000
> > > > > > > > > Native Error Code: 1045
> > > > > > > > > [TCX][MyODBC]Access denied for user: ''
(Using
> > > > > password:
> > > > > > > > YES)
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > /codigo5.asp, line 31
> > > > > > > > >
> > > > > > > > > y yo tengo puesto esto
> > > > > > > > >
> > > > > > > > > strcon = "driver={MySQL ODBC 3.51
> > > > > > > > >
> > > > >
> Driver};server=localhost;uid=root;pwdE43;database=test;option387"
> > > > > > > > > Set rs = Server.CreateObject("ADODB.Connection")
> > > > > > > > > rs.ConnectionTimeout(0
> > > > > > > > > rs.CommandTimeout`
> > > > > > > > > rs.Open strcon
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > SQL="SELECT * FROM etsedi"
> > > > > > > > > oConn.Open SQL, oConn,1,3
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > "Miguel González" escribió en el
mensaje
> > > > > > > > > news:
> > > > > > > > > > Hola Ivan!
> > > > > > > > > >
> > > > > > > > > > Por lo que veo usas MySql.
> > > > > > > > > >
> > > > > > > > > > ¿Tienes instalado el correspondiente conector ODBC

para

> este
> > > > tipo
> > > > > de
> > > > > > > > base
> > > > > > > > > de
> > > > > > > > > > datos?
> > > > > > > > > >
> > > > > > > > > > Si no lo tienes debes descargarlo desde:
> > > > > > > > > > http://www.mysql.com/products/connector/odbc/
> > > > > > > > > >
> > > > > > > > > > En la FAQ de ODBC de MySql encontrarás más info sobre

el

> > tema:
> > > > > > > > > > http://dev.mysql.com/doc/connector/...faq_3.html
> > > > > > > > > >
> > > > > > > > > > Saludos!
> > > > > > > > > > Miguel
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > "Ivan Díaz" escribió en el
> mensaje
> > > > > > > > > > news:
> > > > > > > > > > >
> > > > > > > > > > > Hola jefes!!
> > > > > > > > > > >
> > > > > > > > > > > Me esta dando este error continuamente, el provider

no

> se
> > > > donde
> > > > > > > > ponerlo,
> > > > > > > > > > es
> > > > > > > > > > > que la verdad, o no se para que vale, o también creo
que
> > yo
> > > no
> > > > > > > tengo,
> > > > > > > > mi
> > > > > > > > > > > base de datos esta en mi servidor y quiero cogerla

de

> el,
> > > > ademas
> > > > > > > esta
> > > > > > > > en
> > > > > > > > > > la
> > > > > > > > > > > unidad f: no en la c: que me aconsejais??Este es el
> codigo
> > y
> > > > el
> > > > > > > error
> > > > > > > > > > >
> > > > > > > > > > > dim rs
> > > > > > > > > > >
> > > > > > > > > > > dim oConn
> > > > > > > > > > >
> > > > > > > > > > > Set oConn = Server.CreateObject("ADODB.Connection")
> > > > > > > > > > >
> > > > > > > > > > > set rs = Server.CreateObject("ADODB.Recordset")
> > > > > > > > > > >
> > > > > > > > > > > oConn.Open
"provider=F:\\mysql\data\etsedi\etsedi.frm;"
> &
> > _
> > > > > > > > ****linea
> > > > > > > > > > > 31****
> > > > > > > > > > >
> > > > > > > > > > > "data source2.168.1.100;" & _
> > > > > > > > > > >
> > > > > > > > > > > "initial catalog=etsedi;" & _
> > > > > > > > > > >
> > > > > > > > > > > "user id=root;" & _
> > > > > > > > > > >
> > > > > > > > > > > "passwordE43;"
> > > > > > > > > > >
> > > > > > > > > > > SQL="SELECT * FROM etsedi"
> > > > > > > > > > >
> > > > > > > > > > > oConn.Open SQL, oConn,1,3
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > > Tipo de error:
> > > > > > > > > > > ADODB.Connection (0x800A0E7A)
> > > > > > > > > > > Provider cannot be found. It may not be properly
> > installed.
> > > > > > > > > > > /etsedi/TMP5iu7qxyepi.asp, line 31
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > > >
> > > >
> > >
> > >
> >
>
>