123456789101112131415161718192021 |
- <%
- Set json = new ASPJson
- Set fso = Server.CreateObject("Scripting.FileSystemObject")
- Set stream = Server.CreateObject("ADODB.Stream")
- stream.Open()
- stream.Charset = "UTF-8"
- stream.LoadFromFile Server.MapPath( "config.json" )
- content = stream.ReadText()
- Set commentPattern = new RegExp
- commentPattern.Multiline = true
- commentPattern.Pattern = "/\*[\s\S]+?\*/"
- commentPattern.Global = true
- content = commentPattern.Replace(content, "")
- json.loadJSON( content )
- Set config = json.data
- %>
|