如何在delphi里用代码实现创建VPN连接?
我的代码如下,怎么总提示连不成功:
type
GUID = record //申明调用RAS(创建VPN连接用)函数所需结构体
Data1: integer;
Data2: Shortint;
Data3: Shortint;
Data4: array[0..6] of byte;
end;
type
RASIPADDR = record //申明调用RAS(创建VPN连接用)函数所需结构体
a: byte;
b: byte;
c: byte;
d: byte;
end;
type
RASENTRY = record //申明调用RAS(创建VPN连接用)函数所需结构体
dwSize: integer;
dwfOptions: integer;
dwCountryID: integer;
dwCountryCode: integer;
szAreaCode: array[0..9] of byte;
//szLocalPhoneNumber: array[0..127] of byte;
dwAlternateOffset: integer;
ipaddr: RASIPADDR;
ipaddrDns: RASIPADDR;
ipaddrDnsAlt: RASIPADDR;
ipaddrWins: RASIPADDR;
ipaddrWinsAlt: RASIPADDR;
dwFrameSize: integer;
dwfNetProtocols: integer;
dwFramingProtocol: integer;
szScript: array[0..258] of char;
szAutodialDll: array[0..258] of char;
szAutodialFunc: array[0..258] of char;
szDeviceType: array[0..15] of char;
szDeviceName: array[0..127] of char;
szX25PadType: array[0..31] of char;
szX25Address: array[0..199] o
相关问答:
delphi内置的加密解密单元是哪个?
Delphi有内置加密解密单元?
delphi里有个加密和解密的单元
引用
delphi里有个加密和解密的单元
是哪个?
windows的api?
标准加密的源代码,网上 ......
嘿嘿,又来麻烦各位大牛了!我想了解我在代码的事件属性里面看不到有什么事件,还有在时间控件里面的Enabled的属性是False,这下蒙了,不知道程序运行之后执行的是那条命令,希望各位大牛赐教啦!
谢谢!
我这下 ......
procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 个字节的长整形指针
begin
P:=PLongint(A);// 取的 A 的 ......
我的程序中有一段更新某一条记录的语句:
var
id:=integer;
begin
id:=strtoint(edit1.text);//edit1.text的值已经取得;
...
...
...
adoQuery1.sql.add('update 计划清单表 set 计划日 ......