高分求助!!!怎样用VC在98下建立一拨号连接?

[allfresh]

BOOL CreateTdxConnection()
{
//列举设备
RASDEVINFO *pdevinfo = new RASDEVINFO[10];
DWORD cb=10*sizeof(RASDEVINFO);
DWORD num_devices;
pdevinfo[0].dwSize = sizeof(RASDEVINFO);
DWORD ret = RasEnumDevices(pdevinfo, &cb, &num_devices);
if(ret != 0 || num_devices < 1) { delete pdevinfo; return FALSE; }
for(int i=0;i < num_devices;i++)
{
if(strcmp(pdevinfo[i].szDeviceType,RASDT_Modem)==0)
break;
}
if(i >= num_devices) { delete pdevinfo; return FALSE; }
//填充RASENTRY接口
RASENTRY entry;
memset(&entry, 0, sizeof(RASENTRY));
entry.dwSize = sizeof(RASENTRY);
entry.dwfOptions = RASEO_RemoteDefaultGateway | RASEO_ModemLights | RASEO_IpHeaderCompression | RASEO_SwCompression | RASEO_NetworkLogon;
entry.dwfNetProtocols = RASNP_Ip; //TCPIP协议
entry.dwFramingProtocol = RASFP_Ppp; //PPP方式
strcpy(entry.szDeviceType, pdevinfo[i].szDeviceType);
strcpy(entry.szDeviceName, pdevinfo[i].szDeviceName);
strcpy(entry.szLocalPhoneNumber,"");

ret = RasSetEntryProperties(NULL,"拨号连接1",&entry,sizeof(RASENTRY),NULL,0);

delete pdevinfo;
if(ret != 0) return FALSE;
return TRUE;
}

这段代码好象在98和Me下不生效(在2000下可以)!!
Help!

[allfresh]

to acptvc(微软全球技术中心 VC技术支持)　
谢谢!! "首先手动创建一个到ISP的拨号连接。"，我的本意是用程序来自动建立，并且不一定非得连接到ISP

[alphagx]

上面的代码是从我在一份别人的源码中获得的，
但不知对你有没有用，

_WININET_DATA _WinInetData;

BOOL CXXXX::ConnectToInternet()
{
if (_WinInetData.m_lpfnInternetGetConnectedState && _WinInetData.m_lpfnInternetAttemptConnect)
{
// Check to see if an internet connection exists already.
// bInternet = TRUE internet connection exists.
// bInternet = FALSE internet connection does not exist
DWORD dwFlags;
BOOL bInternet = _WinInetData.m_lpfnInternetGetConnectedState(&dwFlags, 0);
if (!bInternet)
{
// Attempt to establish internet connection, probably
// using Dial-up connection.
// static method CloseInternetConnection() Closes dial-up connection
// if any.
DWORD dwResult = _WinInetData.m_lpfnInternetAttemptConnect(0);
if (dwResult != ERROR_SUCCESS)
{
SetLastError(dwResult);
return FALSE;
}
}
return TRUE;
}
else
{
//Wininet is not available. Do what would happen if the dll
//was present but the function call failed
SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
return FALSE;
}
}


BOOL CXXXX::CloseInternetConnection()
{
if (_WinInetData.m_lpfnInternetAutoDialHangup)
{
// Make sure any connection through a modem is 'closed'.
return _WinInetData.m_lpfnInternetAutoDialHangup(0);
}
else
{
//Wininet is not available. Do what would happen if the dll
//was present but the function call failed
SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
return FALSE;
}
}

[alphagx]

