| 发表于:2007-01-02 11:05:31 楼主 |
我做一个blog程序,想做一个trackback功能.但是有一个问题,我用xmlhttp post信息出去的时候,是可以正确ping到其它的blog上面去,但是,我用serverxmlhttp方式的时候就不行,我看了一些别人的blog的代码就是用serverxmlhttp对像的.为什么我的不行呢?我是在本机上面试的,是不是serverxmlhttp只能运用在2000及以上系统呢? 先谢谢大家了! 代码: function trackback(remoteurl,myblogurl,myblogname,myblogtitle,myblogexcerpt) dim objxmlhttp,objxml,intstat,strmessage,strpostinfo myblogurl = server.urlencode(myblogurl) myblogname = server.urlencode(myblogname) myblogtitle = server.urlencode(myblogtitle) myblogexcerpt = server.urlencode(myblogexcerpt) '构造要发送的请求内容 strpostinfo = "title= " & myblogtitle strpostinfo = strpostinfo & "&url= " & myblogurl strpostinfo = strpostinfo & "&excerpt= " & myblogexcerpt strpostinfo = strpostinfo & "&blog_name= " & myblogname '创建对象 set objxmlhttp = server.createobject( "msxml2.serverxmlhttp ") objxmlhttp.open "post ", remoteurl, false on error resume next objxmlhttp.send strpostinfo set objxmlhttp = nothing end function |
|
|
|
|