澳门二十一点游戏赌场 澳门二十一点游戏赌场
    您现在的位置:首页 >> 软件应用 >> ASP教程 >> 内容

    音乐开关和图像开关/请勿打挠开关操作文件admin/dontimg.asp

    时间:2012/7/23 20:42:28 点击:

      核心提示:音乐开关和图像开关/请勿打挠开关操作文件admin/dontimg.aspOption Explicitdim room,user,dd,ai,chatdata,sendid,dispstr,disp...
    音乐开关和图像开关/请勿打挠开关操作文件admin/dontimg.asp
    <%
    Option Explicit
    dim room,user,dd,ai,chatdata,sendid,dispstr,dispstr2
    user=request.form("user")
    dd=request.form("dd")
    ai=request.form("ai")
    chatdata=application("chatdata")
    sendid=finduser(user)

    select case dd
    case "0"
      if ai="on" then
        dispstr=right("0"&time,8)&",系统,0,"&user&",ff0000,0,你成功地打开了图像和Midi"
        dispstr2="parent.midisw=true;"
      else
        dispstr=right("0"&time,8)&",系统,0,"&user&",ff0000,0,你成功地关闭了图像和Midi"
        dispstr2="parent.midisw=false;"
      end if
    case "1"  '请勿要挠操作
      if ai="on" then
        if (chatdata(sendid,4) mod 2)=1 then '已经打开了
          dispstr=right("0"&time,8)&",系统,0,"&user&",ff0000,0,请勿打挠开关已处于打开状态"
        else
          chatdata(sendid,4)=chatdata(sendid,4)+1
          application.lock
            application("chatdata")=chatdata
          application.unlock
          dispstr=right("0"&time,8)&",系统,0,"&user&",ff0000,0,成功地打开了请勿打挠功能"
        end if
      else
        if (chatdata(sendid,4) mod 2)=0 then '已经关闭了
          dispstr=right("0"&time,8)&",系统,0,"&user&",ff0000,0,请勿打挠打挠开关己处于关闭状态"
        else
          chatdata(sendid,4)=chatdata(sendid,4)-1
          application.lock
            application("chatdata")=chatdata
          application.unlock
          dispstr=right("0"&time,8)&",系统,0,"&user&",ff0000,0,成功地关闭了请勿打挠功能"
        end if
      end if
    end select
    %>


    <%
    function finduser(fuser)
      dim reval,i
      reval=100
      for i=0 to 99
        if chatdata(i,0)=fuser then
          reval=i
          exit for
        end if
      next
      finduser=reval
    end function
    %>

    作者:佚名 来源:不详

    共有评论 0相关评论
    发表我的评论
    • 大名:
    • 内容:
  • 澳门二十一点游戏赌场(www.0769online.com) © 2018 版权所有 All Rights Reserved. 邮箱:103150@qq.com 业务QQ:103150 手机:13549753683

    Power By Laoy8 SQL 3.0SP1 粤ICP备10098668号
  •