Section courante

A propos

Section administrative du site

CREATEOBJECT

Crée l'objet
VB .NET (Visual Basic .NET)

Syntaxe

Public Shared Function CreateObject(ByVal ProgId As String, Optional ByVal ServerName As String = "") As Object

Paramètres

Nom Description
ProgId 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
... ...
ServerName Ce paramètre permet d'indiquer le nom du serveur

Description

Cette fonction permet d'effectuer la création d'un objet ActiveX.

Exemple

Voici un exemple permettant d'envoyer un courriel :

  1. Module Module1
  2.  
  3.     Sub Main()
  4.         Dim monCourriel As Object = CreateObject("CDO.Message")
  5.         monCourriel.Subject = "Mon sujet"
  6.         monCourriel.From = "job@gladir.com"
  7.         monCourriel.To = "support@gladir.com"
  8.         monCourriel.TextBody = "Corps de mon message"
  9.         monCourriel.Send()
  10.     End Sub
  11.  
  12. End Module


Dernière mise à jour : Dimanche, le 9 novembre 2014