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
» KGF.dll - demandes ou suggestions de modifications ou ajouts
par Klaus Aujourd'hui à 19:48

» KGF_dll - nouvelles versions
par pascal10000 Aujourd'hui à 17:27

» Mah-Jong européen new-look
par Minibug Hier à 22:31

» track_bar circulaire
par Klaus Hier à 13:54

» API Windows
par Klaus Hier à 3:21

» Cartes de voeux, menus, etc.
par JL35 Lun 11 Déc 2017 - 17:48

» a l'aide klaus
par Minibug Lun 11 Déc 2017 - 11:42

» bug SYNEDIT_TARGET_IS_OBJECT
par Jack Lun 11 Déc 2017 - 0:16

» Jukebox : Serge Reggiani
par papydall Sam 9 Déc 2017 - 5:58

» Ecouter la radio fm sur votre pc
par pascal10000 Sam 9 Déc 2017 - 3:42

» anomalie
par Klaus Sam 9 Déc 2017 - 3:21

» hommage
par Jicehel Ven 8 Déc 2017 - 11:29

» Logiciel de soutien scolaire en langues.
par Pedro Alvarez Ven 8 Déc 2017 - 10:43

» carte son
par Klaus Ven 8 Déc 2017 - 2:37

» mise a jour calculatrice
par joeeee2017 Mer 6 Déc 2017 - 22:19

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Décembre 2017
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
25262728293031
CalendrierCalendrier

Partagez | 
 

 Mon Ecurie

Voir le sujet précédent Voir le sujet suivant Aller en bas 
Aller à la page : Précédent  1, 2, 3, 4, 5, 6  Suivant
AuteurMessage
Jicehel

avatar

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

MessageSujet: Re: Mon Ecurie   Ven 26 Avr 2013 - 18:26

Ne t'inquiète pas, je te charie, mais je n'y vois aucun inconvénient. C'est bien que tu partages tes avancées et tes problématiques Wink (Tout comme Klaus puisqu'à chaque fois en plus c'est pour une avancée et de nouvelles possibilités Wink )
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Ven 26 Avr 2013 - 19:34

@ Jicehel,

En fait j'essaie de mettre l'avancée pas à pas pour que ceux qui suivent puissent comprendre
et, surtout, évitent les mêmes stupidités qui finissent par te faire devenir chêvre... Laughing
Ecrire un bug, c'est une chose mais après pour le retrouver c' est souvent des heures de galère... Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

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

MessageSujet: Re: Mon Ecurie   Ven 26 Avr 2013 - 19:54

ygeronimi a écrit:

Ecrire un bug, c'est une chose mais après pour le retrouver c' est souvent des heures de galère... Laughing

Ça s’appelle le jeu le plus formidable qu’un mortel eût pu inventer !
Alors souviens toi que tu es l’un de plus heureux puisque tu y joues sans payer un centime !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Yannick

avatar

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

MessageSujet: re   Ven 26 Avr 2013 - 20:03

Et il y en a qui se marre ....

lol!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Ven 26 Avr 2013 - 22:01

Bon, toujours pas de solution au problème de SendItQuiet... scratch
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

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

MessageSujet: Re: Mon Ecurie   Ven 26 Avr 2013 - 22:16

Je suis en train de tester.

Première remarque; tu ne devrais pas inclure ton mot de passe de messagerie dans la distribution !

EDIT

Un regard plus approfondi constate que l'adresse mail du lad sélectionné n'est pas retrouvée. La fonction retourne *NO. Fais ceci:
Code:
Sub SendByMail(AM$)
  Dim_Local fich%,x%,cmd$,prog$,Dest$,Suj$,PJ$,DM$
  BDRfindrelation("?",Adress$,AM$,38)
  Dest$=item_read$(38,1): Suj$="Communication Ecurie" : PJ$=Path$+"Document_Ecurie.Txt"
message "Dest$="+Dest$ : ' <====================
  prog$="SendItQuiet"
...
et tu le constateras.

Ceci montre aussi que ton test
Code:
  if Dest$<>""
n'est pas le bon. Teste le code retour ou la présence d'un "*" en premier caractère.

Le message de SenditQuiet est "l'adresse n'est pas dans le format autorisé" ou quelque chose de ce genre.


Dernière édition par Klaus le Ven 26 Avr 2013 - 22:32, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

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

MessageSujet: re   Ven 26 Avr 2013 - 22:18

Tout est bidon !!!
lol!


je me demande si les changements d'hotmail >Outloock n'y sont pas pour rien ?
Ceci dit sur windows live mails je n'ai rien changé et çà fonctionne.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

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

