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
» Pb 16 (en analyse): ON_CLOSE plante à l'exécution
par Jack Aujourd'hui à 20:00

» Pb 15 (en analyse): TIMER_ON plante à l'exécution
par Jack Aujourd'hui à 19:58

» Compilateur FBPano
par jean_debord Aujourd'hui à 8:49

» un nouveau editeur panobasic
par Jean Claude Hier à 20:05

» COMPILATEUR V 0.9 beta 7 du 10 aout 2017
par Pedro Alvarez Hier à 19:31

» KGF_dll - nouvelles versions
par Yannick Dim 13 Aoû 2017 - 17:35

» probleme d'outil
par Yannick Dim 13 Aoû 2017 - 17:32

» Carte de France des régions
par Yannick Sam 12 Aoû 2017 - 21:33

» Pb 14 (en analyse): PRINT_LOCATE plante à l'exécution
par Jack Ven 11 Aoû 2017 - 22:37

» Petit avertissement [Mots réservés]
par papydall Ven 11 Aoû 2017 - 13:45

» Distances sur plan
par JL35 Jeu 10 Aoû 2017 - 21:29

» Tracé : Triangle, Carrée, Dents de scie, Sinusoïde redressée
par papydall Jeu 10 Aoû 2017 - 14:52

» Troncature dans une image
par JL35 Mer 9 Aoû 2017 - 13:45

» A chacun son point de vue
par papydall Mar 8 Aoû 2017 - 17:20

» Problème avec les chaines de caractères
par bignono Dim 6 Aoû 2017 - 9:33

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 | 
 

 MyDrive Connector

Voir le sujet précédent Voir le sujet suivant Aller en bas 
Aller à la page : 1, 2, 3  Suivant
AuteurMessage
Yannick

avatar

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

MessageSujet: MyDrive Connector   Ven 24 Jan 2014 - 5:59

Je vous livre ici le code de la nouvelle mouture de ma petite application
pour se connecter à MyDrive.
Le dossier complet est zippé sur mon Webdav.
MyDrive Connector:
 
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 10:35

Super ! Très belle application ! A garder et placer sur le bureau !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
papydall

avatar

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

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 14:03

Intéressant!


Citation :
Le dossier complet est zippé sur mon Webdav.

ça me fait sourire.
Si tu savais le sens de ce mot coloré en arabe
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 15:51

J'ai fait l'EXE et j'ai placé un raccourci sur mon bureau. Très pratique !

Par contre, les numéros des icônes en absence de tes icônes personnelles sont rous les mêmes. Je propose ceci:
Code:
      else
          icon$(1) = "KGF_140"
          icon$(2) = "KGF_186"
          icon$(3) = "KGF_336"
          icon$(4) = " "
          icon$(5) = " "
          icon$(6) = " "
          icon$(7) = " "
          icon$(8) = " "
          icon$(9) = " "
          icon$(10)= " "
          icon$(11)= " "
          icon$(12)= "KGF_204"
      end_if
Ainsi, même en absence de ta bibliothèque, des icônes significatives s'affichent. Et mes félicitations d'avoir prévu les deux cas !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
papydall

avatar

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

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 18:10

Lorsque je quitte par la croix rouge c’est OK No Problem.

Par contre en quittant par l’icône « Quitter », le message d’erreur suivant est au rendez-vous
L’instruction …. emploie l’adresse mémoire… La mémoire ne peut être « read » ... et tout le baratin

Comment se prend-on pour lui poser un lapin ?

EDIT : Je ne voie nulle part DLL_OFF
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Yannick

avatar

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

MessageSujet: re   Ven 24 Jan 2014 - 18:30

@ Papydall,

Tout est tué part Terminate ou la fermeture par la croix du moins chez w7.
mais si xp ou autre l'exige on peut le rajouter juste avant le Terminate.

Que veut dire zippé en arabe ?....


@ Klaus, 

Merci pour tes commentaires et surtout pour le temps passé.
Il est vrai que les icones par défaut sont toutes les mêmes, 
je vais y placer tes suggestions .
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 4988
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 19:21

J'ai un petit souci sous W8, çà marche bizarrement.

Quand je lance le programme à partir de l'éditeur Panoramic, dans un premier temps mon navigateur s'ouvre brièvement sur MyDrive, puis je vois ceci



SUITE DANS UN DEUXIÈME MESSAGE
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 4988
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 19:22

