primsg_send.asp

来自「不是我做的一个留言板」· ASP 代码 · 共 69 行

ASP
69 行
字号 
<%
bg_id=1
%>
<!--#include file="conn.asp" -->
<!--#include file="session.asp" -->
<!--#include file="../function/function.asp" -->
<center>
<head>
<SCRIPT src="../js/win_js.js"></SCRIPT>

</HEAD>
<center>
<SCRIPT>SL_open(735,420);</SCRIPT>
   <table border="0" cellpadding="0" width="99%" cellspacing="0" >
   	<tr> 
  	<td>

		<p></p>
<!--########## -->

<%
username=session_cookie_name
web_id="../language/"&l_id
web_id=web_id&"/USER_ADMIN.ASP"
call include(web_id)
        RESPONSE.WRITE "<table width=100% bgcolor='"&tr_bg_color&"' border=1 cellpadding=3 cellspacing=0>"
        RESPONSE.WRITE "<tbody><tr><td bgcolor='"&r_bg_color&"' align=center>"
        RESPONSE.WRITE L_PRIMSG_selectuser
        RESPONSE.WRITE "</td></tr><td width=100% bgColor='"&td_bg_color&"' align=center>"
        RESPONSE.WRITE "<table border=0 width=100% cellspacing=0 cellpadding=0><tr>"
send_sql="select * from [user] where g_id='"&session_cookie_gid&"'"
set rs=conn.execute(send_sql)
do while not rs.eof
 i=i+1
if i=7 then
cc="</tr><tr>"
i=0
else
cc=""
end if
%>
<td width="14%">
<a href="#" title="<img src='<%=rs("fice")%>' width='16' height='16'>
<%
  user_group_inof=CINT(rs("usergroup")) 
  f_id=1
  call user_group_f(user_group_inof,f_id)
response.write "("&user_group_inof&")"
%>" onClick="javascript:window.open('primsgsend.asp?id=<%=rs("username")%>','','width=395,height=220,left=300,top=200')">
     
<% 

  f_id=0
  call user_group_f(user_group_inof,f_id) 
%> 
‖<%=rs("username")%>‖</a><%=cc%>

    <%rs.movenext
 loop
			
rs.close
 set rs=nothing
%>
    

</td>
     </tr>
</table>
<SCRIPT>SL_close()</SCRIPT>

primsg_send.asp - 源码说明

本页面展示了「不是我做的一个留言板」中的 primsg_send.asp 源码文件，采用 ASP 编程语言编写，共 69 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与留言板相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?