MessageSujet: Re: Mon Ecurie   Ven 26 Avr 2013 - 22:33

Tu as vu mon message précédent ? Tout y est expliqué.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

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

MessageSujet: re   Ven 26 Avr 2013 - 22:36

Nos post ce sont croisés, je regarde cela tout de suite !

Merci Klaus
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Ven 26 Avr 2013 - 22:46

J' ai placé deux messages

un pour verifier Dest$ juste avant le if Dest$<>""
un pour voir ce qui allait être passé par execute juste avant celui ci
voilà le résultat :


as tu la dernière version ? 1.6 ?


ceci dit, il est vrai que le if n'est pas bon et que je dois changer çà car dans le cas du No* le problème que tu évoques va se poser.

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

avatar

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

MessageSujet: Re: Mon Ecurie   Ven 26 Avr 2013 - 23:05

J'ai placé ceci dans un fichier x.bat:
Citation :
SendItQuiet -s "smtp.mail.yahoo.fr" -port "587" -u "xxx.yyy@yahoo.fr" -p "ppppp" -f "xxx.yyy@yahoo.fr" -t "xxx.yyy@yahoo.fr" -subject "Communication Ecurie" -body "Communication Ecurie" -files "Document_Ecurie.txt"
en mettant bien sûr mon mot de passe à la place de ppppp et mon compte yahoo à la place de xxx.yyy. Et j'ai bien reçu le mail avec la pièce jointe.

Le problème, dans ton cas, c'est le passage de paramètres à un programme en mode DOS. Au lieu de soumettre la commande (qui est correcte) à la commande EXECUTE, crée un fichier temporaire ecurie_denditquiet.bat et palce ta commande dans ce fichier. Puis, lance la commande par
Code:
EXECUTE "ecurie_senditquiet.bat"
et ça devrait marcher.

EDIT

Oui, j'ai la version 1.6.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

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

MessageSujet: re   Ven 26 Avr 2013 - 23:08

je mets en application tout de suite !

Merci Klaus
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Ven 26 Avr 2013 - 23:24

Je crois que cette option va finir par disparaitre ... Laughing

Rien à faire, je ne reçois rien !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

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

MessageSujet: Re: Mon Ecurie   Ven 26 Avr 2013 - 23:46

Ne te décourage pas ! PLace la commande PAUSE en deuxième ligne ! Tu verras le résultat de SendItQuiet.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

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

MessageSujet: re   Sam 27 Avr 2013 - 0:11

il me dit qu'il va m'envoyer le mail...
...mais j'aimerai surtout qu'il arrive... Laughing

Edit, chose qu'il ne fait pas bounce bounce
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Sam 27 Avr 2013 - 0:33

Combien de temps tu mets à recevoir le message avec la piece jointe ?

voila l'etat actuel de la sub :
Code:
Sub SendByMail(AM$)
  Dim_Local fich%,x%,cmd$,prog$,Dest$,Suj$,PJ$,DM$
  BDRfindrelation("?",Adress$,AM$,38)
  Dest$=item_read$(38,1): Suj$="Communication Ecurie" : PJ$=Path$+"Document_Ecurie.Txt"
  prog$="SendItQuiet"
  if Serv$="" or Port$="" or AdressM$="" or MDP$="" or Dest$="" or Prot$=""
      if Serv$="" then DM$="Serveur"
      if Port$="" then DM$="Port"
      if AdressM$="" then DM$="Utilisateur"
      if MDP$="" then Dm$="Mot de passe"
      if Dest$="" then DM$="Destinataire"
      if message_error_ok("Des données sont manquantes,"+chr$(13)+DM$+chr$(13)+" la procédure va être annulée !")=1
        exit_sub
      end_if
  end_if
  if Dest$<>"No*"
      cmd$ = prog$+" -s "+chr$(34)+Serv$+chr$(34)
      cmd$ = cmd$ +" -port "+chr$(34)+port$+chr$(34)
      cmd$ = cmd$ +" -u "+chr$(34)+AdressM$+chr$(34)
      cmd$ = cmd$ +" -protocol "+chr$(34)+Prot$+chr$(34)
      cmd$ = cmd$ +" -p "+chr$(34)+MDP$+chr$(34)
      cmd$ = cmd$ +" -f "+chr$(34)+AdressM$+chr$(34)
      cmd$ = cmd$ +" -t "+chr$(34)+Dest$+chr$(34)
      cmd$ = cmd$ +" -subject "+chr$(34)+Suj$+chr$(34)
      cmd$ = cmd$ +" -body "+chr$(34)+Suj$+chr$(34)
      cmd$ = cmd$ +" -files "+chr$(34)+PJ$+chr$(34)
      clear 38
      item_add 38,cmd$
      file_save 38,"ecurie_senditquiet.bat"
      execute "ecurie_senditquiet.bat"
      clear 38
      file_delete "ecurie_senditquiet.bat"
  else
      If Message_warning_ok("Adresse du destinataire invalide !")=1
      end_if
      exit_sub
  end_if
