GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV
,
WEBDEV
e
WINDEV Mobile
Inicio
|
Postagens recentes
|
Conecte-se...
|
Desconectar
|
Português
Inicio
→
WINDEV 2024
→
hchangeconnexion
hchangeconnexion
Iniciado por gilleswathelet, jul., 29 2005 3:43 PM - 1 resposta
Conecte-se…
gilleswathelet
#1
Publicado em julho, 29 2005 - 3:43 PM
bonjour,
je vous explique mon problème : mon groupware est en c/s et les paramètres de connexion sont enregistrer dans un fichier.ini à la première exécution de l'application
serveur : mon_serveur
port : 4900
utilisateur : admin
mot de passe : ****
base de données : groupwarecs
dans mon application, j'utilise également une autre base de donnée.
sur certaine fenêtre, j'aimerais récupérer la liste des utilisateur.
en mode hyperfile classic, j'utilisais pour cela :
EXTERNE GPWUtilisateur
EXTERNE GPWUtilisateurConfiguration
EXTERNE GPWConfiguration
EXTERNE GPWConfigurationElement
EXTERNE GPWElement
// initialisation
SI PAS gpwInitAnalyse() ALORS
MaFenêtre..ValeurRenvoyée=gpwErreur
Erreur("Impossible d'initialiser le groupware utilisateur." + ErreurInfo())
Ferme()
FIN
// description de la combo
login..RubriqueParcourue = "Login"
login..RubriqueAffichée = "Login"
login..RubriqueMémorisée = "Login"
login..FichierParcouru = "GPWUtilisateur"
//log est une chaine = gpwRecupInfoUtilisateur(gpwInfoLogin)
//gestionnaire = log
// intilisation de la combo auto alimentée
ListeAffiche(login,taInit)
ListeSelectMoins(login)
maintenant que je suis en c/s,
j'ai ajouter cette ligne ci :
HChangeConnexion("gpwutilisateur","groupware")
mon problème est que le fichier gpwutilisateur est dans un sous répertoire nommé "groupware" donc évidement il ne le trouve pas sur le disque
comment puis-je indiquer un chemin relatif à ma base
donc je veux qu'il accède aufichier :
c:\serveur hf\bdd\grouwarecs\groupware\gpwutilisateur.FIC
pour mes test, lorsque je copie le fichier dans
c:\serveur hf\bdd\grouwarecs
ca marche très bien donc je me dis que j'approche du but.
merci de votre aide
Denunciar
0
0
N0.pascal.SPAM
#2
Publicado em julho, 29 2005 - 4:38 PM
gilles a exprimé avec précision :
bonjour,
je vous explique mon problème : mon groupware est en c/s et les paramètres de connexion sont enregistrer dans un fichier.ini à la première exécution de l'application
serveur : mon_serveur
port : 4900
utilisateur : admin
mot de passe : ****
base de données : groupwarecs
dans mon application, j'utilise également une autre base de donnée.
sur certaine fenêtre, j'aimerais récupérer la liste des utilisateur.
en mode hyperfile classic, j'utilisais pour cela :
EXTERNE GPWUtilisateur
EXTERNE GPWUtilisateurConfiguration
EXTERNE GPWConfiguration
EXTERNE GPWConfigurationElement
EXTERNE GPWElement
// initialisation
SI PAS gpwInitAnalyse() ALORS
MaFenêtre..ValeurRenvoyée=gpwErreur
Erreur("Impossible d'initialiser le groupware utilisateur." + ErreurInfo())
Ferme()
FIN
// description de la combo
login..RubriqueParcourue = "Login"
login..RubriqueAffichée = "Login"
login..RubriqueMémorisée = "Login"
login..FichierParcouru = "GPWUtilisateur"
//log est une chaine = gpwRecupInfoUtilisateur(gpwInfoLogin)
//gestionnaire = log
// intilisation de la combo auto alimentée
ListeAffiche(login,taInit)
ListeSelectMoins(login)
maintenant que je suis en c/s,
j'ai ajouter cette ligne ci :
HChangeConnexion("gpwutilisateur","groupware")
mon problème est que le fichier gpwutilisateur est dans un sous répertoire nommé "groupware" donc évidement il ne le trouve pas sur le disque
comment puis-je indiquer un chemin relatif à ma base
donc je veux qu'il accède aufichier :
c:\serveur hf\bdd\grouwarecs\groupware\gpwutilisateur.FIC
pour mes test, lorsque je copie le fichier dans
c:\serveur hf\bdd\grouwarecs
ca marche très bien donc je me dis que j'approche du but.
merci de votre aide
il faut lors de l'ouverture de la fenetre de login indiquer le chemin des répertoires de fichier GPW
// si paramètre crep est passé a vide on récupère le répertoire courant
SI cRep="" ALORS cRep=ComplèteRep(fRepEnCours())
// Construction de nom de répertoire des données groupware
SELON TypeBase
CAS 1 : // local cRep est absolu du genre "C:\MonProg\MesDonnees"
// fichiers des droits
gpwRep=cRep+"droits\utilisateurs"
// fichier des sessions
gpwSessionRep=cRep+"droits\sessions" // les sessions sont gérées pour l'exe en cours !
CAS 2 : // relatif à la base client serveur du genre ".\MesDonnees"
// fichiers des droits
:gpwRep=cRep+"droits\utilisateurs"
// fichier des sessions
gpwSessionRep=cRep+"droits\sessions" // les sessions sont gérées pour l'exe en cours !
FIN
// Si les répertoires n'existent pas, les créent
SI fRep(gpwRep,frRépertoire)="" ALORS fRepCrée(gpwRep)
SI fRep(gpwSessionRep,frRépertoire)="" ALORS fRepCrée(gpwSessionRep)
// Lance le login du groupware
PROCEDURE gpw_InitLogin()
nRes est un entier
// on va afficher la fenêtre de login
nRes= gpwOuvre(gpwSessionRep,gpwRep)
// résultat du login
// si le login a échoué
SI nRes<>gpwOk ALORS
SELON nRes
CAS gpwErreur :
//Erreur à l’initialisation du groupware.
Erreur(ErreurInfo())
CAS gpwUtilisateurInconnu :
Erreur("Utilisateur inconnu.")
CAS gpwMotPasseInvalide :
Erreur("Mot de passe invalide.")
FIN
FinProgramme(Vrai)
FIN
Voilà .
--
Pascal
N0.pascal.SPAM@efpe.biz
Ne garder que le prénom pour me joindre
Denunciar
0
0
→ Voltar para WINDEV 2024
WINDEV 25
WINDEV 26
WINDEV 2024
WINDEV 2024
WINDEV 2024
WINDEV 2024
WEBDEV 2024
WEBDEV 2024
WEBDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV Mobile 2024
WINDEV Mobile 2024
WINDEV (versões anteriores)
WINDEV (versões anteriores)
WINDEV (versões anteriores)
WEBDEV (versões anteriores)
WEBDEV (versões anteriores)
WINDEV Mobile (versões anteriores)
WINDEV Mobile (versões anteriores)
Reports & Queries
Reports & Queries
Off-topic
Off-topic
Ferramentas
Ferramentas
Français
English
Español
Portuguesa
Fermer cette fenêtre
Tipo de Pesquisa
Apenas tópicos
Todas as mensagens
Período de pesquisa
Qualquer momento
Última hora
Últimas 24 horas
Semana passada
Mês passado
Ano passado
Cancelar
Pré-visualização da sua mensagem
Adicionar imagem
Importar uma imagem de uma URL
Enviar uma imagem a partir do seu disco
Deixe um ficheiro ou clique em "Procurar ..."
ou
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto