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
» Panoramic et ses curiosités
par Jean Claude Aujourd'hui à 8:48 pm

» Synedit Parameters
par Jean Claude Aujourd'hui à 8:15 pm

» Utilitaire de suppression de fichiers
par Jean Claude Aujourd'hui à 8:11 pm

» Code à vérifier SVP (Oups ! résolu)
par Jean Claude Hier à 8:16 pm

» Compilateur FBPano
par jean_debord Hier à 8:56 am

» Bienvenue à Virtualalan !
par UltraVox Hier à 8:18 am

» Concours de Morpions
par jjn4 Mer 21 Juin 2017, 11:04 pm

» ShortName$(F) [Cloturé]
par papydall Mer 21 Juin 2017, 3:19 pm

» Remplacer espace par tiret dans noms des dossiers / fichiers
par papydall Mer 21 Juin 2017, 2:27 pm

» Menu personalisé avec icones et menu contextuel
par Laurent (Minibug) Mer 21 Juin 2017, 11:44 am

» La liste des choses à faire ...
par Jack Mar 20 Juin 2017, 9:49 pm

» Quoi de neuf à propos de Goric 3D ? (@Jack)
par UltraVox Mar 20 Juin 2017, 8:06 pm

» Nom court et anti fenetre dos
par silverman Mar 20 Juin 2017, 5:31 pm

» Ludothèque Panoramic
par jjn4 Mar 20 Juin 2017, 5:09 pm

» Proposition à la communauté
par Yannick Mar 20 Juin 2017, 2:02 pm

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juin 2017
LunMarMerJeuVenSamDim
   1234
567891011
12131415161718
19202122232425
2627282930  
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 : 5882
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Télécharger une page web   Jeu 17 Sep 2015, 9:43 pm

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 : 7824
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 17 Sep 2015, 9:59 pm

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 : 5838
Age : 44
Localisation : 77500
Date d'inscription : 18/04/2011

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015, 10:12 pm

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 : 5882
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015, 10:26 pm

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 : 7824
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 17 Sep 2015, 10:36 pm

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 : 5882
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015, 10:48 pm

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 : 441
Age : 56
Localisation : TOURS
Date d'inscription : 17/03/2014

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015, 11:00 pm

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 : 5882
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015, 11:03 pm

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 : 7824
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 17 Sep 2015, 11:07 pm

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 : 5384
Age : 66
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015, 11:22 pm

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 : 441
Age : 56
Localisation : TOURS
Date d'inscription : 17/03/2014

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015, 11:27 pm

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 : 5384
Age : 66
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Télécharger une page web   Jeu 17 Sep 2015, 11:43 pm

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 : 7824
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 17 Sep 2015, 11:43 pm

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



Nombre de messages : 441
Age : 56
Localisation : TOURS
Date d'inscription : 17/03/2014

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015, 12:12 am

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, 8:44 am

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 : 5838
Age : 44
Localisation : 77500
Date d'inscription : 18/04/2011

MessageSujet: Re: Télécharger une page web   Ven 18 Sep 2015, 8:49 am

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

avatar

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

MessageSujet: re   Mer 09 Mar 2016, 10:06 pm

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 : 5882
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Mer 09 Mar 2016, 11:13 pm

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 : 5384
Age : 66
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, 2:53 am

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 : 7824
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 10 Mar 2016, 7:14 am

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 : 5882
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Télécharger une page web   Jeu 10 Mar 2016, 11:36 am

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: