Le programme ASP du Dongwang Forum est, dans une certaine mesure, devenu le summum de l'ASP. Le code de la copie principale est le suivant :
<%@LANGUAGE=VBSCRIPT%>
<%
option explicite
dim heure de début, heure de fin, conn, strCon, db
heure de démarrage=minuterie()
Dim strSQLServerName
Dim strSQLDBUserName
Dim strSQLDBPasseword
Dim strSQLDBName
'Veuillez renseigner les paramètres spécifiques de la base de données
'------------------------------------------------ - -------------------------------------------------
strSQLServerName = 127.0.0.1 'Nom ou adresse du serveur
strSQLDBUserName = sa 'Compte de base de données
strSQLDBPassword = 123 'Mot de passe de la base de données
strSQLDBName = bbsbak 'Nom de la base de données
'------------------------------------------------ - -------------------------------------------------
'Pilote OLE du serveur SQL
Définir conn = Server.CreateObject (ADODB.Connection)
strCon = Provider=SQLOLEDB;Server= & strSQLServerName & ;ID utilisateur= & strSQLDBUserName & ;Password= & strSQLDBPassword & ;Database= & strSQLDBName & ;
conn.Ouvrir strCon
fonction Fermer la base de données
Conn.fermer
Définir la connexion = Rien
Fonction de fin
%>