Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
|
А писать проги умеешь? 19.07.03 11:54 Число просмотров: 1291
Автор: Killer{R} <Dmitry> Статус: Elderman
|
Хотя бы в делфе - всего несколько функций надо - RasDial, RasHangup, RasEnumEntries и RasEnumConnections + сокеты.
|
<software>
|
Нужна share модема в сети 16.07.03 12:11
Автор: Korsh <Мельников Михаил> Статус: Elderman
|
Есть в сети 3 машины, на одной модем, нужна софтина ,с помощью которой можно было б с других машин звонить.
|
|
Нашел, кому нужна обращайтесь... 31.07.03 02:24
Автор: Korsh <Мельников Михаил> Статус: Elderman
|
|
|
А писать проги умеешь? 19.07.03 11:54
Автор: Killer{R} <Dmitry> Статус: Elderman
|
Хотя бы в делфе - всего несколько функций надо - RasDial, RasHangup, RasEnumEntries и RasEnumConnections + сокеты.
|
| |
А писать проги умеешь? 20.07.03 11:19
Автор: Korsh <Мельников Михаил> Статус: Elderman
|
> Хотя бы в делфе - всего несколько функций надо - RasDial, > RasHangup, RasEnumEntries и RasEnumConnections + сокеты. Ну не в делфи, я на билдере пишу, но сейчас время нет
|
| | |
Тыбы уже написал Ж).. 20.07.03 12:07
Автор: Killer{R} <Dmitry> Статус: Elderman Отредактировано 21.07.03 10:16 Количество правок: 1
|
звонить примерно так (вызовом dialcheck(); выдрано из другой проги потому мот чего не хватает):
#define WINVER 0x400
#include "ras.h"
DWORD tmout,er;
HRASCONN hRasConn=0;
int dialend;
char *sendbuf=0;
void WINAPI RasDialFunc(UINT unMsg,RASCONNSTATE rasconnstate,DWORD dwError)
{
switch (rasconnstate)
{
case RASCS_PortOpened:Form1->StatusBar1->Panels->Items[1]->Text="Port opened";break;
case RASCS_DeviceConnected:Form1->StatusBar1->Panels->Items[1]->Text="Device connected";break;
case RASCS_Authenticate:Form1->StatusBar1->Panels->Items[1]->Text="Authentificate...";break;
case RASCS_Authenticated:Form1->StatusBar1->Panels->Items[1]->Text="Authentificated";break;
case RASCS_Connected:Form1->StatusBar1->Panels->Items[1]->Text="Connected";dialend=1;break;
case RASCS_Disconnected:Form1->StatusBar1->Panels->Items[1]->Text="Connect failed";dialend=2;break;
}
if(dwError){Form1->StatusBar1->Panels->Items[1]->Text="Dial error";er=dwError;dialend=2;};
}
HRASCONN __fastcall checkdial()
{
if(!Form1->ComboBox3->ItemIndex)return 0;
RASCONN rsc[128];
while(true)
{
Form1->StatusBar1->Panels->Items[1]->Text="Checking dialup connections...";
DWORD rasnum=0;
DWORD rassz=128*sizeof(RASCONN);
ZeroMemory(rsc,128*sizeof(RASCONN));
rsc[0].dwSize=sizeof(RASCONN);
RasEnumConnections(&rsc[0],&rassz,&rasnum);
for(DWORD i=0;i<rasnum;i++)
{
RASCONNSTATUS rsconst;rsconst.dwSize=sizeof(rsconst);
if(!RasGetConnectStatus(rsc[i].hrasconn,&rsconst))
{
if(rsconst.rasconnstate==RASCS_Disconnected){RasHangUp(rsc[i].hrasconn);Sleep(1000);}
if(rsconst.rasconnstate==RASCS_Connected)return 0;
}
}
hRasConn=0;
RASDIALPARAMS rdp;ZeroMemory(&rdp,sizeof(rdp));rdp.dwSize=sizeof(rdp);
strcpy(rdp.szEntryName,"Dialaup_connection_name");
int passet=0;
Form1->StatusBar1->Panels->Items[1]->Text="Dialing...";
RasGetEntryDialParams(0,&rdp,&passet);
nowdial=true;dialend=0;
er=RasDial(0,0,&rdp,0,RasDialFunc,&hRasConn);
if(!er)while(!dialend)Sleep(100); if(er|dialend==2))
{
if(hRasConn){RasHangUp(hRasConn);Sleep(1000);};
nowdial=false;
Form1->StatusBar1->Panels->Items[1]->Text="Error "+(AnsiString)er+". Retry in 5 seconds...";
Sleep(5000);
}
else return hRasConn;
}
}
|
| | | |
Спасибо, в пятницу займусь реализацией... 21.07.03 02:32
Автор: Korsh <Мельников Михаил> Статус: Elderman
|
|
|
Аппаратно... 16.07.03 13:52
Автор: DPP <Dmitry P. Pimenov> Статус: The Elderman
|
Дешево и надежно.
Точно есть такие аппараты для принтеров. Они двух видов бывают - 1) с ручным переключением, 2) с автоматическим. Бывают даже такие, чтобы два-три принтера к одному LPT порту поочереди подключать. Все версии видел и пользовал.
Для COM портов то же самое должно быть, только еще проще и дещевле - там проводов меньше коммутировать надо. Не пользовал и не искал даже поскольку не требовалось. При желании и самому спаять можно, и обойдется это в 200 - 300 рублей (ручное переключение). Один недостаток - для больших расстояний не применимо.
В программных же средствах об аналогичной потребности иногда слышал, но про решения - нет. Да и в моем понимании абсурдно получается - это все равно, что сетевую плату шарить или звуковую плату. На уровне протоколов среднего уровня (ТСР) - пожалуйста. А так, чтобы с другого компьютера z-модемом файлы с бибиэсок качать, в то время, как кто-нибудь с другого компьютера в интернет вышел - врядли, да и по-очереди тоже не получиться. Однако написать можно, теоретически, все, только денег программисты возьмут больше, чем модем стоит.
|
| |
Аппаратно... 16.07.03 14:04
Автор: Korsh <Мельников Михаил> Статус: Elderman
|
> Дешево и надежно. > Точно есть такие аппараты для принтеров. Они двух видов > бывают - 1) с ручным переключением, 2) с автоматическим. > Бывают даже такие, чтобы два-три принтера к одному LPT > порту поочереди подключать. это я и сам видел
> Все версии видел и пользовал. > Для COM портов то же самое должно быть, только еще проще и > дещевле - там проводов меньше коммутировать надо. Не > пользовал и не искал даже поскольку не требовалось. При > желании и самому спаять можно, и обойдется это в 200 - 300 > рублей (ручное переключение). Один недостаток - для больших > расстояний не применимо. > В программных же средствах об аналогичной потребности > иногда слышал, но про решения - нет. Да и в моем понимании > абсурдно получается - это все равно, что сетевую плату > шарить или звуковую плату. На уровне протоколов среднего > уровня (ТСР) - пожалуйста. А так, чтобы с другого > компьютера z-модемом файлы с бибиэсок качать, в то время, > как кто-нибудь с другого компьютера в интернет вышел - я про это не говорил
> врядли, да и по-очереди тоже не получиться. как раз по-очереди и надо
> Однако написать > можно, теоретически, все, только денег программисты возьмут > больше, чем модем стоит. не надо писать, мне надо до завтра найти :)
|
| | |
классно, но нужно под вин98 16.07.03 14:07
Автор: Korsh <Мельников Михаил> Статус: Elderman
|
|
| | | |
Слушай, а ведь можно, че это я про Фрю... 16.07.03 14:15
Автор: whiletrue <Роман> Статус: Elderman
|
Там же есть DialOut/Server !!!
http://www.tactical-sw.com/
|
| | | | |
Ага я тоже его нашел, но триальный :( 18.07.03 04:18
Автор: Korsh <Мельников Михаил> Статус: Elderman
|
|
|
Какие на них ОС? Нужно расшарить модем или коннект? 16.07.03 12:16
Автор: whiletrue <Роман> Статус: Elderman Отредактировано 16.07.03 12:19 Количество правок: 1
|
|
| |
Сорри, забыл сказать ОС=Win98, расшарить нужно именно модем, чтоб другие звонить могли, т.к. модем один, но есть сеть 16.07.03 14:08
Автор: Korsh <Мельников Михаил> Статус: Elderman
|
|
|
|