End_Sub


Dernière édition par ygeronimi le Sam 27 Avr 2013 - 0:35, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

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

MessageSujet: Re: Mon Ecurie   Sam 27 Avr 2013 - 0:35

Essaie le port 25. Le port 587 est pour "smtp.mail.yahoo.fr" comme chez moi: je passe par yahoo.fr, pas par live.com.

Sinon, voici des extraits de pages d'infos:
Citation :
Serveur POP : pop3.live.com (Port 995 avec connexion SSL)
Serveur SMTP : smtp.live.com (Port 25 avec connexion SSL)
******************************
Mais depuis mi-janvier 2009, les serveurs POP et SMTP sont accessibles à tous.

Voici leurs adresses :
Serveur POP3 : pop3.live.com (SSL, port 995)
Serveur SMTP : smtp.live.com (SSL, port 25 ou 587)
*******************************
Serveur de courrier sortant (SMTP)
Adresse du serveur : smtp.live.com
Port : 25 (ou 587 si 25 est bloqué)
Authentification : oui
Connexion chiffrée sécurisée TLS ou SSL : oui

Ici in lien vers une page avec des infos détaillées.

Il y a aussi ceci:
Citation :
Il est impératif d'activer la connexion chiffrée SSL pour le serveur de réception POP (généralement une case à cocher dans les paramètres avancés du compte). Il faut également activer la connexion chiffrée pour le serveur d'envoi SMTP, SSL si il s'agit dans votre logiciel d'une unique case à cocher et TLS ou automatique si il s'agit d'une menu de choix déroulant.
Tu devras donc peut-être ajouter
Code:
-protocol ssl
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Klaus

avatar

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

MessageSujet: Re: Mon Ecurie   Sam 27 Avr 2013 - 0:35

Message croisé. Pour moi, cela a pris 2 secondes.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

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

MessageSujet: re   Sam 27 Avr 2013 - 0:37

j' ai essayé

587 normal et ssl
25 normal et ssl

sans résultat No
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Sam 27 Avr 2013 - 0:39

Hein!!!!!!!.....2 secondes !!!!! je crois qu'il se paye ma poire le senditquiet.... Laughing
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

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

MessageSujet: Re: Mon Ecurie   Sam 27 Avr 2013 - 0:39

Certes. Mais as-tu mis le paramètre protocol dans ta commande ? Je ne le vois pas.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Klaus

avatar

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

MessageSujet: Re: Mon Ecurie   Sam 27 Avr 2013 - 0:43

J'utilise SendItQuiet depuis longtemps. Voici un programme de démo que j'ai fait. Cela te permet de déterminer la commande exacte à envoyer à SendItQuiet pour le faire conctionner:
Code:
label envoyer, copier

dim options$(11), i%, cmd$
dim prog$ : prog$ = "SendItQuiet"

data "s","port","u","p","f","t","subject","body","bodyfile","files","protocol"

height 0,600

alpha 1 : top 1,10 : left 1,10 : caption 1,"Serveur SMTP:"
edit 2 : top 2,10 : left 2,150 : width 2,300

alpha 11 : top 11,40 : left 11,10 : caption 11,"Port du serveur:"
edit 12 : top 12,40 : left 12,150 : width 12,40

alpha 21 : top 21,70 : left 21,10 : caption 21,"Compte utilisateur:"
edit 22 : top 22,70 : left 22,150 : width 22,300

alpha 31 : top 31,100 : left 31,10 : caption 31,"Mot de passe:"
edit 32 : top 32,100 : left 32,150 : width 32,300

alpha 41 : top 41,130 : left 41,10 : caption 41,"Expéditeur:"
edit 42 : top 42,130 : left 42,150 : width 42,300

alpha 51 : top 51,160 : left 51,10 : caption 51,"Destinataire:"
edit 52 : top 52,160 : left 52,150 : width 52,300

alpha 61 : top 61,190 : left 61,10 : caption 61,"Sujet:"
edit 62 : top 62,190 : left 62,150 : width 62,300

alpha 71 : top 71,220 : left 71,10 : caption 71,"Ligne de message:"
edit 72 : top 72,220 : left 72,150 : width 72,300