class _WININET_DATA
{
public:
//Constructors /Destructors
_WININET_DATA();
~_WININET_DATA();

//typedefs of the function pointers
typedef BOOL (WINAPI INTERNETGETCONNECTEDSTATE)(LPDWORD, DWORD);
typedef INTERNETGETCONNECTEDSTATE* LPINTERNETGETCONNECTEDSTATE;
typedef BOOL (WINAPI INTERNETAUTODIALHANGUP)(DWORD);
typedef INTERNETAUTODIALHANGUP* LPINTERNETAUTODIALHANGUP;
typedef BOOL (WINAPI INTERNETATTEMPCONNECT)(DWORD);
typedef INTERNETATTEMPCONNECT* LPINTERNETATTEMPCONNECT;


//Member variables
HINSTANCE m_hWininet; //Instance handle of the "Wininet.dll" which houses the 2 functions we want
LPINTERNETGETCONNECTEDSTATE m_lpfnInternetGetConnectedState;
LPINTERNETAUTODIALHANGUP m_lpfnInternetAutoDialHangup;
LPINTERNETATTEMPCONNECT m_lpfnInternetAttemptConnect;
};

_WININET_DATA::_WININET_DATA()
{
m_hWininet = LoadLibrary(_T("WININET.DLL"));
if (m_hWininet)
{
m_lpfnInternetGetConnectedState = (LPINTERNETGETCONNECTEDSTATE) GetProcAddress(m_hWininet, "InternetGetConnectedState");
m_lpfnInternetAutoDialHangup = (LPINTERNETAUTODIALHANGUP) GetProcAddress(m_hWininet, "InternetAutodialHangup");
m_lpfnInternetAttemptConnect = (LPINTERNETATTEMPCONNECT) GetProcAddress(m_hWininet, "InternetAttemptConnect");
}
}

[alphagx]

最后在析构时， FreeLibray
_WININET_DATA::~_WININET_DATA()
{
if (m_hWininet)
{
FreeLibrary(m_hWininet);
m_hWininet = NULL;
}
}

[allfresh]

to alphagx(alpha)　
谢谢!这些代码好象跟IE连接到互联网有关，不能真正地建立连接!

[CoolBoy_007]

查MSDN，TAPI，保证让你满意！

[Lighter]

拨号文件（.dun）都是文本的啊！而且是INI格式，可以用WritePrivateProfileString之类函数自己写一个。

[allfresh]

to Lighter(火机)
拨号文件（.dun）中好象与我建立的拨号连接没有关系，请教!

[smallfool]

这好象需要RasDial等函数来做吧.很麻烦,以前曾经做过,很长时间没有接触了.不过www.codeguru.com应该有类似的例子,你可以到那里找找看.

[allfresh]

再提提

[allfresh]

再提提

[congcongguoke]

我也想知道这个问题如何解决，如果谁知道请e_mail一份到[e-mail]

[allfresh]

再提提

[masterz]

http://www.codeguru.com/internet/rasabslay.shtml
Programmatically Create Dialup Connection Objects

[masterz]

Programmatically Create Dialup Connection Objects
http://www.codeguru.com/internet/rasabslay.shtml

[ynyn]

http://www.csdn.net/expert/topic/357/357042.xml

[allfresh]

thanks.
Try it

[Frank0233]

bool CTstDlg::DialUp()
{
RASDIALPARAMS rdParams;
rdParams.dwSize = sizeof(RASDIALPARAMS);
rdParams.szEntryName[0] = '\0';
lstrcpy( rdParams.szPhoneNumber, m_strPhoneNumber );
rdParams.szCallbackNumber[0] = '\0';
lstrcpy( rdParams.szUserName, m_strUserName );
lstrcpy( rdParams.szPassword, m_strPassword );
rdParams.szDomain[0] = '\0';

HRASCONN hRasConn = NULL;
DWORD dwRet = RasDial( NULL, NULL, &rdParams, 0L, NULL, &hRasConn );
if ( dwRet == 0 ) return true;
char szBuf[256];
if ( RasGetErrorString( (UINT)dwRet, (LPSTR)szBuf, 256 ) != 0 )
wsprintf( (LPSTR)szBuf, "Undefined RAS Dial Error (%ld).", dwRet );
RasHangUp( hRasConn );
MessageBox( (LPSTR)szBuf, "Error", MB_OK | MB_ICONSTOP );
return false;
}

[Frank0233]

网上很多

[0313700000]

收藏先~~