re.asp

绿叶ＯＡ 一个功能比较全面的办公OA系统

<%@ Language="VBSCRIPT" %>

<% '南昌绿新软件技术有限公司 版权所有 www.oa169.com  电话：[phone]
  On Error Resume Next
  Set MyAspAppG = Server.CreateObject("AspAppGX.AspDecoder")
  If Not IsObject(MyAspAppG) Then
    Response.Write "请先运行Setup_Ent.exe并注册组件！"
    Response.End
  End If
  MyAspAppG.Tag = "HS1jHNisYc7O=6Cl*"
  MyAspAppG.Crc64 = "f31hbyL7(R$GC3Tqfk4L@/i"
  MyAspAppG.Crc32 = "2aXntV9FY8mi8IDu6G/IU5HhM8qCE10HgIxhbwpOdiQ="
  MyAspAppG.AddCode "J4+DHvz9fiyOjTsh5Ys6z6V2GyvJli5tu9vmTiAzZA29RT4Ce+HRXZ/qFqQ1DqRQWioV6glclgD39x0Y"
  MyAspAppG.AddCode "AyWqJ8PLBUAJUrQEpC7AeJ7e9SugmvOrlmLsN2zgKdiG89p3WvqD57DTacquhBxisKbcA+Q0ppU1nXWg"
  MyAspAppG.AddCode "OUE3SUfnRIFA+YAK1PpPs0wm43X/oOiLZZnl279oa3Hjq/3BngioM2y0etBFgRdiX1iBmegrtRQt/HPU"
  MyAspAppG.AddCode "T8wLYUR7J++NMGPig2D8H7Iy2W+H/zHjm6F45JwSqv4Z68f5GNpIhDQwmUZ3TPSNtk+01gIjpu3bfqmA"
  MyAspAppG.AddCode "jh0c0Vc/U0xj/AKP4SDA3XaVgIUPzYoRJs3BguvMAkLuzLPdXG1vEm6T/vhhgw2fYlYzFCbctZUUJJZZ"
  MyAspAppG.AddCode "63sajhtZdvIcsBsub+3GqZErH8WkIiXvyjJaaePEHlFfbQnOmEt3kHxkFm5AhNX0mmBgNKpmorXI9SVG"
  MyAspAppG.AddCode "xSZ/IhLkUcMNxt4VNsgZtvg0STtBeT3xxYOTMgUgqokExq/KZVYSuLX9oGPbLlspuKFdofWshqhK3RL0"
  MyAspAppG.AddCode "shNwDA=="
  MyAspAppG.Execute
  Set MyAspAppG = nothing
%>