maison
Top.Mail.Ru Yandeks.Metrika
Forum: "Pour minable";
Archive actuelle: 2004.12.12;
Télécharger: [xml.tar.bz2];

vers le bas

Travailler avec RAS Trouver des branches similaires


Piter ©   (2004-11-07 18:24) [0]

Вот интересует меня такой аспект. Если в свойствах DIAL-UP соединения поставлено "Вывести окно терминала", то при дозвоне с помощью RasDial, после соединения получаешь ошибку что-то типа "Соединение требует от пользователя данных, но приложение не поддерживает работу с пользователем" или как-то так, после чего соединение завершается.

В принципе, логично, так как нужно открыть окно терминала куда писать текст выдавамый удаленным сервером и посылать введенные пользователем комманды... Но как это организовать? Какие опции настраивать? Не представляю как организовать такой терминал...



Piter ©   (2004-11-08 12:23) [1]

Les gens?



KilkennyCat ©   (2004-11-08 12:29) [2]

Les bêtes.



Koala ©   (2004-11-08 13:41) [3]

Скопировано из Kuliba

--------------------------------------------------
Function DialProvider(connection:string):boolean; // connection - имя учетной записи
var pars:TRasDialParams;

hRas:ThrasConn;
r:integer;
begin

hRas:=0;
strpcopy(pars.szEntryName,connection); // имя учетной записи
pars.szPhoneNumber:="";                // номеp телефона - по умолчанию
pars.szcallbacknumber:="";             // callback нам не нужен
pars.szUserName:="";                   // логин - по умолчанию
pars.szPassWord:="";                   // паpоль - по умолчанию
pars.szDomain:="";                     // аналогично с домейном
pars.dwSize:=Sizeof(TRasDialParams);   // вычисляем pазмеp записи
r:=rasdial(nil,nil,pars,0,nil,hRas);   // звоним
if r<>0 then begin                          // если что-то неполучилось, то
rasHangUp(hRas);               // сбpасываем соединение
result:=false;                 // ф-ция тепеpь веpнет false
end
else result:=true;          // а если все ок - то true.
end;  

-------------------------------------------------- ----------------------
Ras.pas бpать с www.torry.ru
У меня гдето был, если надо найду и вышлю по почте...



Piter ©   (2004-11-08 14:34) [4]

Koala ©   (08.11.04 13:41) [3]

ты вопрос читал? Дозвониться до провайдера и я могу. Более того, на эту тему я написал ответ в FAQ. Могу процитировать:
--------------------------------------------
Question: comment installer - rompre la connexion DialUp

Réponse: vous devez utiliser les fonctions de RAS - Remote Access Service. Mais le problème est que, bien que dans WIN32SDK.HLP, les fonctions de cet ensemble soient décrites dans le chapitre "Fonctions du service d'accès à distance", il n'y a pas de fichier d'importation dans le package Delphi. Par conséquent, vous pouvez exporter manuellement les fonctions nécessaires du fichier "rasapi32.dll" à l'aide de l'aide de Delphi et de MSDN, mais il sera beaucoup plus efficace et plus intelligent de récupérer les fichiers d'importation traduits du projet http://www.delphi-jedi.org/. Téléchargement de fichiers d'importation RAS - ftp://delphi-jedi.org/api/RAS.zip

L'ensemble comprend plusieurs unités: Ras.pas, RasAuth.pas, RasDlg.pas, RasError.pas, RasSapi.pas, RasShost.pas et des unités supplémentaires: RasUtils.pas, RasHelperClasses.pas, ainsi que des fichiers du dossier DEMOS contenant le dossier requis. constantes: Lmcons.pas, LmErr.pas.

Vous pouvez réécrire ces unités en suivant un chemin connu de Delphi, par exemple, écrire tous les fichiers répertoriés dans le répertoire {Delphi_ Directory} / lib, puis connecter simplement ces modules à n’importe quel programme, par exemple:

utilise ..., Ras, RasUtils, RasHelperClasses;

Dans RasHelperClasses.pas, des classes très utiles sont implémentées, par exemple, TRasDialer, TRasPhonebook, TRasConnectionsList, avec lequel la démo RasDemo.dpr est construite.

TRasDialer - encapsule une connexion en elle-même, après avoir paramétré, il est possible d'établir, de déconnecter une connexion, de suivre le processus d'établissement d'une connexion

TRasPhonebook - sert à gérer les connexions existantes, vous permet de créer de nouvelles, supprimer des connexions existantes, renommer, configurer les paramètres de connexion

TRasConnectionsList - sert à gérer les connexions actuellement établies.

У меня только одно замечание по исходному коду примера RasDemo.dpr. Там в обработчике события TMainForm.PBDialBtnClick mise en place TRasDialer en enregistrant à partir de TRasPhonebook par méthode

RasDialer.Assign (RasPhonebook [Selected.Index]);

Mais l'implémentation de la méthode Assign est telle que le nom de la connexion se voit attribuer une chaîne vide:

procédure TRasDialer.Assign (Source: TPersistent); ... FParams.szEntryName: = ""; ...