Ensuite si je clique une deuxième fois sur le bouton (sans fermer le programme) j'ai ceci, çà marche comme ceci

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

avatar

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

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 19:30

@Ygeronimi

Nan, je ne traduit pas.
C'est un gros gros mot en Arabe!  Laughing Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
papydall

avatar

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

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 19:42

@Jean Claude
Arrivé à ce stade, tu te trouves dans le dernier MyDrive utilisé, alors fais un click sur Logout … en haut à droite et le bon compte s’affichera.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 19:59

J'ai apporté une petite modif à MyDriveConnector, pour sécuriser l'accès au browser pour l'envoi des textes: identifiant et mot de passe. Comme il cherche le contrôle actif, il ne faut pas que MyDriveConnector soit en avant-plan, sinon, il s'envoie tout à lui-même. Je cache donc la form 0, et tout va bien. Modif dans la procédure Sub_Connection():
Code:
    ' ------------------------------------------------------------------------------
    Sub Connection()
      dim_local hnd%,s$,T$,cpt%
      res% = dll_call1("GetKeyboardState",20)
      if res%>0 then res% = dll_call5("SendSingleKey",handle(0),20,0,0,0)
      hide 0
      Execute "http://www.mydrive.ch"
      hide 0  : ' <======= Klaus: sécuriser l'accès au browser pour l'envoi des textes
      pause 1000

      while left$(t$,7)<>"MyDrive"
        T$ = string$(255," ")
        hnd% = dll_call1("GetActiveWindowTitle",adr(T$))
        if T$<>string$(255," ")
            if left$(T$,7)="MyDrive"
              exit_while
            end_if
        end_if
      end_while

      s$ = Login$
      hnd% = dll_call0("GetActiveControl")
      res% = dll_call2("SendStringAsText",hnd%,adr(s$))
      s$ = chr$(9)
      res% = dll_call2("SendStringAsText",hnd%,adr(s$))
      pause 1000
      s$ = pw$
      res% = dll_call2("SendStringAsText",hnd%,adr(s$))
      pause 1000
      s$ = chr$(13)
      res% = dll_call2("SendStringAsText",hnd%,adr(s$))
      pause 1000
      show 0
    End_sub
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
papydall

avatar

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

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 20:08

@Ygernimi

Ligne 55 :
Code:
end_sub
Bien que ce soit correct du point de vue logique et syntaxe, personnellement je préfère :
Code:
exit_sub

Pour moi : une SUB doit avoir un seul END_SUB et autant de EXIT_SUB que nécessaire.
Mais comme je le disais ce n’est pas obligatoire.
C’est un simple point de vue.


J'ai toujours le message d'erreur en quittant par l'icone Quitter
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Yannick

avatar

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

MessageSujet: re   Ven 24 Jan 2014 - 20:10

@ Jean Claude,

Je ne peux te dire ce qu' il se passe avec w8, je ne l' ai pas.
Mais vu les galères avec w7, je ne doute plus des capacités de microsoft à cassez les c....
des programmeurs amateurs que nous sommes... Rolling Eyes 

J' ai eu ce problème en passant par la page :
"http://www.mydrive.ch/Login"
qui de temps en temps me basculait sur la page de login de panoramic

d' où l' adresse de la page sans "/login" et la boucle "while.....end_while" qui attend que t$ est la bonne adresse.

@ tous,

J' ai ajouté la suggestion de klaus pour les icones 
et la suggestion du mot de passe dans la création d' un compte (vu qu' il est souvent le même  Wink )
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 20:16

as-tu vu ma modification
Code:
      hide 0  : ' <======= Klaus: sécuriser l'accès au browser pour l'envoi des textes
dans Sub_Connection() ? Chez moi, c'est la différence entre un envoi de caractères n'importe où et un fonctionnement correct.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

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

MessageSujet: re   Ven 24 Jan 2014 - 20:16

@ Papydall,

As tu ajouté "dll_off" avant le terminate ?

C'est curieux, il me semblait que l' on avait résolu ce problème avec klaus... scratch 
As tu la bonne version de KGF.dll ?... ( euh...zut...elle est dans le dossier  Embarassed )
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Ven 24 Jan 2014 - 20:18

@ Klaus,

Oui mais il est déjà "hider" deux lignes au dessus...

