PC SOFT

FOROS PROFESIONALES
WINDEV, WEBDEV y WINDEV Mobile

Inicio | Mensajes recientes | Conéctese... |  | Español FR
Inicio → WINDEV Mobile 2024 → Netouvreaccesdistant mobile6
Netouvreaccesdistant mobile6
Iniciado por dirk Hauwaerts, 15,feb. 2008 13:48 - 1 respuesta
#1
Publicado el 15,febrero 2008 - 13:48
Hallo,

On a un problème avec netouvreaccessdistant.
La commande tourne est donne 0 comm resultant.
Pourtant on voit pas qu'un connection GPRS est etablié.
La connexion vers la base de donnée reussi jamais.

quelqu'un un idée ce qu'on fait mal. On est un peu nouveau dans ce matière.


bEtatConn est un booléen
intNetOuvre est un entier = NetOuvreAccèsDistant(gsGPRSConnection)
bEtatConn = (intNetOuvre = 0)
TANTQUE PAS bEtatConn
sAvailableConnections est une chaîne = NetListeAccèsDistant()
Info(sAvailableConnections)
gsGPRSConnection = ExtraitChaîne(sAvailableConnections, rangPremier, RC)
TANTQUE gsGPRSConnection <> EOT ET PAS bEtatConn
gsGPRSConnection = ExtraitChaîne(sAvailableConnections, rangSuivant, RC)
bEtatConn = NetInfoAccèsDistant(gsGPRSConnection,niConnecté)
SI PAS bEtatConn ALORS
intNetOuvre = NetOuvreAccèsDistant(gsGPRSConnection)
bEtatConn = (intNetOuvre = 0)
FIN
FIN
bEtatConn = NetInfoAccèsDistant(gsGPRSConnection,niConnecté)
FIN

SI bEtatConn ALORS bEtatConn = HOuvreConnexion("REMOTE_CONNECTION","User","pwd","SERVER:4900","XXX", hAccèsHFClientServeur, hOLectureEcriture, "Initial Catalog=JGC")

SI bEtatConn ALORS
Info("HOuvreConnexion ok")
SINON
Erreur("HOuvreConnexion NOT ok:" + HErreurInfo())
FIN
#2
Publicado el 21,febrero 2008 - 13:06
avez vous vérifier les parametres de votre abonnement GPRS auprès de votre opérateur ?
il y a peu de ports ouverts et dispo. sur des abonnements grand public.

stef
→ Volver a WINDEV Mobile 2024