Creer une dll activex

0/5 (3 avis)

Vue 5 476 fois - Téléchargée 767 fois

Télécharger le projet
Commenter

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
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Signaler
PROTEUS91
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 ?
Signaler
cs_hakim0
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
Signaler
Renfield
Messages postés
17280
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
21 juillet 2019
 57 -
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 !
S'inscrire maintenant

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.