Section courante

A propos

Section administrative du site

SERVER.CREATEOBJECT

Création d'objet serveur
ASP 3.0

Syntaxe

Function SERVER.CREATEOBJECT(classe As String) As Object

Paramètres

Nom Description
classe Ce paramètre permet d'indiquer la classe d'objet à utilisé :
Classe Description
ADODB.Command Cette classe permet de définir l'objet envoyant des commandes SQL à une base de données
ADODB.Connection Cette classe permet de définir l'objet de connexion à une base de données
ADODB.Recordset Cette classe permet de définir l'objet d'enregistrement pour un objet de base de données
Excel.Application Cette classe permet de définir l'objet d'application de Microsoft Excel
Outlook.Application Cette classe permet de définir l'objet d'application de Microsoft Outlook
Powerpoint.Application Cette classe permet de définir l'objet d'application de Microsoft PowerPoint
Scripting.FileSystemObject Cette classe permet de définir l'objet permettant la gestion des fichiers systèmes
ShockwaveFlash.ShockwaveFlash.3 Cette classe permet de définir l'objet de version du Flash Shockwave version 3
ShockwaveFlash.ShockwaveFlash.4 Cette classe permet de définir l'objet de version du Flash Shockwave version 4
ShockwaveFlash.ShockwaveFlash.5 Cette classe permet de définir l'objet de version du Flash Shockwave version 5
ShockwaveFlash.ShockwaveFlash.6 Cette classe permet de définir l'objet de version du Flash Shockwave version 6
ShockwaveFlash.ShockwaveFlash.7 Cette classe permet de définir l'objet de version du Flash Shockwave version 7
Word.Application Cette classe permet de définir l'objet d'application de Microsoft Word
Word.Basic Cette classe permet de définir l'objet de base du Microsoft Word
Word.Document Cette classe permet de définir l'objet de document de Microsoft Word
... ...

Description

Cette fonction permet d'effectuer la création d'un objet ActiveX côté serveur.

Exemple

Voici un exemple classique permettant de se connecter à une base de données en utilisant cette fonction :

  1. <%
  2. Set MyCon = Server.CreateObject("ADODB.Connection")
  3. MyCon.ConnectionString = "DSN=mabasededonnes_db;UID=root;PWD="
  4. MyCon.Open
  5.  
  6. Response.Write "<TABLE Border=1 bordercolor=""#000000"" CellSpacing=0>"
  7. Response.Write "<TR>"
  8. Response.Write "<TD><B>Nom francais</B></TD>"
  9. Response.Write "<TD><B>Nom anglais</B></TD>"
  10. Response.Write "<TD><B>Description</B></TD>"
  11. Response.Write "</TR>"
  12.  
  13. Set RS = MyCon.Execute("SELECT * from cdmworkgroup where Cin='000'")
  14. DO WHILE Not RS.EOF
  15.     Response.Write "<TR>"
  16.     Response.Write "<TD>" & RS("Name_EN") & "</TD>"
  17.     Response.Write "<TD>" & RS("Name_FR") & "</TD>"
  18.      Response.Write "<TD>" & RS("Description") & "</TD>"
  19.      Response.Write "</TR>"
  20.      RS.MoveNext
  21. LOOP
  22. Response.Write "</TABLE>"
  23. RS.Close
  24. Set RS = nothing
  25.  
  26. MyCon.Close
  27. Set MyCon = nothing
  28. %>


Dernière mise à jour : Vendredi, le 11 septembre 2015