Response.Write   " <script language=javascript> "
Response.Write   "window.open('http://sms.api.bz/fetion.php?username=号码&password=密码&sendto=号码&message=内容', '_blank '); "
Response.Write   " </script> "

那段代码改成这样试试！


[ 本帖最后由 wangjy500 于 2010-8-16 23:05 编辑 ]

测试没好用……
可能是因为空格什么的在这里就变样子了
您能发附件么？如果可以的话就麻烦了……

或者是不是少括号什么的问题……

不好意思打错字了！
Response.Write   " <script> "
Response.Write   "window.open('http://sms.api.bz/fetion.php?username=号码&password=密码&sendto=号码&message=内容', '_blank '); "
Response.Write   " </script> "

额……测试还是没有好用
不过真的非常非常感谢您了
已经让我看到了很大的希望了！
我身体不舒服先休息了
祝您节日愉快
明天一定要摆平这个问题！~
再次感谢

Response.Write   " <script> "
Response.Write   "window.open('http://sms.api.bz/fetion.php?username=号码&password=密码&sendto=号码&message=内容'); "
Response.Write   " </script> "
这样吧。不行也没辙了！

如果用弹新窗口的方法也一样会让用户导向这个页面http://sms.api.bz/fetion.php，感觉地址栏都得改变·

要让用户豪无感觉！必须借住无刷新的AJAX，在后台进行提交，前台却无任何反映，数据提交出去后返回一个状态，显示提交成功，用户根本无法察觉是哪个页面提交的！

response.transfer "http://sms.api.bz/fetion.php?username=号码&password=密码&sendto=号码&message=内容"
不然用这个试试！发完了还会返回原页面，而不是跳转！

'飞信短信发送函数
'--------------------------------------------------------
sub Fetion(Mobile,MobilePassword,MobileMessage)
 dim xmlhttp,url
 url="http://sms.api.bz/fetion.php?username="&Mobile&"&password="&MobilePassword&"&sendto="&Mobile&"&message="&MobileMessage
 set xmlhttp = server.CreateObject("MSxml2.XMLHTTP")
 xmlhttp.open "get",url,false
 xmlhttp.send()
 set xmlhttp = nothing
end sub



'飞信API接口，短信免费发送参数配置
'---------------------------------------------
dim Mobile,MobilePassword,YesOrNo
YesOrNo = 1                               '是否启用短信功能，1为启用，0为禁用！
Mobile = "手机号码"                    '手机号码
MobilePassword = "飞信密码"         '飞信登录密码，明文的，没有加密处理的哟...
dim sendContent

sendContent = "提示信息"
if YesOrNo = 1 then call Fetion(Mobile,MobilePassword,sendContent)    '调用飞信发送短信  

发一个我正在使用的。。

sendContent = "提示信息"
if YesOrNo = 1 then call Fetion(Mobile,MobilePassword,sendContent)    '调用飞信发送短信   

在需要的地方调用。。无需跳转。

不过这个接口最近好像不能用了。。飞信的加密码方式改变了。。好像会登录失败。。
要是接口没问题了，借助ajax实现。。在提示成功的同时远程执行了发送短信。。不会有弹出新窗口，执行完再关闭的麻烦。。提高体验。。

[ 本帖最后由 lele2007 于 2010-8-16 23:59 编辑 ]