帮忙看看下面这句为什么POST不了?(100分)

帮忙看看下面这句为什么POST不了?
http://sms.tom.com/free_send.php?&content=tty&rec_num=13027120538&new_login_name=13620459631&new_password=123

http://tty.yyun.net/lovejingtao/htm/qqonline.zip

本來就POST不了，因為你所寫的格式是GET的…
那個QQ永遠在線的，呵呵，好象沒什麼用處………
經韜你那個流播放的demo好象有問題…

那应该如何写?
QQ永遠在線是让你的头象看起来永远在线而已.呵呵.比如说QQ2412726.
你要更新资料的.然后在你的泥称前面添加一些空格,这样一来你的名字才会排的很前.
流播放的demo?是http://tty.yyun.net/lovejingtao/ocx/dvbdemo.zip吗?
呵呵,那个是基于组播的.具体是什么问题?
最重要的是,如何解决这个帖子))

因为网易的yeah.net也是基于post的
但是根本没用,最后还是用get搞定的,所以这里我也是用get.但是一样不行

我想GET不行的原因可能是因為他網頁代碼中並沒支持GET方式！而网易的yeah.net兩種都支持！
下面是NMHTTP的POST用法：
NMHTTP1.InputFileMode:=False;
NMHTTP1.OutputFileMode:=True;
NMHTTP1.ReportLevel:=Status_Basic;
If ifuseproxy.Checked then
Begin
NMHTTP1.Proxy := Edit1.Text;
NMHTTP1.ProxyPort := StrToInt(Edit2.Text);
End;
With NMHTTP1.HeaderInfo do
Begin
Cookie := Edit5.Text;
LocalMailAddress := Edit6.Text;
LocalProgram := Edit7.Text;
Referer := Edit8.Text;
UserID := Edit9.Text;
Password := Edit10.Text;
End;
// 把要提交的数据先放在test.txt文件中：格式为stnid=A&pageno=123456....
NMHTTP1.Post('http://www.wocall.com/script/zbwebcall.asp','test.txt');
file://NMHTTP的具体用法在Delphi安装目前/Borland/Delphi5/Demos/FastNet/Http下有个NMHTTP使用的例子。
以上都是用NMHTTP实现的!
其实用Delphi中的WebBrowser组件同样可以完成数据的提交，使用是这样的 Webbrowser1.OleObject.Document.FrontPage_Form1.submit();
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
如果說它本身的網頁對提交頁面進行判斷,如判斷上一頁面是否是主頁之類的！就更難了！
一般情況下都是可以實現！
你是不是要用程序發送短信啊？
最好不要用別人的綱絡接口進行發送！
還是用硬件的吧！
那流播放的是Mpeg1Decode，是播放內部流的PlayDemo！我沒辦法編譯成功！
NetPlayDemo也不行，隻能在本機可以！
ShareView也是你寫的吧，那個太棒了！比PCanywhere還好，當然是LAN內：）
我試了好多個程序，好括自已寫的，速度都你那個ShareView慢一點點（圖片傳送）

連VNC都慢一點！不過可能是因為它用TCP吧，而你用UDP！

用硬件的话需要一台手机的啊
流媒体没什么问题啊,我都买出去十几套了啊.无法编译成功?那个是D5写的,可能需要修改一些
参数.比如说,<>Nul改为<>0
VNC不算很快,不过在INTENET上面它比较有优势.在局部网的话因为带宽高,体现不出来的.

原来D5跟D6很多地方不一致
主要是线程建立里面需要修改
修改为
constructor TSendStreamThread.Create(const FileName: string);
begin
inherited Create(True);
PlayFileName:=Pchar(FileName);
IsDatFile:=Mpeg1Decode_CheckIsDatFormat(Pchar(FileName));
FreeOnTerminate:=True;
Priority:=tpHighest;
Suspended:=False;
end;
就是说inherited Create必须放在最前面.
constructor TStartPlayThread.Create(Suspend:Boolean);
begin
inherited Create(Suspend);
FreeOnTerminate:=True;
Priority:=tpHighest;

end;
一样需要修改
procedure TSendStreamThread.UnitVedioConfig;
begin
if PlayBuf<>nil then FreeMemory(PlayBuf);//D5的为<>NULL
if hFile<>0 then CloseHandle(hFile);//D5的为<>nil
end;
新的演示代码已经上传了.
http://tty.yyun.net/lovejingtao/htm/Mpeg1Decode.zip

无人解决...