Discussion :

[sprud]

Bonjour,

J'en suis a mon tout premier post ici. Je commence un projet en access et je dois aussi utiliser vba a ce que je peux voir. Je m'y connais tres peu avec ces 2 logiciels.

Voici mon probleme

voici un print de mon script vba qui est derriere un bouton:
--------------------------------------------------------------------

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Commande39_Click()
On Error GoTo Err_Commande39_Click
 
    Dim stAppName As String
 
    stAppName = "C:\vncviewer.exe -connect 192.168.1.200 /password allo"
    Call Shell(stAppName, 1)
 
Exit_Commande39_Click:
    Exit Sub
 
Err_Commande39_Click:
    MsgBox Err.Description
    Resume Exit_Commande39_Click
 
End Sub

----------------------------------------------------------------
Donc voila, ce bouton sert a demarrer le logiciel vnc viewer, de lui donner l'adresse a se connecter au pc en quetion et en dernier il entre seul le mot de passe. (il fonctionne bien)

Ce que je voudrais faire c'est que ce meme bouton effectue cette meme tache sauf que

1- Il doit aller chercher l'adresse ip dans un champ intitulé "adresse reseau avec fil" et remplacer l'adresse existante (192.168.1.200) par l'adresse indiqué dans le champ

2- ensuite il doit aller chercher le mot de passe dans un champ intitulé "mot de passe ultravnc" et remplacer le mot de passe existant (allo) par le mot de passe indiqué dans le champ.

Donc le resultat de ce bouton fera en sorte que quand j'ai l'information d'un ordinateur "x" dans mon formulaire a l'ecran je n'aurais qu'a cliquer sur le bouton que je viens de cree et il se connectera via vnc directement sans que je ne fasse rien de plus a l'ordinateur "x". Je pourrais alors le controler pour aider mon usager.

Comme je debute et que je veux bien comprendre vos reponses, pourriez vous corriger mon script ci haut et remplacer ce qui doit etre remplace par les bonne reponses svp?

Merci du temps que vous prendrez pour m'aider. J'apprécie beaucoup.

sprud

[mout1234]

Bonsoir,

Avant d'aller plus loin, je t'invite à prendre l'habitude de nommer correctement des champs et autres contrôles.
A ce sujet, regarde par ici:
http://argyronet.developpez.com/offi...nvention/#L7-1.


Pour ton code, en supposant que les champs dont tu parles sont présents dans le formulaire comportant le bouton Commande39, tu devrais t'en sortir avec qq chose comme ceci (non testé):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
    stAppName = "C:\vncviewer.exe -connect " & Me![adresse reseau avec fil]"  /password " & Me![mot de passe ultravnc]

Bon courage

[sprud]

Bonjour,

Voici la commande exact que j'ai mis:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

stAppName = "C:\vncviewer.exe -connect " & Me![adresse ip avec fil]" /Password " & Me![UltraVnc mot de passe]

Ca ne fonctionne pas. Apres avoir essayer plusieurs tests et essaye plusieurs facon de l'ecrire cette ligne et aussi verifié que le champ "UltraVnc mot de passe" est bien dans mon formulaire je me suis rendu compte que ca fonctionne jusqu'a ce que le parametre /password sois passé. C'est ce dernier qui ne passe pas. J'ai essayer avec 2 espaces entre le guillemet et le /password et aussi essayer avec 1 seule espace. Voici aussi dans la commande ci haut, les noms modifiés des champs car il n'etait pas tout a fait exact dans ma demande.

Je vais lire aussi ce que vous me recommander.

Merci de votre aide :-)

[Domi2]

Bonsoir,

Sauf erreur , il te manque un & pour concaténer ta chaîne.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
stAppName = "C:\vncviewer.exe -connect " & Me![adresse ip avec fil]" & " /Password " & Me![UltraVnc mot de passe]

'Pour vérification
MsgBox stAppName

Domi2

[sprud]

Bonjour,

Merci à vous 2 pour votre aide.

La commande exact suivante fonctionne (J'ai ajouté également qu'il demande le port dans la demande de connection)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

stAppName = "C:\vncviewer.exe -connect " & Me![adresse ip avec fil] & ":" & Me![UltraVnc Port] & " /Password " & Me![UltraVnc mot de passe]

Encore merci !!! très apprécié!

[Domi2]

Matinal bonjour,

Bienvenue sur le forum, d'abord, et merci pour le retour

Pour en rajouter une couche sur ce qu'à dit mout1234, le simple fait de ne pas mettre d'espace dans tes noms de champs te permettrais de remplacer [adresse ip avec fil] par Me.AdresseIpAvecFil.

Ca n'a l'air de rien, mais à la longue, c'est très appréciable si tu codes beaucoup

Bon dév.

Domi2

[mout1234]

Bonsoir,

Sauf erreur , il te manque un & pour concaténer ta chaîne.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
stAppName = "C:\vncviewer.exe -connect " & Me![adresse ip avec fil]" & " /Password " & Me![UltraVnc mot de passe]

'Pour vérification
MsgBox stAppName

Domi2

Oops, mea culpa ...