Application Seurveur/Client sous réseau Local - Delphi 7 [Résolu]
freezydelphi712
Messages postés samedi 11 décembre 2010Date d'inscription
12 janvier 2011
Dernière intervention
-
31 déc. 2010 à 21:44 - Dernière réponse : aziz2013
- 24 févr. 2013 à 11:09
1er question:
Ma p'tit application sert à un reporting de données (Daily Report Agent)
Table créer sous PARADOX sans Alias!
Je veut que qulqu'un m'explique comment je fait fonctionné mon application sous un réseau local (LAN), mon application débute par un controle d'accés, User + PassWord.
2ème question:
Pour le controle d'accès, j'ai créer une table cession par PARADOX
Non PassWord Departement
xxx 0000 Front OFFICE
yyy 1111 Front OFFICE
zzz 2222 Front OFFICE
Table1.Open;
if (Edit1.Text=Table1Nom.value) and (Edit2.Text=Table1PassWord.value)
then Showmodal form2
else Showmessage ('Vérifier votre nom ou votre mot de passe !')
end;
Table.Post;
Je veut savoir comment faire les incrémentations pour tester ligne par ligne les deux conditions ?
Ma 1er question:
Ma p'tit application sert à un reporting de données (Daily Report Agent)
Table créer sous PARADOX sans Alias!
Je veut que qulqu'un m'explique comment je fait fonctionné mon application sous un réseau local (LAN),
Pleeeeeeeas
La solution de ma 2ème Question:
procedure TForm1.sBitBtn1Click(Sender: TObject);
begin
Table1.Open;
if (sComboBox1.Text='Administrateur') and (Table1.Locate('Nom_Prenom', sComboBox7.Text, [loCaseInsensitive, loPartialKey])) and (Table1.Locate('PassWord',sEdit1.Text , [loCaseInsensitive, loPartialKey]))
then form9.ShowModal
Bonsoir,
finalement, après ma recherche en utilisant Mr GOOGLE, je trouve une prè réponse a ma question, il installer l'administrateur BDE chez le poste client est le configurer [pilote paradox, init local share true] partager le dossier qui contient mes tables (de préférable sur la racine C), ma question maintenant, pour créer un lecteur réseau :
net use w: \\serveur\deily, mais j'ai le message d'erreur le suivant: Erreur système 67, y t'il quelqu'un qui peut m'zider de plus, merci d'avence.
cs_cantador4996
Messages postés dimanche 26 février 2006Date d'inscriptionModérateurStatut
27 mars 2018
Dernière intervention - 8 janv. 2011 à 14:20
0
Utile
Bonjour,
tu vas trop vite
une seule question à la fois...
procedure TForm1.sBitBtn1Click(Sender: TObject);
begin
Table1.Open;
if (sComboBox1.Text='Administrateur') and
(Table1.Locate('Nom_Prenom', sComboBox7.Text, [loCaseInsensitive, loPartialKey]))
and (Table1.Locate('PassWord',sEdit1.Text , [loCaseInsensitive, loPartialKey]))
then
form9.ShowModal
end;
Cette procédure ne fonctionne pas
elle ne marche que pour l'administrateur..
et les autres ?
et la fonction "administrateur" est une propriété de l'utilisateur
et les homonymes Nom, prénom, ça existe.
etc.
sikimyway2
Messages postés mercredi 16 mai 2007Date d'inscription
30 juin 2011
Dernière intervention -30 juin 2011 à 10:41
0
Utile
Salut à Tous j'aimerai savoir quelques choses:
1. j'ai pu installer le BDE sur un poste avec Windows seven professionnel 64 bits mais il m'avoir un message koi la bibliotheque ne peut pas être initialiser
2. ou peut_on trouver le ComputerName avec Windows seven
bonjour tous le monde,
je viens de créer une application téléphonique qui me permet d'émettre et de recevoir des appels téléphonique avec le composant dialer de delphi 7. mais le problème j'ai deux ligne téléphonique connecter a mon pc et je veux savoir s'il y a une possibilité de faire des transférés d'appels d'une ligne a une autres avec le mémé composant ou avec un autre composant
