Creer une dll activex

Soyez le premier à donner votre avis sur cette source.

Vue 5 518 fois - Téléchargée 775 fois

Description

Ceci est un code pour Créer une DLL ActiveX pour connexion à une BD Access

Source / Exemple :


Option Explicit

Private m_chaineDeConnexion As String

Private Sub Class_Initialize()
  m_chaineDeConnexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\maBase.mdb;" & _
  "Persist Security Info=False"
End Sub

Private Function makeConnexion() As ADODB.Connection

  Dim cnn As ADODB.Connection
  Set cnn = New ADODB.Connection
  cnn.Open m_chaineDeConnexion
  Set makeConnexion = cnn

End Function

Public Function getMaTable(table As String) As ADODB.Recordset

  Dim cnn As ADODB.Connection, rst As ADODB.Recordset

  Set cnn = makeConnexion()
  Dim sql As String
  sql = "SELECT * FROM " & table
  Set rst = New ADODB.Recordset
  rst.CursorLocation = adUseClient
  rst.Open sql, cnn, adOpenForwardOnly, adLockReadOnly
  Set rst.ActiveConnection = Nothing

  cnn.Close
  Set cnn = Nothing

  Set getMaTable = rst

End Function

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
156
Date d'inscription
mardi 4 novembre 2003
Statut
Membre
Dernière intervention
28 décembre 2010

Quand on créer une DLL c'est pour ne pas avoir a recompiler 20 fois l'application... Tu mets tous dans une DLL mais tu n'utilise aucune variable, tu passes tout en dur, Intérêt ?
Messages postés
123
Date d'inscription
mercredi 27 août 2003
Statut
Membre
Dernière intervention
12 août 2008
1
c'est pas la pai,n de crée une dll,... est en plus ton zip n'amarche pas! je ne sais pas
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
65
mouais.... tu auras fait un module, ce serait pas pire !

aucune propriété, impossible de soumettre ses propres requetes;
le chemin versla BDD est en dur, en plus !

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.