[Resolvido] conexao com sql server 2005

[Monica_Silva 0]

Bom... to tentando gerar uma conexao com meu banco, mas ta flórida, se alguém puder ajudar, agradeco mto mto mto. segue o codigo:

 

<%Dim SQL
	Dim Dados
	Dim Banco

	DataSource="Provider=SQLOLEDB.1;SERVER=server;DATABASE=meudatabase;UID=sa;PWD=meupwd"	
				Set Banco = Server.CreateObject("ADODB.Connection")
	Banco.Open DataSource
	
	SQL = "SELECT codigo,descricao FROM Espaco" 
	Dados = Banco.Execute(SQL)
%>

(etc)

<Select name="SlcBusca">
<%
If Dados.Eof=True Then%>
Não há Dados.
<%Else
	Do While Not Dados.Eof %>
		<option value="<%=Dados("Codigo") %>"><%=Dados("Descricao")%></option>
<% 
	Dados.MoveNext 
	Loop	
End If	
%>
</Select>

o erro q ta dando é "aparece a página,mas a tabela em questao vem vazia, sendo que está preenchida"

ja até fui num site com milhoes de strings de conexao pra conferir, me pareceu que está correto...

 

Gente, valeu, Boa Noite, té já!

[filipescoob 1]

Esta colocando o numero da porta na string de conexao ?

[novato_PHP 0]

Oi!

 

 

Aqui no serviço uso PHP, mas já precisei usar ASP e para conexao usei o seguinte:

 

Set objCon = Server.CreateObject("ADODB.Connection")
banco ="Driver={SQL Native Client};Server=172.20.10.3;Database=teste;Uid=login;Pwd=senha"
objCon.Open banco

Nao sei qual o site que você viu mas tem este aqui que é muito bom

[filipescoob 1]

coloca a porta de acesso ao banco depois do ip

 

ex.: 172.20.10.3,1415

 

onde 1415 é a porta de acesso

 

Set objCon = Server.CreateObject("ADODB.Connection")
banco ="Driver={SQL Native Client};Server=172.20.10.3,1415;Database=teste;Uid=login;Pwd=senha"
objCon.Open banco

Seu server de hospedagem ou Infra da empresa pode te fornecer estes dados.

 

Verifique tambem se o usuario que esta usando tem acesso a tabela.

 

use no select o Owner DBO para testar...

 

exemplo

select * from dbo.tabela

Lembre-se que se foi criada com outro usuario pode não ter acesso a informação.

 

abraços

[Monica_Silva 0]

Na verdade esse sisteminha eu to montando pra aprender sobre programacao e banco de dados, to comecando ainda. Só depois de muito suar é que vi que o problema na verdade foi pq nao usei o SET..esqueci dele em Dados=Banco.Execute(sql , deveria ter digitado Set Dados = banco.Execute(sql).

 

Agora o erro acontece nas inclusoes de arquivo..vou dar uma pesquisada nesse assunto e qualquer coisa volto aqui

Enfim... Brigada gente! =)