拔号程序(100分)

G

gdzscj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #1

我想不用第三方控件做一个拔号上网程序，请问该如何做呢？能否给出实例？

 

T

takashiki

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #2

winexec(pchar('rundll32.exe rnaui.dll,rnaDial 我的连接',sw_show);

 

M

miaofeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #3

用API函数：
首先用RasGetEntryDialParams得到有关拨号的参数
然后使用RasDial拨号即可
我原来编写的程序不在这台计算机上
不过你可以从网上搜索一下，有不少例子的，另外如果在一段程序中如果调用RasGetEntryDialParams得到拨号参数后又马上调用RasDial采用异步方式拨号时会因为间隔时间太短而使拨号失败，建议使用同步方式。

 

G

gdzscj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #4

miaofeng：怎样使用API函数呢？
takashiki：运行时出错，提示不能使用rnaui.dll
谢谢两位指点。

 

T

takashiki

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #5

试试这个：
function RasCreatePhonebookEntryA(hwnd:HWND;PhoneChar)WORD;stdcall;external 'Rasapi32.dll';
调用：
RasCreatePhonebookEntryA(Self.Handle,nil);

 

G

gdzscj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #6

takashiki:
对不起，能说清楚一点吗？

 

A

app2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #7

shellexecute(0, 'open', 'rasphone', pchar('我的联接'), nil, sw_normal);
你试试看这个，如果你要调用api的实例的话，留一个email，我发给你

 

G

gdzscj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #8

app2001:
谢谢！我的E_mail:gdzscj@163.com

 

A

app2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #9

发给你了，注意查收

 

G

gdzscj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-09-24

• #10

我已回信，希望多交流。谢谢！