请教高手ftp编程的问题
请看以下程序:
第1和第2个消息框没有显示说明连接成功,为什么第三个消息框没有显示(函数调用失败)?使用其他的ftp函数也遇到同样的问题。
程序中的ip,user和password在ftp命令行下是可以登录的。
HINTERNET hIntSession,hFtpSession;
TCHAR szBuffer[MAX_PATH]="null";
TCHAR *szIp="162.33.30.5",*szUser="radar",*szPasswd="radar";
int iPathLenght;
hIntSession=InternetOpen("putfile",INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,INTERNET_FLAG_ASYNC);
if(hIntSession==NULL)
{
MessageBox(0,"Internet 连接出错","信息提示",MB_OK);
InternetCloseHandle(hIntSession);
return FALSE;
}
hFtpSession=InternetConnect( hIntSession,szIp,INTERNET_DEFAULT_FTP_PORT,szUser,szPasswd,INTERNET_SERVICE_FTP,0,0);
if(hFtpSession=NULL)
{
InternetCloseHandle(hFtpSession);
InternetCloseHandle(hIntSession);
MessageBox(0,"Ftp 连接出错","信息提示",MB_OK);
return FALSE;
}
if(FtpGetCurrentDirectory(hFtpSession,szBuffer,&iPathLenght))
MessageBox(0,szBuffer,"信息提示",MB_OK);
InternetCloseHandle(hFtpSession);
InternetCloseHandle(hIntSession);
return 0;