Discussion :

[Vieileric]

Bonjour

J'ouvre la calculette avec "shell" puis je veux y envoyer le nombre contenu dans le presse-papiers.
Pour cela j'utilise: sendkeys "^(V)", true.
Cela me crée une erreur 70, alors que tout fonctionnait avec des versions antérieures de windows.

Y a-t-il une solution.
Par exemple peut-on passer une valeur à la calculette sans passer par le presse-papiers ?

Merci d'avance

[ProgElecT]

Salut
Sa fait longtemps, il me semble que c'est

Code :

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

sendkeys "^V", true

[Vieileric]

J'ai aussi essayé ainsi, mais c'est pareil.
En principe les parenthèses indiquent qu'on reste appuyé sur Ctrl quand on tape V

[unparia]

Bonjour
(atterri ici par hasard)
ne pas confondre parenthèses et accolades.

Code :

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

SendKeys "^{V}", True

exemple (ici en collant le contenu du presse-papier dans une textbox :

Code :

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

1
2
3
Clipboard.SetText "toto"
Text1.SetFocus
SendKeys "^{V}", True

[Vieileric]

Bonjour
Le code est OK, mais le problème c'est que le système (Win10 1803) refuse l'instruction sendkey (pour simuler Ctrl V).
Dans un exécutable compilé il ne se passe rien, et dans VB6 j'ai un message d'erreur : permission refusée, erreur 70
Est-ce encore un bug de Win10, car cela fonctionnait dans le temps ?
Merci

[ProgElecT]

Salut

Dans un exécutable compilé il ne se passe rien

Bouton droit de la souris, Exécuter en tant que administrateur?

dans VB6 j'ai un message d'erreur : permission refusée, erreur 70

Bouton droit de la souris sur VB6.exe, Exécuter en tant que administrateur? , charger le projet, run ?

[Vieileric]

Salut

Bouton droit de la souris, Exécuter en tant que administrateur?
Bouton droit de la souris sur VB6.exe, Exécuter en tant que administrateur? , charger le projet, run ?

J'ai essayé. Rien.
J'ai testé le petit code indiqué plus haut. Rien.
J'ai toujours "Permission refusée Erreur 70"
Clairement "sendkeys" ne fonctionne plus, en tout cas pour simuler Ctrl V
Une idée ?

Merci

[wilder1626]

Bonjour Vieileric,

le sujet date depuis très longtemps mais je crois bon de le menssionner car j'ai déjà eu à faire face à cette erreur.

Code :

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

1
2
3
4
5
Clipboard.SetText "toto"
Text1.SetFocus
Dim WshShell As Object
    Set WshShell = CreateObject("wscript.shell")
    WshShell.SendKeys "^v", Wait

De cette façon, ça devrait fonctionner.

[DAUDET78]

Cela me crée une erreur 70, alors que tout fonctionnait avec des versions antérieures de windows.

Moi, j'aime pas l'ergonomie de la calculette de W7 et suivant.
J'utilise la calculette de XP .
Tu as essayer de l'utiliser en copiant le fichier C:\Windows\System32\Calc.exe d'un OS XP dans C:\Windows\System32\Calc_XP.exe de ton OS Windows ?