📄 sound.asp
字号:
<%@Language = "VBScript"%>
<%
Option Explicit
Response.Buffer = True
Response.Expires = -1000
%>
<!-- #INCLUDE FILE="inifiles.asp" -->
<%
Dim vSoundOnOff
Application.Lock
Application("INIFile") = LoadINIFile(Server.MapPath("chat_ini.asp"))
Application.Unlock
vSoundOnOff = "" & Trim(IniFileValue(Application("INIFile"), "sounds", "sounds"))
If vSoundOnOff = "" Then vSoundOnOff = "1"
Response.Write "sounds=" & vSoundOnOff & "&result=OK"
Response.Flush
Response.End
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -