FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Simuler l’appui de n’importe quelle touche.
par papydall Hier à 23:54

» Le Forum est en vacances.
par JL35 Hier à 21:20

» Une autre façon de terminer une application.
par JL35 Mar 22 Aoû 2017 - 14:27

» Compilateur FBPano
par Mike Lun 21 Aoû 2017 - 23:17

» Pb 20 (en analyse): plantage à l'appel d'un SUB
par Jack Lun 21 Aoû 2017 - 21:58

» Pb 19 (en analyse): libellé d'erreur dans des IF imbriqués
par Jack Lun 21 Aoû 2017 - 21:55

» Copier / coller du texte à partir de la fenêtre de commandes
par jean_debord Lun 21 Aoû 2017 - 9:46

» COMPILATEUR V 0.9 beta 8 du 18 aout 2017
par papydall Lun 21 Aoû 2017 - 5:01

» Mettre en windows en veille
par papydall Lun 21 Aoû 2017 - 4:15

» Stretch_on ne stretch plus...
par papydall Dim 20 Aoû 2017 - 15:22

» Pb 18 (en analyse): RESTORE_LABEL avec DATA à la fin
par Jack Dim 20 Aoû 2017 - 13:21

» Problème de traitement des opérateurs avec le compilateur.
par Pedro Alvarez Sam 19 Aoû 2017 - 20:01

» Pb 17 (résolu): ITEM_SELECT ne fonctionne pas
par Jack Jeu 17 Aoû 2017 - 19:26

» un nouveau editeur panobasic
par Jean Claude Jeu 17 Aoû 2017 - 10:18

» Le compilateur.
par Pedro Alvarez Jeu 17 Aoû 2017 - 8:36

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 Télécharger une page web

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
JL35



Nombre de messages : 5928
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Télécharger une page web   Jeu 17 Sep 2015 - 22:43

J'avais déjà donné un script pour ça, voici un moyen encore plus simple et plus rapide, sans ressources externes: utilisation de powershell dans une sub d'une seule ligne (exemple: téléchargement de la liste des commandes Panoramic):
Code:
DIM url$, fr$
url$ = "http://panoramic-language.pagesperso-orange.fr/French/LIST_alpha.htm"
fr$ = "C:\TEMP\Pano_List.htm"
WIDTH 0,1200: HEIGHT 0,SCREEN_Y
HVIEWER 1: FULL_SPACE 1
WebFile(url$,fr$)
FILE_LOAD 1,fr$
END
' ==============================================================================
SUB WebFile(url$,fr$)
' Télécharger dans fr$ la page web (fichier html) à l'adresse web url$
EXECUTE_WAIT "Powershell (New-Object System.Net.WebClient).DownloadFile('"+url$+"'"+",'"+fr$+"')"
END_SUB
' ==============================================================================
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

Nombre de messages : 7975
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 17 Sep 2015 - 22:59

Si tu me formates cela pour le site, elle y prendra sa place.
Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jicehel

avatar

Nombre de messages : 5849
Age : 45
Localisation : 77500
Date d'inscription : 19/04/2011

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015 - 23:12

extra Smile On ne peut plus simple et très efficace. Ca doit être du JL35. Ah oui, c'est bien ça Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 5928
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015 - 23:26

Salut Ygeronimi,
Je t'ai mis un petit WebFile.zip dans les procédures (un fichier .txt et un fichier .bas), mais il n'y a pas grand'chose à en dire...

Merci Jicehel, c'est vrai qu'à côté des scripts vbs et autres que j'ai dans mes tiroirs c'est extrêmement simple !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

Nombre de messages : 7975
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 17 Sep 2015 - 23:36

Merci JL35 !

Youpi !!! je vais modifié la page procédures !!!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 5928
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015 - 23:48

