W
wlggslz
Unregistered / Unconfirmed
GUEST, unregistred user!
if (useredit.text<>'') and (passedit.Text<>'') then
begin
nmhttp1.post('http://10.114.79.8/d','Name='+trim(UserEdit.text)+'&Password='+trim(PassEdit.text)+'&Submit=登录');//地址、用户名、密码
tmp1:=splitstr(edit1.Text,'/',countsplit(edit1.text,'/')+1,countsplit(edit1.text,'/')+2);//获取文件名，这里为1.exe(splitstr、countsplit为字符串拆分)
这里tmp1的值是正确的
nmhttp1.body:=exepath+tmp1;//文件存放在应用程序目录下
tmp:=Utf8encode(edit1.Text);
nmhttp1.Get(tmp); //获取文件
end
else
showmessage('请填写用户名和密码。')
我在edit1中输入的是http://10.114.79.8/d/1.exe
我用这个下载文件，几M的文件，就下载了几K而已，要怎么处理啊？
1.exe是下载到本地了，但只有几K，不知道是什么地方的问题
begin
nmhttp1.post('http://10.114.79.8/d','Name='+trim(UserEdit.text)+'&Password='+trim(PassEdit.text)+'&Submit=登录');//地址、用户名、密码
tmp1:=splitstr(edit1.Text,'/',countsplit(edit1.text,'/')+1,countsplit(edit1.text,'/')+2);//获取文件名，这里为1.exe(splitstr、countsplit为字符串拆分)
这里tmp1的值是正确的
nmhttp1.body:=exepath+tmp1;//文件存放在应用程序目录下
tmp:=Utf8encode(edit1.Text);
nmhttp1.Get(tmp); //获取文件
end
else
showmessage('请填写用户名和密码。')
我在edit1中输入的是http://10.114.79.8/d/1.exe
我用这个下载文件，几M的文件，就下载了几K而已，要怎么处理啊？
1.exe是下载到本地了，但只有几K，不知道是什么地方的问题
