Discussion :

[pocketpit]

Bonjour

Dans une table j'ai rajouté un champ Txt : " ZWEB1 " (Alphanumérique : longueur 250 récupéré via copié coller d'un document sur serveur SharePoint)

Dans un écran je rajoute cette zone de saisie qui contient un lien vers un document SharePoint genre : http://srvshare/mondocument.docx
Dans ce même écran j'affiche un Bouton " ZBUT1 " avec l'image du bouton "63"

L'utilisateur copie colle son lien http dans la zone de l'écran et c'est stocké dans la table tout va bien.

La question qui découle du bouton étant la suivante : Quand l'utilisateur CLIC (Sur événement donc) je souhaiterai que le lien http contenu tel quel dans le champ ZWEB1 s'exécute.

Je n'arrive pas à gérer cette fonction sur CLIC.

Une idée quelconque ?

Merci à vous
Cordialement
Pocket

[rvduclos]

Bonjour,

perso j'utilise ASKUI avec un shell sur l'explorer et je vérifie au préalable l’existence du fichier, à améliorer :

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
17
18
Subprog CL_ZAIDE(VALEUR)
Variable Char    VALEUR()
Local Clbfile RETOUR(10)
Local Char URL(200)
Local Integer ER
 
  If VALEUR="63" Then
    [L]URL="\\MonServeur\MonDoc.doc" 
    [L]ER=filinfo([L]URL,7)
    If [L]ER>=0 Then  
     [L]URL="explorer "+chr$(34)+[L]URL+chr$(34)
      Setlob [L]RETOUR With ""
    Askui [L]RETOUR="" With "UIAsk="+chr$(1) + "AskExecShell",
& "UILocalShell="+ chr$(1) +  [L]URL
     Setlob [L]RETOUR With ""
  Endif
  Endif
End

[matica]

Bonjour,

tu peut executer cette commande de système:

Code :

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

1
2
3
4
5
 
Subprog CL_ZBUT1(VALEUR)
Variable Char    VALEUR()
    System("#@cmd.exe /C start http://srvshare/mondocument.docx")
End

[rvduclos]

Bonjour Matica,

avec cette commande, vous n'avez pas de message d'erreur "Signal débordement adressage" et fermeture de X3 ?

[matica]

Bonjour rvduclos,

Oui, vous avez raison il n'y a pas auçune message par X3.
Si l'URL est erronée, il va ouvrire simplement le navigateur web avec un message d'erreur «Page not found»

Matteo