Fonction ASP pratique pour se connecter à la base de données

Les développeurs prudents pensent parfois que lorsque nous incluons du code comme

<!-- #include file="conn.asp" -->

, en fait, lorsque vous n'effectuez aucune lecture ou écriture Pendant les opérations de base de données, la connexion à la base de données est toujours ouverte et consomme toujours les ressources du serveur.

Alors, existe-t-il un moyen pour nous d'ouvrir la connexion à la base de données uniquement lorsque la base de données doit être lue, et il n'y aura aucune action lorsqu'elle n'est pas lue. Cette idée est fournie ci-dessous pour inspirer les autres ?

Cette idée est d'encapsuler le code de connexion à la base de données dans une fonction et d'appeler cette fonction lorsque la lecture est nécessaire.

Voici le code de connexion SQL :

Fonction Open_conn()
faible Conn,Strconn
set Conn=server.createobject("adodb.connection")
Strconn = "Fournisseur = Sqloledb ; ID utilisateur = compte de connexion à la base de données ; Mot de passe = mot de passe de connexion à la base de données ; Catalogue initial = nom de la base de données ; Source de données = (locale) ;"
Conn.open Strconn
définir Open_conn=Conn
Si erreur alors
err.Effacer
Conn.close:set Conn=rien
Response.Write "Désolé, erreur de connexion à la base de données."
Réponse.Fin
Fin si

de fonction de fin

 :
Remplacez le

rs.open sql, conn

par

rs.open sql, Open_conn().

Voici le code de connexion ACCESS :

Fonction Open_conn().
faible Dbpath, Connecticut
Dbpath=server.MapPath("chemin de la base de données")
set Conn=server.createObject("ADODB.connection")
Conn.open "data source="&dbpath&";provider=microsoft.Jet.OLEDB.4.0;"
définir Open_conn=Conn
Si erreur alors
err.Effacer
Conn.close:set Conn=rien
Response.Write "Désolé, erreur de connexion à la base de données."
Réponse.Fin
Fin si

de fonction de fin

 :
remplacer l'original
rs.open sql, conn

changé en
rs.open sql, Open_conn()

fournit d'ailleurs un ancien code qui permet de partager la base de données ACCESS entre des sites sur le même serveur. Peut-être que certains amis pourront l'utiliser :

parfois, nous avons de nombreux noms de domaine de deuxième niveau, et nous en aurons peut-être besoin. pour permettre à ces noms de domaine de deuxième niveau d'appeler une certaine base de données An ACCESS, si vous ne souhaitez pas utiliser une base de données SQL, les méthodes suivantes peuvent être utilisées pour la connexion à la base de données. (Remarque spéciale : si votre serveur dispose des autorisations de sécurité FSO, vous devez définir ce répertoire de base de données pour permettre aux utilisateurs IIS de chaque station que vous devez appeler d'avoir accès et de modifier.)

Le chemin physique suivant vers la base de données est similaire à E : Répertoire Répertoirenom de la base de données

dim Conn, Strconn
Définir Conn = Server.CreateObject("ADODB.Connection")
Strconn="Fournisseur = Microsoft.Jet.OLEDB.4.0; "
Strconn=Strconn & "Source de données=Chemin physique de la base de données"
Conn.Open Strconn
Si erreur alors
err.Effacer
Conn.close:set Conn=rien
Response.Write "Désolé, erreur de connexion à la base de données."
Réponse.Fin
Fin si