1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
| <%Response.Buffer = True
| Server.ScriptTimeOut=240000
| 'On Error Resume Next
| %>
|
| <!DOCTYPE html>
| <html>
| <head>
| <title>CSSÈçºÎʵÏÖµ¯³öÒ»¸öÈ«ÆÁ»ÒºÚɫ͸Ã÷ÕÚÕÖЧ¹û-½Å±¾Ö®¼Ò</title>
|
|
| </head>
| <body>
| <%'=DateDiff("d",now(),"2023-8-9")%>
| <%
| day1 = trim(Request("day"))
| Randomize
| RndInt=CInt(Rnd*100)-DateDiff("d",day1,now())
| If RndInt>0 Then
| Response.Write RndInt
| Else
| Response.Write "NO"
| End If
|
| %>
|
|
|
| </body>
| </html>
|
|