edit:  Quoi que...Il se peut que la fonction "execute...." le remette en avant sans le montrer, cela fait une sécurité de plus...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Ven 24 Jan 2014 - 20:29

J' ai mis une version 1.1 sur le webdav avec toutes les sugestions et améliorations.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 4988
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 20:29

@Papydall,
j'ai pas le temps de cliquer sur le logout. trop rapide

Par contre je me demande pourquoi cette M... de BING est ouverte, je ne l'utilise pas.

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 20:43

Ca marche bien chez moi, comme ça. Merci !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

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

MessageSujet: re   Ven 24 Jan 2014 - 20:47

@ Jean Claude,

Comme tu le dis Bing est une grosse M.... que l' on essaye de nous refiler avec tout les installateurs.
Il faut le virer mais là bon courage car tu n' as pas fini de faire des manips, il s' incruste de partout même dans les adresses des raccourcis.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jean Claude

avatar

Nombre de messages : 4988
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 20:51

EUREKA  cheers 

J'ai trouvé, une intuition, ligne 206 j'ai augmenter la pause à 5000. (c'est le minium pour que çà marche)
c'est un peu plus long, mais c'est acceptable.

Ne me demandez pas pourquoi car je n'en sait rien.

Je me suis fait un exécutable car bien pratique

@Klaus, Ygeronimi
Vous avez peut-être la réponse du pourqoi du comment  Question 

A+

On s'est croisé, apparemment BING n'y est pour rien
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

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

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 20:58

Si je ferme par l'icone quitter, voici ce que j'obtiens  


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

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 21:02

Pour désinstaller Bing, lire les pages suivantes:
http://www.olivierpons.fr/2009/09/02/desinstaller-bing/
http://www.francoischarron.com/-/4lFjqr2Lyz/
http://www.youtube.com/watch?v=2mfVRd_XSbw

Pour Firefox:
Citation :
Dans about:config la clé keyword.URL : double clic dessus et on a
http://www.google.com/search?sourceid=navclient&gfns=1&q= ou http://www.google.fr/#hl=fr&q=
si ce n'est pas le cas remplacer le vilain par une de ces deux adresses (Google "jai de la chance" ou Google "recherche")

Il y a plein de liens sur le net pour "désinstaller bing". ca paraît délicat, mais pas impossible. En tout cas, les indications ci-dessus devraient apporter une solution.

EDIT

Je vais regarder ce problème de temps d'attente...

EDIT

Effectivement, il y a des fois des "ratés" pour la connexion. Chez moi, avec 3000, ça passe à tous les coups.

Donc, cela veut dire que ça dépend de la vitesse de la ligne ADSL, Et ça varie encore si au moment du lancement, ton browser est lancé ou non. S'il n'est pas lancé, c'est évidemment plus long que s'il est déjà ouvert. Dans ce dsernier cas, 1000 est suffisant. Et si la ligne ADSL est relativelent lente, ou si la charge du serveur de MyDrive est élevée, l'affichage de la fenêtre de login tardera également, et donc le délai devra être plus long.

Tout ça pour dire que ça dure... un certain temps. Réponse de normand: ça depend... Donc, à chacun de voir, en fonction de sa situation propre, quel délai marche à tous les coups.

Ygerinmi a bien programméé une boucle d'attente. Elle me semble correct et je ne vois rien à y redire. Mais elle ne semble quand-même pas pouvoir se passer du délai, et je ne sais pas encore pourquoi.



Dernière édition par Klaus le Ven 24 Jan 2014 - 21:16, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Jean Claude

avatar

Nombre de messages : 4988
Age : 63
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: MyDrive Connector   Ven 24 Jan 2014 - 21:06

Merci Klaus, je vais y regarder.

Mais as-tu vu mon message précédent ?


RESTE UN PETIT SOUCI: de temps en temps la fenêtre disparaît sans avoir été fermée et le processus est toujours actif.

Bon c'est l'heure de l'apéro.

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Ven 24 Jan 2014 - 21:15

@ papydall,

Cela dépasse mes compétences...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: MyDrive Connector   

Revenir en haut Aller en bas
 
MyDrive Connector
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 3Aller à la page : 1, 2, 3  Suivant
 Sujets similaires
-
» Au sujet de mydrive
» 3D_WORLD !
» Timer qui ne veut pas faire son boulot
» Overclocker le SR-2
» Fan splitter, petite question

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: