请教怎么在2000Server上开一个ftp帐户，密码？IIS能做到么？VC如何编码

[Jarrylogin]

rt

[CodeProject-Jerry]

Serv-U 一般是用这个 Delphi的软件

它提供了外部接口建立帐号

[CodeProject-Jerry]

rug s如果是 应用服务器带的那个 没搞过

不过 应该和IIS差不多吧

[sevencat]

能做到，有接口的，是个COM接口，用C#也能访问到，你查一下他们的iis的开发包。

[whuwdj]

IIS可以作到。VC实现代码参见本人的代码：
void CDlgRptTest::OnBnClickedButtonTest()
{
CString strRemotePath = "D:\\Wdj";
CString strRemoteFile = "";
CString strLocalPath = "D:\\";
CString strLocalFileName = "话务报告测试.txt";

CInternetSession sess(_T("RptAlyCfg"));
CFtpConnection* pFtpConnect = NULL;
try
{
CString strIPAddr = "192.168.11.11";
CString strFtpUser = "Administrator";
CString strFtpPwd = "123456";

pFtpConnect = sess.GetFtpConnection(strIPAddr, strFtpUser, strFtpPwd, 21);
if(NULL == pFtpConnect)
{
CMessage::ShowErrorMsg("连接服务器失败，上传话务报告文件失败！");
return;
}
pFtpConnect->SetCurrentDirectory(strRemotePath);

pFtpConnect->PutFile(strLocalFileName,
strRemotePath + strRemoteFile,
FTP_TRANSFER_TYPE_BINARY,
TRUE);
}
catch (CInternetException* pEx)
{
TCHAR sz[1024];
pEx->GetErrorMessage(sz, 1024);
CMessage::ShowErrorMsg(sz);
pEx->Delete();
return;
}
catch(...)
{
CMessage::ShowErrorMsg("未知错误，上传失败！");
return;
}

if (pFtpConnect != NULL)
{
pFtpConnect->Close();
}
delete pFtpConnect;

CMessage::ShowPromptMsg(_T("成功上传话务测试报告：\n\n%s"), strLocalFileName);
}