alpha 81 : top 81,250 : left 81,10 : caption 81,"ou fichier message HTML:"
edit 82 : top 82,250 : left 82,150 : width 82,300

alpha 91 : top 91,280 : left 91,10 : caption 91,"Fichiers joints:"
edit 92 : top 92,280 : left 92,150 : width 92,300

alpha 101 : top 101,310 : left 101,10 : caption 101,"Protocole:"
edit 102 : top 102,310 : left 102,150 : width 102,300

button 200 : top 200,340 : left 200,10 : width 200,440 : caption 200,"Envoyer"
  on_click 200,envoyer : font_bold 200
 
memo 210 : top 210,370 : left 210,10 : width 210,440 : height 210,140

button 220 : top 220,520 : left 220,10 : width 220,440 : caption 220,"Copier"
  on_click 220,copier : font_bold 220

for i%=1 to 11
  read options$(i%)
next i%

if file_exists(prog$+".exe")=0
  message "Le fichier "+prog$+".exe"+" est introuvable !"
  terminate
end_if

end

envoyer:
  cmd$ = prog$ + " -"+options$(1)+" "+chr$(34)+trim$(text$(2))+chr$(34)
  cmd$ = cmd$ + " -"+options$(2)+" "+chr$(34)+trim$(text$(12))+chr$(34)
  cmd$ = cmd$ + " -"+options$(3)+" "+chr$(34)+trim$(text$(22))+chr$(34)
  cmd$ = cmd$ + " -"+options$(4)+" "+chr$(34)+trim$(text$(32))+chr$(34)
  cmd$ = cmd$ + " -"+options$(5)+" "+chr$(34)+trim$(text$(42))+chr$(34)
  cmd$ = cmd$ + " -"+options$(6)+" "+chr$(34)+trim$(text$(52))+chr$(34)
  cmd$ = cmd$ + " -"+options$(7)+" "+chr$(34)+trim$(text$(62))+chr$(34)
  if trim$(text$(72))<>""
    cmd$ = cmd$ + " -"+options$(8)+" "+chr$(34)+trim$(text$(72))+chr$(34)
  else
    cmd$ = cmd$ + " -"+options$(9)+" "+chr$(34)+trim$(text$(82))+chr$(34)
  end_if
  if trim$(text$(92))<>""
    cmd$ = cmd$ + " -"+options$(10)+" "+chr$(34)+trim$(text$(92))+chr$(34)
  end_if
  if trim$(text$(102))<>""
    cmd$ = cmd$ + " -"+options$(11)+" "+chr$(34)+trim$(text$(102))+chr$(34)
  end_if
  clear 210
  item_add 210,cmd$
  execute cmd$
  return

copier:
  clipboard_string_copy cmd$
  return


doc de SendItQuiet:

-s <server>    : SMTP server address (required)
-port <port>    : SMTP server port (Default is 25)
-u <username>  : SMTP user name (reqired)
-p <password>  : SMTP password (required)
-f <from>      : Sender mail address (required)
-t <to>        : Comma seperated recipient list (reqired)
-protocol <protocol>  : SMTP protocol possible values are, ssl, normal.
-subject <subject> : subject line, surround with quotes if you want to include spaces
-body <body> : Mail body. Surround with quotes if you want to include spaces
-bodyfile <filename> :file path contains message body, file encoding assumed as utf8
-files <files>      : Attachment files, (comma seperated).
-logfile <filename> : Optionaly you can specify a log file to have detailed trace of whole communication process.


Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Yannick

avatar

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

MessageSujet: re   Sam 27 Avr 2013 - 1:20

cheers cheers cheers cheers cheers cheers cheers cheers cheers cheers cheers cheers cheers
YOUPI !!!!!!!!
Dansons la carmagnole !!!!!....

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


CA MARCHE !!!!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Yannick

avatar

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

MessageSujet: re   Sam 27 Avr 2013 - 1:24

Pour tous !!!!

Je le note ici : hotmail c'est port 587, ssl

et pour ceux qui serait un peu tête en l'air comme moi Rolling Eyes , n'oubliez pas les "." "-" etc dans les adresses mail
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

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

MessageSujet: Re: Mon Ecurie   Sam 27 Avr 2013 - 1:43

Très bien ! Dialogue fructueux !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Contenu sponsorisé




MessageSujet: Re: Mon Ecurie   

Revenir en haut Aller en bas
 
Mon Ecurie
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 4 sur 6Aller à la page : Précédent  1, 2, 3, 4, 5, 6  Suivant

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