Interface de programme console géré par lien ole

Soyez le premier à donner votre avis sur cette source.

Vue 7 163 fois - Téléchargée 561 fois

Description

c'est un petit soft qui peut servir d'interface entre des applis gérés par redirection des entrée/sortie et commandé par lien OLE
il peut être commandé par VBS/JS/Perl/Python/VBA depuis excel ou Word...
le but :servir d'interface pour commander les utilitaires de Putty depuis Excel ou VBS.(Putty fournit Telnet/SSH, sftp et un ftp console est dispo en complément sur ce site)
--------------------------------------
les commandes OLE sont les suivantes :
--------------------------------------
OLE.CmdOut(A$) to send a command line to run
=> automatic reset of TextIn
=> automatic reset of waitStatus
A$ = OLE.CmdStatus ON/OFF to read status of CMDole.exe children process
OLE.CmdSet(A$) "SOFT.EXE" to launch CMDole.exe children process
"OFF" to stop CMDole.exe children process
A$ = OLE.TextIn to read text received after last command sent
A = OLE.LineNbrIn to read Nbr of lines received after last command sent
A$ = OLE.LineIn(Nb) to read a specific line
OLE.FilterSet(A$) "ON"/"OFF" to activate/desactivate Filter at TextIn reading
OLE.FilterFor(Nb),(A$),(B$) 0<9 KeyWords A$ to search in text received after a command sent
and to replace by B$
OLE.WaitFor(Nb),(A$),(B$) 0<5 KeyWords A$ to search in text to receive
=> if B$ = "" then modification of WaitStatus
=> if B$ <> "" then B$ is sent on command line
OLE.WaitReset to make a reset of Waitstatus
A = OLE.WaitStatus to read result of WaitFor search (if nothing to send back)
if in WaitFor() A$ <> "" and B$ = "" => WaitStatus positionned
result = $1+$2+$4+$8+$10 for WaitFor(0,1,2,3,4))
OLE.InitReset to Reset WaitFor(), Filterfor() and Show()
OLE.Path to read path of CMDole
OLE.Show(A) 0/1/2 to manage CmdOle windows Invisible/protected+Visible/Visible
OLE.UserOut(A$),(B$) to send automatic user A$= request of User / B$ = User to send
OLE.PasswOut(A$),(B$) to send automatic Password A$= request of password / B$ = Password to send

Conclusion :


une bonne base de travail pour créer une interface OLE <=> Telnet/SSH/FTP/SFTP/DOS (ou autre soft console...)

les problèmes résiduels :
en cas de crash de script, le soft final géré par redirection peut ne pas être pas libéré malgré l'intégration d'un process pour libérer ces applis par le Handle ou par le nom dans la liste des process...

Codes Sources

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.