OVH Cloud OVH Cloud

SOS Raymond RSCreateDir !!!!!!

4 réponses
Avatar
Sandra
Bonsoir Raymond !!

G un souci avec ta procédure RSCreateDir qui marchait très bien sur ma
première base de données mais qui marche plus maintenant...

J'ai changé de pc, il a donc fallu que je réinstalle tout, et j'ai donc
installé la dll RSCreateDir, je l'ai bien enregistré et tout, mais ca marche
pas... Voilà le code :

Private Sub Creationdossier_Click()
Dim C As New RS_CreateDir
If C.Create("c:\Documents and...blablabla...\Dosiers clients\" & Nom
& "\")Then
MsgBox "Dossier client créé !"
Else
MsgBox "Impossible de créér le dosier client !"
End if
End sub

Merci Raymond
Sandra

4 réponses

Avatar
Raymond [mvp]
Bonsoir.

Tu l'as enregistrée mais l'as-tu cochée dans les références ? compiles ton
appli et si ça sort une erreur sur le Dim C As New RS_CreateDir, ça veut
dire que tu n'as pas coché la référence. demain dimanche je suis absent,
mais si ça ne marche pas passe moi ta base par mail en zip obligatoire que
je regarde lundi matin.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Sandra" a écrit dans le message de
news:40004721$0$24047$
Bonsoir Raymond !!

G un souci avec ta procédure RSCreateDir qui marchait très bien sur ma
première base de données mais qui marche plus maintenant...

J'ai changé de pc, il a donc fallu que je réinstalle tout, et j'ai donc
installé la dll RSCreateDir, je l'ai bien enregistré et tout, mais ca
marche

pas... Voilà le code :

Private Sub Creationdossier_Click()
Dim C As New RS_CreateDir
If C.Create("c:Documents and...blablabla...Dosiers clients" &
Nom

& "")Then
MsgBox "Dossier client créé !"
Else
MsgBox "Impossible de créér le dosier client !"
End if
End sub

Merci Raymond
Sandra




Avatar
Sandra
Raymond rebonjour !
Ben non, RS CreateDir ne marche toujours pas (j'ai aussi enlevé le dernier
) et en plus j'ai un autre
problème maintenant :
Quand je clique sur Etablir le devis dans mon formulaire Gestion des
Clients, Access me renvoie tantôt un message d'erreur, tantôt un autre...
Pourtant entre Samedi soir (que tout marchait) et aujourd'hui (que rien ne
marche) je n'ai pas touché ma base.
1er message :
Erreur d'exécution '-214741781 (80010105)':
Erreur Automation
Le serveur a généré une exception
et ensuite Word me propose de récupérer les infos de mon document word et de
redémarrer word...
2nd message :
Erreur d'exécution '-2147417851 (80010105)':
La méthode 'Open' de l'objet 'Documents' a échoué
Alors je compacte ma base et je réssaie : ca marche pour un devis mais pas
pour le suivant...
J'ai essayé de réécrire ce code, ca n'a rien changé, j'ai renommé ma base et
mon fichier et j'ai aussi tout mis à jour dans mon fichier, ca marche
toujours pas, et puis d'un coup ca remarche et ca se re-arrête....... J'ai
passé mon disque à l'antivirus pour être sûre.... rien.
Est-ce que tu sais ce qu'il se passe ? Je commence à désespérer
sérieusement.... lol (à demi)
Merci encore Raymond !!
Sandra
Avatar
Raymond [mvp]
Je n'avais pas encore vidé la poubelle . je restaure ta base, je vais jeter
un oeil.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Sandra" a écrit dans le message de
news:4002ab1d$0$19280$
Raymond rebonjour !
Ben non, RS CreateDir ne marche toujours pas (j'ai aussi enlevé le dernier
) et en plus j'ai un autre
problème maintenant :
Quand je clique sur Etablir le devis dans mon formulaire Gestion des
Clients, Access me renvoie tantôt un message d'erreur, tantôt un autre...
Pourtant entre Samedi soir (que tout marchait) et aujourd'hui (que rien ne
marche) je n'ai pas touché ma base.
1er message :
Erreur d'exécution '-214741781 (80010105)':
Erreur Automation
Le serveur a généré une exception
et ensuite Word me propose de récupérer les infos de mon document word et
de

redémarrer word...
2nd message :
Erreur d'exécution '-2147417851 (80010105)':
La méthode 'Open' de l'objet 'Documents' a échoué
Alors je compacte ma base et je réssaie : ca marche pour un devis mais pas
pour le suivant...
J'ai essayé de réécrire ce code, ca n'a rien changé, j'ai renommé ma base
et

mon fichier et j'ai aussi tout mis à jour dans mon fichier, ca marche
toujours pas, et puis d'un coup ca remarche et ca se re-arrête....... J'ai
passé mon disque à l'antivirus pour être sûre.... rien.
Est-ce que tu sais ce qu'il se passe ? Je commence à désespérer
sérieusement.... lol (à demi)
Merci encore Raymond !!
Sandra




Avatar
Raymond [mvp]
J'ai regardé ta base et: si tes références sont cochées et registrées par
regsvr32 et si le répertoire sandra existe bien (est-ce le cas ?) dans
documents and settings, il n'y a aucune raison pour déclencher une erreur.
et ne pas créer les répertoires.
La compilation chez toi est-elle bonne ?

en création de devis , aucun problème sous word (hors les bookmarks ,
normal).

une remarque: on ne créé pas de sous-répertoire dans le dossier bureau pour
la 1ere raison qu'il risque de paasser à la trappe pour les sauvegardes et
la 2e raison qu'il est à la vue de tout le monde.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum