<%
'软件名称：龙品软件社区问题管理平台WT9.0
'源码作者：岑品雄
'官方网站：http://www.wzcen.com
'联系方式：QQ：295011549　邮箱：lxzx2488@163.com 手机号:18277450676　（只收短信，不接来电）
'请勿修改下列任何代码,以保证程序正常运行

Dim QGGQQQ,QGQGGG,QGQGGQ,QGQGQG,QGQGQQ
Set QGQGGQ=Response:Set QGQGGG=Request:Set QGQGQQ=Session:Set QGGQQQ=Application:Set QGQGQG=Server
If Date > CDate(QQGQQQ("a_`f\`\`")) Then QGQGGQ.Write QQGQQQ("寴@丈@赲@，,朧@罌@竔@糶@绚@佺@産@朾@陋@巭@迂@朚@！,欝@迉@质@乫@歞@弊@牃@，,電@襼@诲@聏@糶@""""：,ahd_``dch ,邩@箬@：,=IKIacggo`eb]4@> ,扆@朵@：,`gaffcd_efe"):QGQGGQ.End
Private Const QGQQGGG =8
Private Const QGQQGGQ =4
Private Const QGQQGQG =32
Private QQQQGG(30)
Private QQQQGQ(30)
Private Function QGQQGG(QQGQQGQ, QQGQQQG)
If QQGQQQG = 0 Then
QGQQGG = QQGQQGQ
Exit Function
ElseIf QQGQQQG = 31 Then
If QQGQQGQ And 1 Then
QGQQGG = &H80000000
Else
QGQQGG = (47 * 30 - 1410)
End If
Exit Function
ElseIf QQGQQQG < 0 Or QQGQQQG > 31 Then
Err.Raise 6
End If
If (QQGQQGQ And QQQQGQ(31 - QQGQQQG)) Then
QGQQGG = ((QQGQQGQ And QQQQGG(31 - (QQGQQQG + 1))) * QQQQGQ(QQGQQQG)) Or &H80000000
Else
QGQQGG = ((QQGQQGQ And QQQQGG(31 - QQGQQQG)) * QQQQGQ(QQGQQQG))
End If
End Function
Private Function QGQQGQ(QQGQQGQ, QQGQQQG)
If QQGQQQG = 0 Then
QGQQGQ = QQGQQGQ
Exit Function
ElseIf QQGQQQG = 31 Then
If QQGQQGQ And &H80000000 Then
QGQQGQ = (13 * 45 - 584)
Else
QGQQGQ = (47 * 30 - 1410)
End If
Exit Function
ElseIf QQGQQQG < 0 Or QQGQQQG > 31 Then
Err.Raise 6
End If
QGQQGQ = (QQGQQGQ And &H7FFFFFFE) \ QQQQGQ(QQGQQQG)
If (QQGQQGQ And &H80000000) Then
QGQQGQ = (QGQQGQ Or (&H40000000 \ QQQQGQ(QQGQQQG - 1)))
End If
End Function
Private Function QGQQQG(QQGQQGQ, QQGQQQG)
QGQQQG = QGQQGG(QQGQQGQ, QQGQQQG) Or QGQQGQ(QQGQQGQ, (32 - QQGQQQG))
End Function
Private Function QGQQQQ(QQGQQQQ, QQQGGGG)
Dim QQQQQG
Dim QQQQQQ
Dim QGGGGGG
Dim QGGGGGQ
Dim QGGGGQG
QGGGGGG = QQGQQQQ And &H80000000
QGGGGGQ = QQQGGGG And &H80000000
QQQQQG = QQGQQQQ And &H40000000
QQQQQQ = QQQGGGG And &H40000000
QGGGGQG = (QQGQQQQ And &H3FFFFFFF) + (QQQGGGG And &H3FFFFFFF)
If QQQQQG And QQQQQQ Then
QGGGGQG = QGGGGQG Xor &H80000000 Xor QGGGGGG Xor QGGGGGQ
ElseIf QQQQQG Or QQQQQQ Then
If QGGGGQG And &H40000000 Then
QGGGGQG = QGGGGQG Xor &HC0000000 Xor QGGGGGG Xor QGGGGGQ
Else
QGGGGQG = QGGGGQG Xor &H40000000 Xor QGGGGGG Xor QGGGGGQ
End If
Else
QGGGGQG = QGGGGQG Xor QGGGGGG Xor QGGGGGQ
End If
QGQQQQ = QGGGGQG
End Function
Private Function QQGGGG(QGGQGQQ, QQQGGGQ, QQQGGQG)
QQGGGG = (QGGQGQQ And QQQGGGQ) Or ((Not QGGQGQQ) And QQQGGQG)
End Function
Private Function QQGGGQ(QGGQGQQ, QQQGGGQ, QQQGGQG)
QQGGGQ = (QGGQGQQ And QQQGGQG) Or (QQQGGGQ And (Not QQQGGQG))
End Function
Private Function QQGGQG(QGGQGQQ, QQQGGGQ, QQQGGQG)
QQGGQG = (QGGQGQQ Xor QQQGGGQ Xor QQQGGQG)
End Function
Private Function QQGGQQ(QGGQGQQ, QQQGGGQ, QQQGGQG)
QQGGQQ = (QQQGGGQ Xor (QGGQGQQ Or (Not QQQGGQG)))
End Function
Private Sub QQQGGG(QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ, QQQGGQQ, QQQGQGG)
QGQGGGQ = QGQQQQ(QGQGGGQ, QGQQQQ(QGQQQQ(QQGGGG(QGQGGQG, QGQGGQQ, QGQGQGG), QGGQGQQ), QQQGQGG))
QGQGGGQ = QGQQQG(QGQGGGQ, QQQGGQQ)
QGQGGGQ = QGQQQQ(QGQGGGQ, QGQGGQG)
End Sub
Private Sub QQQGGQ(QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ, QQQGGQQ, QQQGQGG)
QGQGGGQ = QGQQQQ(QGQGGGQ, QGQQQQ(QGQQQQ(QQGGGQ(QGQGGQG, QGQGGQQ, QGQGQGG), QGGQGQQ), QQQGQGG))
QGQGGGQ = QGQQQG(QGQGGGQ, QQQGGQQ)
QGQGGGQ = QGQQQQ(QGQGGGQ, QGQGGQG)
End Sub
Private Sub QQQGQG(QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ, QQQGGQQ, QQQGQGG)
QGQGGGQ = QGQQQQ(QGQGGGQ, QGQQQQ(QGQQQQ(QQGGQG(QGQGGQG, QGQGGQQ, QGQGQGG), QGGQGQQ), QQQGQGG))
QGQGGGQ = QGQQQG(QGQGGGQ, QQQGGQQ)
QGQGGGQ = QGQQQQ(QGQGGGQ, QGQGGQG)
End Sub
Private Sub QQQGQQ(QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ, QQQGGQQ, QQQGQGG)
QGQGGGQ = QGQQQQ(QGQGGGQ, QGQQQQ(QGQQQQ(QQGGQQ(QGQGGQG, QGQGGQQ, QGQGQGG), QGGQGQQ), QQQGQGG))
QGQGGGQ = QGQQQG(QGQGGGQ, QQQGGQQ)
QGQGGGQ = QGQQQQ(QGQGGGQ, QGQGGQG)
End Sub
Private Function QQGQGG(QQQGQGQ)
Dim QGGGGQQ
Dim QGGGQGG
Dim QGGGQGQ()
Dim QGGGQQG
Dim QGGGQQQ
Dim QGGQGGG
Const QGQQGQQ =512
Const QGQQQGG =448
QGGGGQQ = Len(QQQGQGQ)
QGGGQGG = (((QGGGGQQ + ((QGQQGQQ - QGQQQGG) \ QGQQGGG)) \ (QGQQGQQ \ QGQQGGG)) + 1) * (QGQQGQQ \ QGQQGQG)
ReDim QGGGQGQ(QGGGQGG - 1)
QGGGQQG = (47 * 30 - 1410)
QGGGQQQ = (47 * 30 - 1410)
Do Until QGGGQQQ >= QGGGGQQ
QGGQGGG = QGGGQQQ \ QGQQGGQ
QGGGQQG = (QGGGQQQ Mod QGQQGGQ) * QGQQGGG
QGGGQGQ(QGGQGGG) = QGGGQGQ(QGGQGGG) Or QGQQGG(Asc(Mid(QQQGQGQ, QGGGQQQ + 1, 1)), QGGGQQG)
QGGGQQQ = QGGGQQQ + (13 * 45 - 584)
Loop
QGGQGGG = QGGGQQQ \ QGQQGGQ
QGGGQQG = (QGGGQQQ Mod QGQQGGQ) * QGQQGGG
QGGGQGQ(QGGQGGG) = QGGGQGQ(QGGQGGG) Or QGQQGG(&H80, QGGGQQG)
QGGGQGQ(QGGGQGG - 2) = QGQQGG(QGGGGQQ, 3)
QGGGQGQ(QGGGQGG - 1) = QGQQGQ(QGGGGQQ, 29)
QQGQGG = QGGGQGQ
End Function
Private Function QQGQGQ(QQGQQGQ)
Dim QGGQGGQ
Dim QGGQGQG
For QGGQGQG = 0 To 3
QGGQGGQ = QGQQGQ(QQGQQGQ, QGGQGQG * QGQQGGG) And QQQQGG(QGQQGGG - 1)
QQGQGQ = QQGQGQ & Right("0" & Hex(QGGQGGQ), 2)
Next
End Function
Public Function QQGQQG(QQQGQGQ)
QQQQGG(0) = CLng(1)
QQQQGG(1) = CLng(3)
QQQQGG(2) = CLng(7)
QQQQGG(3) = CLng(15)
QQQQGG(4) = CLng(31)
QQQQGG(5) = CLng(63)
QQQQGG(6) = CLng(127)
QQQQGG(7) = CLng(255)
QQQQGG(8) = CLng(511)
QQQQGG(9) = CLng(1023)
QQQQGG(10) = CLng(2047)
QQQQGG(11) = CLng(4095)
QQQQGG(12) = CLng(8191)
QQQQGG(13) = CLng(16383)
QQQQGG(14) = CLng(32767)
QQQQGG(15) = CLng(65535)
QQQQGG(16) = CLng(131071)
QQQQGG(17) = CLng(262143)
QQQQGG(18) = CLng(524287)
QQQQGG(19) = CLng(1048575)
QQQQGG(20) = CLng(2097151)
QQQQGG(21) = CLng(4194303)
QQQQGG(22) = CLng(8388607)
QQQQGG(23) = CLng(16777215)
QQQQGG(24) = CLng(33554431)
QQQQGG(25) = CLng(67108863)
QQQQGG(26) = CLng(134217727)
QQQQGG(27) = CLng(268435455)
QQQQGG(28) = CLng(536870911)
QQQQGG(29) = CLng(1073741823)
QQQQGG(30) = CLng(2147483647)
QQQQGQ(0) = CLng(1)
QQQQGQ(1) = CLng(2)
QQQQGQ(2) = CLng(4)
QQQQGQ(3) = CLng(8)
QQQQGQ(4) = CLng(16)
QQQQGQ(5) = CLng(32)
QQQQGQ(6) = CLng(64)
QQQQGQ(7) = CLng(128)
QQQQGQ(8) = CLng(256)
QQQQGQ(9) = CLng(512)
QQQQGQ(10) = CLng(1024)
QQQQGQ(11) = CLng(2048)
QQQQGQ(12) = CLng(4096)
QQQQGQ(13) = CLng(8192)
QQQQGQ(14) = CLng(16384)
QQQQGQ(15) = CLng(32768)
QQQQGQ(16) = CLng(65536)
QQQQGQ(17) = CLng(131072)
QQQQGQ(18) = CLng(262144)
QQQQGQ(19) = CLng(524288)
QQQQGQ(20) = CLng(1048576)
QQQQGQ(21) = CLng(2097152)
QQQQGQ(22) = CLng(4194304)
QQQQGQ(23) = CLng(8388608)
QQQQGQ(24) = CLng(16777216)
QQQQGQ(25) = CLng(33554432)
QQQQGQ(26) = CLng(67108864)
QQQQGQ(27) = CLng(134217728)
QQQQGQ(28) = CLng(268435456)
QQQQGQ(29) = CLng(536870912)
QQQQGQ(30) = CLng(1073741824)
Dim QGGQGQQ
Dim QGGQQGG
Dim QGGQQGQ
Dim QGGQQQG
Dim QGGQQQQ
Dim QGQGGGG
Dim QGQGGGQ
Dim QGQGGQG
Dim QGQGGQQ
Dim QGQGQGG
Const QGQQQGQ =7
Const QGQQQQG =12
Const QGQQQQQ =17
Const QQGGGGG =22
Const QQGGGGQ =5
Const QQGGGQG =9
Const QQGGGQQ =14
Const QQGGQGG =20
Const QQGGQGQ =4
Const QQGGQQG =11
Const QQGGQQQ =16
Const QQGQGGG =23
Const QQGQGGQ =6
Const QQGQGQG =10
Const QQGQGQQ =15
Const QQGQQGG =21
QGGQGQQ = QQGQGG(QQQGQGQ)
QGQGGGQ = &H67452301
QGQGGQG = &HEFCDAB89
QGQGGQQ = &H98BADCFE
QGQGQGG = &H10325476
For QGGQQGG = 0 To UBound(QGGQGQQ) Step (101 * 74 - 7458)
QGGQQGQ = QGQGGGQ
QGGQQQG = QGQGGQG
QGGQQQQ = QGQGGQQ
QGQGGGG = QGQGQGG
QQQGGG QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 0), QGQQQGQ, &HD76AA478
QQQGGG QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 1), QGQQQQG, &HE8C7B756
QQQGGG QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 2), QGQQQQQ, &H242070DB
QQQGGG QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 3), QQGGGGG, &HC1BDCEEE
QQQGGG QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 4), QGQQQGQ, &HF57C0FAF
QQQGGG QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 5), QGQQQQG, &H4787C62A
QQQGGG QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 6), QGQQQQQ, &HA8304613
QQQGGG QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 7), QQGGGGG, &HFD469501
QQQGGG QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 8), QGQQQGQ, &H698098D8
QQQGGG QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 9), QGQQQQG, &H8B44F7AF
QQQGGG QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 10), QGQQQQQ, &HFFFF5BB1
QQQGGG QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 11), QQGGGGG, &H895CD7BE
QQQGGG QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 12), QGQQQGQ, &H6B901122
QQQGGG QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 13), QGQQQQG, &HFD987193
QQQGGG QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 14), QGQQQQQ, &HA679438E
QQQGGG QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 15), QQGGGGG, &H49B40821
QQQGGQ QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 1), QQGGGGQ, &HF61E2562
QQQGGQ QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 6), QQGGGQG, &HC040B340
QQQGGQ QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 11), QQGGGQQ, &H265E5A51
QQQGGQ QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 0), QQGGQGG, &HE9B6C7AA
QQQGGQ QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 5), QQGGGGQ, &HD62F105D
QQQGGQ QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 10), QQGGGQG, &H2441453
QQQGGQ QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 15), QQGGGQQ, &HD8A1E681
QQQGGQ QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 4), QQGGQGG, &HE7D3FBC8
QQQGGQ QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 9), QQGGGGQ, &H21E1CDE6
QQQGGQ QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 14), QQGGGQG, &HC33707D6
QQQGGQ QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 3), QQGGGQQ, &HF4D50D87
QQQGGQ QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 8), QQGGQGG, &H455A14ED
QQQGGQ QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 13), QQGGGGQ, &HA9E3E905
QQQGGQ QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 2), QQGGGQG, &HFCEFA3F8
QQQGGQ QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 7), QQGGGQQ, &H676F02D9
QQQGGQ QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 12), QQGGQGG, &H8D2A4C8A
QQQGQG QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 5), QQGGQGQ, &HFFFA3942
QQQGQG QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 8), QQGGQQG, &H8771F681
QQQGQG QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 11), QQGGQQQ, &H6D9D6122
QQQGQG QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 14), QQGQGGG, &HFDE5380C
QQQGQG QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 1), QQGGQGQ, &HA4BEEA44
QQQGQG QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 4), QQGGQQG, &H4BDECFA9
QQQGQG QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 7), QQGGQQQ, &HF6BB4B60
QQQGQG QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 10), QQGQGGG, &HBEBFBC70
QQQGQG QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 13), QQGGQGQ, &H289B7EC6
QQQGQG QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 0), QQGGQQG, &HEAA127FA
QQQGQG QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 3), QQGGQQQ, &HD4EF3085
QQQGQG QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 6), QQGQGGG, &H4881D05
QQQGQG QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 9), QQGGQGQ, &HD9D4D039
QQQGQG QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 12), QQGGQQG, &HE6DB99E5
QQQGQG QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 15), QQGGQQQ, &H1FA27CF8
QQQGQG QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 2), QQGQGGG, &HC4AC5665
QQQGQQ QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 0), QQGQGGQ, &HF4292244
QQQGQQ QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 7), QQGQGQG, &H432AFF97
QQQGQQ QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 14), QQGQGQQ, &HAB9423A7
QQQGQQ QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 5), QQGQQGG, &HFC93A039
QQQGQQ QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 12), QQGQGGQ, &H655B59C3
QQQGQQ QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 3), QQGQGQG, &H8F0CCC92
QQQGQQ QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 10), QQGQGQQ, &HFFEFF47D
QQQGQQ QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 1), QQGQQGG, &H85845DD1
QQQGQQ QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 8), QQGQGGQ, &H6FA87E4F
QQQGQQ QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 15), QQGQGQG, &HFE2CE6E0
QQQGQQ QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 6), QQGQGQQ, &HA3014314
QQQGQQ QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 13), QQGQQGG, &H4E0811A1
QQQGQQ QGQGGGQ, QGQGGQG, QGQGGQQ, QGQGQGG, QGGQGQQ(QGGQQGG + 4), QQGQGGQ, &HF7537E82
QQQGQQ QGQGQGG, QGQGGGQ, QGQGGQG, QGQGGQQ, QGGQGQQ(QGGQQGG + 11), QQGQGQG, &HBD3AF235
QQQGQQ QGQGGQQ, QGQGQGG, QGQGGGQ, QGQGGQG, QGGQGQQ(QGGQQGG + 2), QQGQGQQ, &H2AD7D2BB
QQQGQQ QGQGGQG, QGQGGQQ, QGQGQGG, QGQGGGQ, QGGQGQQ(QGGQQGG + 9), QQGQQGG, &HEB86D391
QGQGGGQ = QGQQQQ(QGQGGGQ, QGGQQGQ)
QGQGGQG = QGQQQQ(QGQGGQG, QGGQQQG)
QGQGGQQ = QGQQQQ(QGQGGQQ, QGGQQQQ)
QGQGQGG = QGQQQQ(QGQGQGG, QGQGGGG)
Next
QQGQQG=LCase(QQGQGQ(QGQGGQG) & QQGQGQ(QGQGGQQ))
End Function
Function QQGQQQ(ByVal QGQGGQQ)
Dim QGQGQGQ, QGQGQQG, QGQGQQQ
QGQGGQQ = Replace(QGQGGQQ, Chr(37) & ChrW(-243) & Chr(62), Chr(37) & Chr(62))
For QGQGQQG = 1 To Len(QGQGGQQ)
If QGQGQQG <> QGQGQQQ Then
QGQGQGQ = AscW(Mid(QGQGGQQ, QGQGQQG, 1))
If QGQGQGQ >= 33 And QGQGQGQ <= 79 Then
QQGQQQ = QQGQQQ & Chr(QGQGQGQ + 47)
ElseIf QGQGQGQ >= 80 And QGQGQGQ <= 126 Then
QQGQQQ = QQGQQQ & Chr(QGQGQGQ - 47)
Else
QGQGQQQ = QGQGQQG + 1
If Mid(QGQGGQQ, QGQGQQQ, 1) = QQGQQQ("o") Then QQGQQQ = QQGQQQ & ChrW(QGQGQGQ + 5) Else QQGQQQ = QQGQQQ & Mid(QGQGGQQ, QGQGQQG, 1)
End If
End If
Next
End Function
%>