Ouvrir fichier dans le code [Résolu]

[maxime115]

Bonjour!

Je vien de finir un jeu sous powerpoint, et j'aimerai faire une vérification pour savoir si le jeu est déja ouvert ou non sur un autre poste, pour empecher qu'un autre utilisateur ouvre le jeu pendant que quelqu'un joue.

Pour cela, je pense faire un fichier témoin qui se crée a la connexion d'un joueur empechant qu'un autre se connecte s'il existe.

Mais j'ai un probleme. A la fin du module où le fichier se crée, il redevient "modifiable" on peut donc le renommer et le supprimr, et la vérification tombe a l'eau...

J'aimerai donc savoir s'il est possible d'ouvrir, dans le code, ce fichier (.txt) tout au long du jeu, jusqu'a ce que l'utilisateur ferme le diaporama, ce qui entrainera la supression du fichier, ce qui rendra le .txt imodifiable.

Merci de vos réponses!!
max

[cafeine]

Hello,

oui c'est possible, j'utilise un truc du genre pour faire un lock sur une base access ...

donc voici le code à adapter au VBA PowerPoint

Code :

1
2
3
4
5
6
7
8
9
10
11
12
    Dim fic As Integer
    On Error GoTo FileErr
 
    fic = FreeFile()
    Open CurrentProject.path & "\lock.txt" For Input Access Read Lock Read Write As fic
    Exit Sub
 
FileErr:
    MsgBox "Cette base est déjà ouverte par un autre utilisateur !" & vbCrLf & _
           "PhaseManager va se fermer automatiquement.", _
           vbCritical + vbOKOnly
    Quit

[maxime115]

Ok merci bien tout est parfait!