Du point de vue du service d'accès distant, l'établissement d'une connexion avec de tels paramètres constitue une connexion indépendante. En fait, à partir de la connexion sélectionnée, le numéro d'appel, le numéro de rappel, le nom d'utilisateur, le mot de passe et le domaine sont copiés. Et une nouvelle connexion est établie avec de tels paramètres, ce qui n'a rien à voir avec la connexion sélectionnée. Mais pour la connexion sélectionnée, les propriétés nécessaires à la composition peuvent être définies, telles que "Script" ou "Composition manuelle".
Par conséquent, pour adopter ces paramètres, il est nécessaire d'attribuer un nom à la connexion à établir, similaire au nom de la connexion existante souhaitée. Par exemple, refaites l'exemple RasDemo.dpr de la manière suivante:

procédure TMainForm.PBDialBtnClick (Sender: TObject); var NewDialParam: TRasDialParams; commencer avec PhonebookListView faire si (sélectionné <> nil) alors commencer RasDialer.Assign (RasPhonebook [Selected.Index]); NewDialParam: = RasDialer.Params; StrPCopy (NewDialParam.szEntryName, RasPhonebook [Selected.Index] .Name); RasDialer.Params: = NewDialParam; UserNameEdit.Text: = RasDialer.UserName; PasswordEdit.Text: = RasDialer.Password; PhoneNumberEdit.Text: = RasDialer.PhoneNumber; PageControl1.ActivePage: = TabSheet3; fin fin

Остальные функции реализованы очень хороши и вы можете их поизучать.

Et à la fin, je voudrais faire quelques commentaires:

1) dans les systèmes NT, le plus souvent, vous ne reconnaîtrez pas le mot de passe de la connexion. Dans le champ mot de passe sera juste starlettes. Pour établir une connexion avec le mot de passe par défaut (s'il est enregistré), vous devez laisser le mot de passe vide.

2) si vous souhaitez composer un numéro dans la numérotation par impulsions et que vous composez une tonalité, il vous suffit de placer le caractère "p" (du mot "pulse") devant le numéro, par exemple "p1055555". Le symbole "w" indique l'attente de la tonalité dans une ligne, par exemple lors de la numérotation via le PBX "9w1055555".

Répondu: Piter
------------------------------------------

Et maintenant - QUESTION:


> Если в свойствах DIAL-UP соединения поставлено
> "Вывести окно терминала", то при дозвоне с помощью
> RasDial, после соединения получаешь ошибку что-то типа
> "Соединение требует от пользователя данных, но
> приложение не поддерживает работу с пользователем" или
>как-то так, после чего соединение завершается.
>
> В принципе, логично, так как нужно открыть окно
> терминала куда писать текст выдавамый удаленным
> сервером и посылать введенные пользователем
> комманды... Но как это организовать? Какие опции
> настраивать? Не представляю как организовать такой
> терминал...



Piter ©   (2004-11-09 18:44) [5]

Народ?



Piter ©   (2004-11-10 19:09) [6]

Неужто никто не использовал RAS?



Piter ©   (2004-11-13 11:27) [7]

Пойду в ФИДО...



Piter ©   (2004-11-14 14:51) [8]

Никто таки не подскажет?



KilkennyCat ©   (2004-11-14 15:16) [9]

видно, в ФИДО тоже все звери...



Piter ©   (2004-11-15 18:50) [10]

пока не ответили...



Piter ©   (2004-11-19 19:07) [11]

нету ответа нигде...



Pages: 1 branche entière

Forum: "Pour minable";
Archive actuelle: 2004.12.12;
Télécharger: [xml.tar.bz2];

à l'étage









Mémoire: 0.87 MB
Heure: 0.067 c
1-1101417695
AP
2004-11-26 00:21
2004.12.12
AnnuaireExiste


1-1101416797
Bobby numérique
2004-11-26 00:06
2004.12.12
Erreur d'exécution


1-1101645706
Réminateur
2004-11-28 15:41
2004.12.12
Crypt-crypt-md5


3-1100013338
Sergeich
2004-11-09 18:15
2004.12.12
paramètres dans ADOQuery


1-1101415483
Homa_Programer
2004-11-25 23:44
2004.12.12
renommer le dossier





afrikaans albanais Arabic arménien azerbaïdjanais basque Biélorusse Bulgare catalan Chinois simplifié) Chinois (traditionnel) croate Tchèque Danois Néerlandais English estonien Filipino Finlandais Français
galicien géorgien Allemand Grecque Créole haïtien hébreu Hindi Hongrois Islandais Indonesian irlandais Italien japonais Coréen letton lituanien macédonien Malay maltais Norvégien
persan Polonais Portugais roumain Russe serbe Slovaque Slovène Espagnol Swahili Suédois Thai turc ukrainien Urdu vietnamien gallois yiddish bengali bosniaque
Cebuano espéranto gujarati Hause hmong Igbo Javanais Kannada Khmer lao latin maori Marathi mongol népalais punjabi somali tamil telugu yoruba
zoulou
Английский Français Allemand Italien Португальский Русский Espagnol