Bonjour a toutes et tous.
en résumé, je crée un enregistrement vocal sous android en windev mobile que je stocke dans une rubrique mémo d'une table HFSQL locale.
Je transfère les données de ma table HFSQL locale vers une table HFSQL C/S
Dans windev j extrait le memo correspondant mais impossible d'obtenir le fichier son alors que si je tente de lire le memo vocal a partir de HFSQL C/S dans windev mobile ca marche nickel.
siteAuditlocal est la table HFSQL local
siteAuditsrv est la table HFSQL C/S
CODE WINDEV MOBILE :
CODE WINDEV MOBILE POUR RELIRE LE MEMO sur HFSQL C/S
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 MagnetoAction(magnetoEnregistre,sFicvocal) ToastAffiche("vous pouvez commencer l'enregistrement du mémo vocal") HAttacheMémo(siteAuditlocal,Pointfaible,sFicvocal,hMémoWav) HModifie(siteAuditlocal,hNumEnrEnCours)
et ca fonctionne nickel
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 HLitPremier(siteAuditsrv) SI HTrouve(siteAuditsrv) = Vrai ALORS Info(HInfoMémo(<hr />,Pointfaible)) Info("avant lecture enregistrement " + siteAuditsrv.IDsiteAuditlocal) HExtraitMémo(siteAuditsrv,Pointfaible,"enregistrement12.wav") Info(fTaille("enregistrement12.wav")) MagnetoAction(magnetoJoue,"enregistrement12.wav") FIN
CODE WINDEV
a titre d'info ma proc de sauvergarde de windev mobile vers windev ;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 HLitRecherche(siteAuditsrv,IDsiteAuditlocal,gnIDaudit) SI HTrouve(siteAuditsrv) ALORS SI HExtraitMémo(siteAuditsrv,Pointfaible,"c:\temp\enregistrement22.wav") = Vrai ALORS Info(fTaille("c:\temp\enregistrement22.wav")) MultimédiaJoue(MM_memo,"c:\temp\enregistrement22.wav") LanceAppliAssociée("c:\temp\enregistrement22.wav") FIN FIN
merci pour votre aide. J'ai essayé aussi un utilisant un buffer mais rien n'y fait.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 POUR TOUT siteAuditlocal ListeDesRubriques est une chaîne ListeDesRubriques = HListeRubrique(siteAuditlocal) POUR TOUTE CHAÎNE sUnerubrique DE ListeDesRubriques SEPAREE PAR RC {"siteAuditsrv." + sUnerubrique,indRubrique} = {"siteAuditlocal." + sUnerubrique,indRubrique} FIN siteAuditsrv.Faitle = DateSys() HAjoute(siteAuditsrv,hEcritureDéfaut) FIN
Partager