O programa ASP do Fórum Dongwang tornou-se, até certo ponto, o auge do ASP. O código da cópia mestre é o seguinte:
<%@LANGUAGE=VBSCRIPT%>
<%
opção explícita
escurecer horário de início, horário de término, conexão, strCon, db
horário de início=temporizador()
DimstrSQLServerName
Dim strSQLDBUserName
Dim strSQLDBPassword
Dim strSQLDBName
'Por favor preencha os parâmetros específicos do banco de dados
'------------------------------------------------ - -------------------------------------------------
strSQLServerName = 127.0.0.1 'Nome ou endereço do servidor
strSQLDBUserName = sa 'Conta de banco de dados
strSQLDBPassword = 123 'Senha do banco de dados
strSQLDBName = bbsbak 'Nome do banco de dados
'------------------------------------------------ - -------------------------------------------------
'Driver OLE do SQL Server
Definir conexão = Server.CreateObject(ADODB.Connection)
strCon = Provider=SQLOLEDB;Server= & strSQLServerName & ;User ID= & strSQLDBUserName & ;Password= & strSQLDBPassword & ;Database= & strSQLDBName & ;
conn.Open strCon
função FecharDatabase
Conexão próxima
Definir conexão = Nada
Função final
%>