Exemplo de código:
<%
‘ Variáveis com os valores de sua base de dados.
strDataSoure = ‘xxx.xxxx.xxx’ ‘colocar aqui a localização de sua base de dados
strDataBase =’xxxx’ ‘colocar aqui o nome do banco
strUser = ‘xxxx’ ‘colocar aqui o nome do usuário
strPWD = ‘xxxx’ ‘colocar aqui a senha
‘Geramos a query SQL que irá acessar os dados na base de dados
‘Conforme alteração 1
strQuery = ‘select TESTE from TESTE; ‘
‘Montamos a string de conexão
strConexao = ‘Provider=SQLOLEDB.1;SERVER=’ & strDataSoure
strConexao = strConexao & ‘; DATABASE=’ & strDataBase
strConexao = strConexao & ‘;UID=’& strUser
strConexao = strConexao & ‘ ;PWD=’& strPWD
‘Criando um objeto de conexão com a base de dados e executamos a Query
set objConn = server.CreateObject(‘ADODB.Connection’)
objConn.open strConexao
set rs=Server.CreateObject(‘ADODB.RecordSet’)
rs.Open strQuery, strConexao
do until rs.EOF
for each x in rs.Fields
Response.Write(CStr(x.Value)) & ‘
‘
‘
next
rs.MoveNext
loop
objConn.close
set rs = nothing
set objConn = nothing
%>
