Connexion MySQL
Peut-on lier des bases MySQL ou PostgreSQL à Access ? Oui. Dans les deux cas, la procédure est sensiblement la même : Installez sur votre ordinateur un pilote (driver) ODBC pour MySQL ou PostgreSQL.Vous...
Catégorie : Access
Access et MySQL ou PostgreSQL
Peut-on convertir une base Access au format MySQL ou PostgreSQL ? Oui. Deux techniques sont envisageables : Fichier texte Traduisez les définitions de vos tables Access au format SQL (CREATE TABLE…) et faites-en un...
Scripting Runtime
Quelles sont les instructions pour manipuler les disques, dossiers et fichiers en Visual Basic ? Il existe 2 grandes approches pour manipuler les disques, dossiers (répertoires) ou documents (fichiers) sous Access : Les commandes...
Dates anglo-saxonnes
Certaines de mes requêtes (exécutées notamment en Visual Basic ou en pur SQL) donnent des résultats curieux lorsqu’elles sont basées sur des dates. Access ne comprendrait-il pas les dates françaises ? Explication Lorsque vous...
Numéro de sécurité sociale
Comment vérifier ou calculer une clef de sécurité sociale (française) en VBA ? Voici une fonction qui peut faire l’affaire (à recopier dans un module standard) :
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
' --- ' CALCUL D'UNE CLEF DE SECURITE SOCIALE FRANCAISE ' --- ' Input : strNumero <- 13 premiers caractères du numéro de sécurité sociale ' Output : ClefSecu -> Clef sur 2 chiffres ' #Erreur en cas... d'erreur ' Function ClefSecu(ByVal strNumero As String) As String Dim dblNumero As Double, intReste As Integer ' Le numéro doit comporter 13 chiffres If Len(strNumero) <> 13 Then MsgBox "Le numéro doit comporter 13 chiffres.", vbExclamation ClefSecu = "#Erreur" Exit Function End If ' Conversion en double dblNumero = CDbl(strNumero) ' Calcul du modulo 97 intReste = 97 - (dblNumero - Int(dblNumero / 97) * 97) ClefSecu = Format(intReste, "00") End Function |
Ecrire une instruction VB sur plusieurs lignes
Certaines instructions VB sont très longues. Comment les répartir sur plusieurs lignes ? En VB, une instruction se termine automatiquement en fin de ligne (lorsque vous faites [Entrée]). Ca veut dire que ce programme...
Commentaires en VBA
Comment définit-on des commentaires en Visual Basic ? Commentaire sur une ligne entière Il suffit que la ligne débute par une apostrophe. Le commentaire s’affiche en vert une fois que vous changez de ligne....
Détruire ou renommer un fichier
Comment détruire ou renommer un fichier en Visual Basic ? Pour détruire un fichier, utilisez l’instruction Kill. Du genre :
|
1 |
Kill "C:\Mes documents\test.mdb" |
Pour renommer un fichier, passez par la commande Name. Exemple (à taper sur...
Tester l’existence d’un répertoire ou fichier
Comment tester l’existence d’un répertoire ou d’un fichier en Visual Basic ? La fonction Dir() permet de faire cette vérification. Pour un répertoire
|
1 2 3 4 5 |
If Dir("C:\Mes documents", vbDirectory) = "" Then Msgbox "Le répertoire n'existe pas" Else Msgbox "Le répertoire existe" End If |
Pour un fichier
|
1 2 3 4 5 |
If Dir("C:\Mes documents\test.doc") = "" then Msgbox "Le fichier n'existe pas" Else Msgbox "Le fichier existe" End If |
Pour utiliser ce qui précède, vous...
Calendrier paramétrable
Est-il possible d’utiliser le contrôle Calendrier Access (MSCal) pour renseigner automatiquement des dates dans un autre formulaire ?
