Introdução
Este artigo explica a parte mais básica e crítica da programação ASP, "chamada de arquivo de banco de dados", e fala sobre algumas técnicas para chamada de arquivo de banco de dados na programação ASP.
Introdução ao ASP
ASP (Active Server Pages) é uma tecnologia de desenvolvimento de aplicativos da Web lançada pela Microsoft em 1996. É uma combinação de linguagem de script, componentes ActiveX e linguagem HTML. A Microsoft o descreve como "um ambiente de script de servidor. Aqui você pode construir e. executar aplicativos de servidor web dinâmicos, interativos e de alto desempenho." Sua principal função é fornecer uma forma ou tecnologia poderosa para gerar aplicativos de servidor Web dinâmicos e interativos. Sua característica é que comandos e scripts são interpretados e executados no servidor, e então o conteúdo enviado ao navegador do cliente é apenas uma página HTML padrão. A vantagem é que o design do programa é simples e fácil de entender, além de prático e rápido. O ASP tem sido amplamente utilizado na China e um número considerável de sites dinâmicos utiliza a tecnologia ASP.
Embora diferentes sistemas possam instalar diferentes drivers de banco de dados para
chamar arquivos de banco de dados ASP
, os sistemas de servidor em geral suportam basicamente IIS4.0/5.0, portanto, o sistema do servidor terá pelo menos Microsoft Access Driver, Microsoft ODBC para Oracle, SQL Server, etc. . Portanto, o sistema do servidor pode usar pelo menos três bancos de dados, como Access, Oracle e SQL Server, para participar do design de banco de dados de páginas da Web ASP. Como o Microsoft Access 97/2000 pertence a uma das séries Office da Microsoft e a interface é semelhante ao software da série Office, basicamente não há obstáculo ao aprendizado. Portanto, este artigo usará arquivos de banco de dados Access para programação ASP da perspectiva de iniciantes. .Crie um arquivo de banco de dados (friend.mdb) conforme mostrado na Figura 1 através do aplicativo Access
Figura 1
Então, existem duas maneiras de chamar o arquivo de banco de dados na programação ASP. Uma é configurá-lo manualmente diretamente na "Fonte de Dados (ODBC)" do "Painel de Controle" a outra é programar e chamar o banco de dados através; um arquivo de caminho relativo, esse método pode ser aplicado a qualquer servidor sem configuração adicional. O primeiro método é mais simples e seguro, e este artigo fala sobre o segundo método.
Listados abaixo estão os métodos gerais para leitura de registros de tabelas em arquivos de banco de dados em programação ASP:
01: <HTML><BODY>
02: ＜!--#include file="adovbs.inc"-->
03:＜%
04: 'Use o objeto Connection do ASP para abrir o banco de dados. O arquivo de banco de dados é <Friend.mdb> na imagem acima'.
05: Dim objConn
06: Definir objConn=Server.CreateObject("ADODB.Connection")
07: objConn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"
08: "Fonte de dados =" & Server.MapPath ("Amigo.mdb")
09: objConn.Open
10: Leia os registros da tabela "dados" e armazene-os no objeto Record set
11: Dim objRS
12: Definir objRS=Server.CreateObject("ADODB.Recordset")
13: ObjRS.Open "dados",objConn,adOpenKeyset,adLockOptimistic,adCmdTable
14: 'Exibe o registro apontado pelo ponteiro atual no navegador
15: Se não for objRS, então.
16: Resposta.Escreva "Número:"&objRS("Número")& "＜BR＞"
17: Resposta. Escreva "Nome:"&objRS("Nome")& "＜BR＞"
18: Resposta. Escreva "Gênero:"&objRS("Gênero")& "＜BR＞"
19: Outra coisa
20: Response.Write "O final do banco de dados foi alcançado e todos os registros correspondentes foram exibidos"
21: Terminar se
22: 'Fecha a conexão com o banco de dados e libera a instância do objeto
23: ObjRS Fechar.
24: Definir objRS=Nada
25: ObjConn.Fechar
26: Definir objConn=Nada
27: %>
28: ＜/BODY＞＜/HTML＞
O código acima representa as etapas de design para abrir arquivos de banco de dados Access na programação ASP.
Dicas para chamar arquivos de banco de dados
(1) Na verdade, não importa para qual banco de dados do Access você mude, as etapas para abrir uma conexão de banco de dados e ler os registros da tabela são as mesmas. , portanto, o programa acima pode ser reescrito as linhas 3 a 13 na forma de funções e salvá-las em um arquivo como: ADOFunctions.asp. Se desejar abrir um arquivo de banco de dados no futuro, inclua o arquivo ADOFunctions.asp. o código é o seguinte:
<%
Dim objConn
'A variável Filename é o nome do arquivo do banco de dados, a variável Table Name é o nome da tabela Function GetRecordset(FileName,TableName)
'Use o objeto Connection do ASP para abrir o banco de dados Set objConn=Server.CreateObject("ADODB.Connection")
objConn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"
"Fonte de dados=" & Server.MapPath("Nome do arquivo")
objConn.Open
'Lê os registros da tabela e armazena-os no objeto Record set "objRS"
Dim objRS
Definir objRS=Server.CreateObject("ADODB.Recordset")
ObjRS.Open TableName,objConn,adOpenKeyset,adLockOptimistic,adCmdTable
Função final
%>
Como pode ser visto no código acima, o nome da função é GetRecordSet e seu valor de retorno é uma instância do objeto Record set que armazena registros da tabela. Agora você pode usar este arquivo para ler os registros de qualquer arquivo de banco de dados. Por exemplo, a programação para leitura do banco de dados pode ser simplificada da seguinte forma:
<HTML> <BODY>
<! --#Incluir arquivo="adovbs.inc"-->
<! --#include arquivo="ADOFunctions.asp"-->
<%
'Chame a função GetRecordset para obter uma instância do objeto Record set e, em seguida, atribua-a à variável objRS
Dim objRS
Definir objRS=GetRecordset("Friend.mdb","dados")
'Exibe o registro apontado pelo ponteiro atual no navegadorIf Not objRS.EOF Then
Resposta.Escreva "Número:"&objRS("Número")& "＜BR＞"
Resposta.Escreva "Nome:"&objRS("Nome")& "＜BR＞"
Resposta.Escreva "Gênero:"&objRS("Gênero")&"＜BR＞"
Outro
Response.Write "O final do banco de dados foi alcançado e todos os registros correspondentes foram exibidos"
Terminar se
'Fecha a conexão com o banco de dados e libera a instância do objeto ObjRS Close.
Definir objRS=Nada
ObjConn.Fechar
Definir objConn=Nada
%>
＜/BODY＞＜/HTML＞
Portanto, contanto que você altere o nome do banco de dados e o nome da tabela neste código Set objRS=GetRecordset("Friend.mdb", "data"), você pode chamar qualquer arquivo de banco de dados do Access, é claro. , você deve prestar atenção a Além disso, os nomes dos campos de cada tabela no banco de dados subsequente devem corresponder.
(2) Além disso, não importa para qual banco de dados Access você mude, as etapas para abrir uma conexão de banco de dados e filtrar os registros da tabela são as mesmas. As variáveis incluem a instrução SQL (como: "SELECT * FROM data"), o nome. do arquivo de banco de dados e o nome da tabela. Portanto, da mesma forma, você pode usar essas três variáveis como parâmetros da função, escrever a função GetSQLRecordset e salvá-la como um arquivo chamado ADOSQLFunctions.asp. Caso queira utilizá-la no futuro, basta incluir este arquivo em. na frente do programa e você pode usar GetSQLRecordset A função abre uma conexão de banco de dados e também filtra os registros da tabela. O valor de retorno desta função armazena uma instância do objeto Record set que está em conformidade com a instrução SQL.
O código é o seguinte:
<%
Dim objConn
Dim GetSQLRecordset
Função GetSQLRecordset(strSQL,NomeArquivo,NomeTabela)
'Use o objeto Connection do ASP para abrir o banco de dados
Set objConn=Server.CreateObject("ADODB.Connection")
objConn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"
"Fonte de dados=" & Server.MapPath("Nome do arquivo")
objConn.Open
'Lê os registros que correspondem à instrução SQL da tabela e os armazena no objeto Record set
Definir GetSQLRecordset=Server.CreateObject("ADODB.Recordset")
GetSQLRecordset.Open_strSQL,objConn,adOpenKeyset,adLockOptimistic,adCmdText
Função final
%>
O nome da função no código acima é: GetSQLRecordset e o nome do arquivo é ADOSQLFunctions.asp.
Agora você pode usar este arquivo para chamar a conexão com qualquer banco de dados Access e filtrar os registros da tabela ao mesmo tempo. Tomando o arquivo Friend.mdb como exemplo, liste todos os registros nos dados da tabela. O código do programa é o seguinte:
<HTML> <BODY>.
<!--#include file="adovbs.inc"-->
<!--#include file="ADOSQLFunctions.asp"-->
<%
Dim objRS
Set objRS=GetSQLRecordset("SELECIONE número, nome, gênero de_dados", "Amigo.mdb", "dados")
Faça enquanto não objRS.EOF
Resposta.Escreva "Número:"&objRS("Número")&"＜BR＞"
Resposta.Escreva "Nome:"&objRS("Nome")&"＜BR＞"
Resposta.Escreva "Gênero:"&objRS("Gênero")&"＜BR＞"
Loop
objRS.Fechar
Definir objRS=Nada
ObjConn.Fechar
Definir objConn=Nada
%>
＜/BODY＞＜/HTML＞
Resumo
Na programação ASP, fazer bom uso das funções muitas vezes pode tornar o código do nosso programa simples e claro, e a estrutura de leitura é fácil de manter, mas também pode evitar um grande número de. códigos repetitivos e complicados. Assim como na situação acima, se você simplesmente se conectar ao banco de dados, utilize a primeira situação e inclua o arquivo ADORecordset.asp. Caso queira filtrar os registros de uma determinada tabela no banco de dados ou utilizar outras instruções SQL na operação, utilize a segunda. caso, basta carregar o arquivo ADOSQLRecordset.asp.