PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV Mobile 2024 → [WM14] Plantage après connexion
[WM14] Plantage après connexion
Iniciado por VBill, 24,sep. 2009 18:38 - 5 respuestas
Publicado el 24,septiembre 2009 - 18:38
Bonjour,

Je dois installer un logiciel sur de nouveaux terminaux mobiles Pocket PC (2002)
Je précise que ce logiciel fonctionne sur d'autres terminaux étant en windows CE.

Le terminal est correctement détecté par windev mobile comme un "Symbol PDT8100" et la compilation est donc normalement correctement paramétrée.

Au lancement, je me connecte vers une base de donnée distante et juste après ça, le logiciel plante.

Erreur à la ligne X
Sans aucunes infos supplémentaires.

Je peux mettre ce que je veux à cette ligne, l'erreur est toujours la même et se situe juste après la connexion.

Est-ce que quelqu'un a une idée pour m'aider à résoudre ce problème ?

Merci :)
Publicado el 25,septiembre 2009 - 13:53
Bonjour,

Pour vous aider, peut-on voir le code de connexion ?

Laurent.
Publicado el 25,septiembre 2009 - 13:53
L'erreur se produit également sur un PPT2840
Publicado el 25,septiembre 2009 - 17:34
Peut-on voir le code autour de cette ligne ?


Erreur à la ligne X
Sans aucunes infos supplémentaires.

Je peux mettre ce que je veux à cette ligne, l'erreur est toujours la même et se situe juste après la connexion.
Publicado el 23,octubre 2009 - 23:26
Voici le code d'initialisation du projet




GLOBAL
NoIdArtTMP est une chaîne
NoVarIntTMP est une chaîne
LoginPGM est une chaîne="Admin"
NumeroDeBonIn est une chaîne
NumeroDeBonOut est une chaîne
Sw_VenirDe est un entier

Param_HauteurPalette est un entier=20 //en cm


libelle1 est une chaîne
libelle10 est une chaîne
libelle12 est une chaîne

USER_PGM est une chaîne
CLIENT_PGM est une chaîne
SERVEUR_PGM est une chaîne
BD_PGM est une chaîne
CLIENT_PGMPLT est une chaîne
SERVEUR_PGMPLT est une chaîne
BD_PGMPLT est une chaîne
PASSWORD_PGM est une chaîne
ResultatVerif est un booléen

gbSw_inventaire est un booléen
gbsw_reception est un booléen
gbsw_miseenstock est un booléen
gbsw_deplacementdestock est un booléen
gbsw_miseenconformite est un booléen
gbsw_infoarticle est un booléen
gbsw_pickpetite est un booléen
gbsw_pickgrosse est un booléen

gsNoIdSoc est une chaîne
gnPlateFormeUtilisatrice est une chaîne
gnTerminalPortable est un entier

nXContext,nYContext,nLigne,ncolonne sont des entiers

gdDateTourneeTheorique est une Date
ghHeureTourneeTheorique est une Heure

numero_fichier est un entier
lignelue est une chaîne

//numero_fichier=fouvre("sodisoft.ini",folecture)
//numero_fichier=fouvre("c:\program files\SobelScan\Sobelscan.ini",folecture)
numero_fichier=fOuvre("\program files\SobelScan\Sobelscan.ini",foLecture)

lignelue=fLitLigne(numero_fichier)
//trace("Ligne "+i+":"+lignelue)

TANTQUE lignelue<>EOT

SELON lignelue[[1 A 4]]

CAS "NSOC"
gsNoIdSoc=SansEspace(lignelue[[6 A 50]])

CAS "PLTF"
gnPlateFormeUtilisatrice=SansEspace(lignelue[[6 A 8]])

CAS "TEPO"
gnTerminalPortable=SansEspace(lignelue[[6 A 8]])

CAS "SERV"

MaChaîne est une chaîne = lignelue[[6 A Taille(SansEspace(lignelue))]]
MaPosition est un entier = PositionOccurrence(MaChaîne,"/", rangPremier)
sw_passage est un entier=0
posdebut est un entier=1
TANTQUE MaPosition <> 0
sw_passage++
SELON sw_passage

CAS 1
SERVEUR_PGM=MaChaîne[[posdebut A MaPosition-1]]

CAS 2
BD_PGM=MaChaîne[[posdebut A MaPosition-1]]

CAS 3
CLIENT_PGM=MaChaîne[[posdebut A MaPosition-1]]

FIN

posdebut=MaPosition+1

MaPosition = PositionOccurrence(MaChaîne,"/", rangSuivant)
FIN

CAS "SERP"

MaChaîne = lignelue[[6 A Taille(SansEspace(lignelue))]]
MaPosition = PositionOccurrence(MaChaîne,"/", rangPremier)
sw_passage=0
posdebut=1
TANTQUE MaPosition <> 0
sw_passage++
SELON sw_passage

CAS 1
SERVEUR_PGMPLT=MaChaîne[[posdebut A MaPosition-1]]

CAS 2
BD_PGMPLT=MaChaîne[[posdebut A MaPosition-1]]

CAS 3
CLIENT_PGMPLT=MaChaîne[[posdebut A MaPosition-1]]

FIN

posdebut=MaPosition+1

MaPosition = PositionOccurrence(MaChaîne,"/", rangSuivant)
FIN

FIN

lignelue=fLitLigne(numero_fichier)

FIN

//Connexion pour la gestion des mots de passe
HDécritConnexion("HyperFileCS","admin","",SERVEUR_PGM+":4900","PassWordGeneral",hAccèsHFClientServeur)
HChangeConnexion("*","HyperFileCS")
libelle10=BD_PGM
libelle12=CLIENT_PGM

Ouvre(GPWLoginHome_MC9000)

HFermeConnexion("HyperFileCS")

SI SansEspace(USER_PGM)<>"" ALORS

HDécritConnexion("HyperFileCS","admin","",SERVEUR_PGM+":4900",BD_PGM,hAccèsHFClientServeur)
HChangeConnexion("*","HyperFileCS")
libelle10=BD_PGM
libelle12=CLIENT_PGM

FIN

libelle1=libelle10




Nous avons essayé de créer une application de test ne faisant que se connecté à une DB Hyperfile serveur avec le même résultat
Publicado el 24,octubre 2009 - 13:18
Bonjour,

Voici une solution qui fonctionne sur un ClientServeur HF :

Code d'ini du projet :
gcnxMaConnexion est une Connexion

// Description de la connexion
gcnxMaConnexion..Utilisateur = "LoginServeur" // le login du compte user serveur
gcnxMaConnexion..MotDePasse = "VotrePAssword" //le mot de passe associé
gcnxMaConnexion..Serveur = "192.168.2.8" //le serveur - ça peut etre un chemin UNC
gcnxMaConnexion..BaseDeDonnées = "Test" //la base de données
gcnxMaConnexion..Provider = hAccèsHFClientServeur //le type d'accès
gcnxMaConnexion..Accès = hOLectureEcriture // le mode d'acces
gcnxMaConnexion..InfosEtendues = "Infos étendues" // d'autres infos.


Code de clic sur un bouton de la fenetre principale :

// Ouverture de la connexion
SI PAS HOuvreConnexion(gcnxMaConnexion) ALORS
Info("Impossible de se connecter", HErreurInfo(hErrComplet))
SINON
Info("Connecté")
FIN