OK,
du coup, je lance le défi à qui peut faire ça dans une procédure plus petite (moins d'une ligne) Very Happy
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Marc37



Nombre de messages : 443
Age : 56
Localisation : TOURS
Date d'inscription : 18/03/2014

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015 - 0:00

Bonjour à tous !

Simple mais terriblement efficace !
Merci JL35 pour ces quelques lignes de code.

Marc
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 5928
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015 - 0:03

Merci Marc ! en fait toute la substance est dans une seule ligne. Sur ce... Sleep
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

Nombre de messages : 7975
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Ven 18 Sep 2015 - 0:07

C' est en ligne dans la rubrique "Procédures".

Et il est content... Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5523
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015 - 0:22

JL35 a écrit:
OK,
du coup, je lance le défi à qui peut faire ça dans une procédure plus petite (moins d'une ligne)  Very Happy

Moins d'une ligne ?
De combien ?
Un quart de ligne, ça peut faire l'affaire ?
Hmmm, non, je ne peux pas car un quart de ligne, ça fait quand même une ligne! Shocked

En tout cas, merci pour ta ligne.
Heu, il s'agit de ta ligne de code.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Marc37



Nombre de messages : 443
Age : 56
Localisation : TOURS
Date d'inscription : 18/03/2014

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015 - 0:27

Humm... désolé, je dû rater quelque chose... (mauvais élève, je suis !)
Citation :
C' est en ligne dans la rubrique "Procédures".
Où trouve-t-on cette rubrique ?
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5523
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015 - 0:43

C’est dans Le Mag

Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Yannick

avatar

Nombre de messages : 7975
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Ven 18 Sep 2015 - 0:43

Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Marc37



Nombre de messages : 443
Age : 56
Localisation : TOURS
Date d'inscription : 18/03/2014

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015 - 1:12

Vu ! C'est une mine d'or !
Merci à tous.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
jpcr

avatar

Nombre de messages : 276
Age : 50
Localisation : Val de Marne (94)
Date d'inscription : 06/05/2011

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015 - 9:44

c'est vrai que ce serait bien de mettre le mag dans la partie navigation a gauche pour un accès direct.

jp
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://jeanpierre.creis.free.fr/Panoramic/Panoramic.html
Jicehel

avatar

Nombre de messages : 5849
Age : 45
Localisation : 77500
Date d'inscription : 19/04/2011

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015 - 9:49

bonne idée jpcr Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

Nombre de messages : 7975
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Mer 9 Mar 2016 - 23:06

Je remonte un sujet des catacombes mais j' ai une petite question
pour notre ami JL35.

Aurais tu une astuce pour ne pas voir la fenêtre shell comme tu l' avais pour la fenêtre dos ?
Laughing Embarassed
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 5928
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Jeu 10 Mar 2016 - 0:13

Salut ygeronimi,
Alors là, je sèche...
Il y a bien un paramètre Powershell qui est '-WindowStyle Hidden', qui est censé cacher la fenêtre d'exécution, je l'ai essayé dans la commande, mais chez moi ça ne change rien, ou bien je ne sais pas le mettre en oeuvre...

Je regarde,mais...


Allez mon ami, c'est bien parce que c'est toi, mais essaie ça pour voir (exemple comme ci-dessus: chargement de la page panoramic des mots-clés):
Code:
DIM url$, fr$, pr$
url$ = "http://panoramic-language.pagesperso-orange.fr/French/LIST_alpha.htm"
fr$ = "C:\TEMP\Pano_List.htm"

if file_exists(fr$)=1 then file_delete fr$
WebFile_discret(url$,fr$)
WIDTH 0,1200: HEIGHT 0,SCREEN_Y
HVIEWER 1: FULL_SPACE 1
FILE_LOAD 1,fr$
END

SUB WebFile_discret(url$,fr$)
  ' Télécharger dans fr$ la page web (fichier html) à l'adresse web url$ (méthode discrète)
  DIM_LOCAL pr$,vb$,q$: vb$ = "C:\Temp\Vb.vbs": q$ = CHR$(34)
  pr$="Powershell.exe (New-Object System.Net.WebClient).DownloadFile('"+url$+"'"+",'"+fr$+"')"
  FILE_OPEN_WRITE 9, vb$: ' ===== Création du script .vbs =====
    FILE_WRITELN 9,"CreateObject("+q$+"Wscript.Shell"+q$+").Run "+q$+pr$+q$+",0,True"
  FILE_CLOSE 9
  EXECUTE_WAIT "WSCRIPT.exe "+vb$: ' ===== Exécution du script =====
  FILE_DELETE vb$
END_SUB
J'ai repris la technique classique de masquage de fenêtre avec un script vbs.
Mais là il faut quelques lignes en plus, c'est moins joli ! Very Happy
mais après tout aussi efficace.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5523
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Télécharger une page web   Jeu 10 Mar 2016 - 3:53

Après avoir séché, JL35  a plongé dans les eaux calmes : il a suivit les sentiers battus pour ne pas s’égarer.
Le résultat c’est qu’il est arrivé à bon port ;  et ça c’est ce qui est demandé.
Ygeronimi doit être ravi !  
Et moi, je dois me taire. silent
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Yannick

avatar

Nombre de messages : 7975
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 10 Mar 2016 - 8:14

cheers cheers cheers cheers cheers cheers cheers cheers cheers cheers cheers cheers

Bravo JL35 !

cela fonctionne au poil ! et pour les fans du download, cela fonctionne aussi sur des fichiers *.zip.
Il suffit de mettre l' adresse du lien, exemple :
"http://klauspanoramic.comxa.com/versions/KGF.zip"




...et il est content. Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 5928
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Jeu 10 Mar 2016 - 12:36

Tant mieux !

papydall a écrit:
Après avoir séché, JL35  a plongé dans les eaux calmes

En principe, je me sèche plutôt après avoir plongé, mais bon...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Télécharger une page web   

Revenir en haut Aller en bas
 
Télécharger une page web
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Page lente à charger.
» [Lixyr Yrna] Une page d'accueil pour rainbow style
» Supprimer seachqu-com/406 en page de démarrage
» Accéder à la page login via template
» Difficulté avec ma page d’accueil

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC 32 bits :: Vos sources, vos utilitaires à partager-
Sauter vers: