Ainda SQL... to quase la...

[allan.web 0]

Bom primeiro criei a tabela ALLAN2 com os campos cod int e teste text assim:

conn.open "create table allan2 (cod int, teste text,)"

Depois inseri em cod valorem numéricos e em teste textos... até ai tudo ok... mas quando tento imprimir os dados do bd desse forma:

Dim connSet conn = Server.CreateObject("ADODB.Connection")conn.open = "Driver={SQL Server};Server=local do server;Database=basededados;user id=bd;Password=senha" 	set rs=server.createobject ("adodb.recordset")	rs.open "select * from allan2"		response.Write rs("cod") & " - " & rs("teste")set rs = nothingrs.closeconn.closeset conn = nothing

Ele da o seguinte erro:

 

ADODB.Recordset error '800a0e7d'

 

The connection cannot be used to perform this operation. It is either closed or invalid in this context.

 

/teste.asp, line 34

===========================

 

O que estou fazendo erado...?

 

Desde ja agradeço

[Mário Monteiro 179]

existem dados na tabela??

[allan.web 0]

Ola...Fiz um insert e não deu erro... acredito que tenha inserido dados sim... mas a forma que coloquei... está correto?Desde ja muito obrigado

[rOcKLoCo 0]

é assim:

 

Dim conn

Set conn = Server.CreateObject("ADODB.Connection")

conn.open = "Driver={SQL Server};Server=local do server;Database=basededados;user id=bd;Password=senha"

 

set rs=server.createobject ("adodb.recordset")

rs.open "select * from allan2", conn

 

response.Write rs("cod") & " - " & rs("teste")

 

set rs = nothing

rs.close

conn.close

set conn = nothing

faltou o ,conn no rs.Open

 

falows

[allan.web 0]

Ai... obrigadão... agora ta 100 %Valeu...