<% call checklogin() if request("type")="save" then if trim(request("touser"))="" or trim(request("messagetitle"))="" or trim(request("messagecontent"))="" then response.write"" response.end end if set rs=server.createobject("adodb.recordset") sql="select userid from [member] where username='"&replace(cstr(trim(request("touser"))),"'","")&"'" rs.open sql,conn,1,1 if rs.eof or rs.bof then response.write"" response.end end if rs.close sql="select * from [message]" rs.open sql,conn,1,3 rs.addnew rs("messagetitle")=trim(request("messagetitle")) rs("messagecontent")=trim(request("messagecontent")) rs("senduser")=request.cookies("pmusic")("username") rs("getuser")=trim(request("touser")) rs.update rs.close set rs=nothing conn.close set conn=nothing response.write "" end if %> 我的短信
我的娱乐

发送站内短信
接收会员:
" size=30 >
短信标题:
50字符内
短信内容: