/beta/reports/reports_top.asp

http://github.com/khaneh/Orders · ASP · 27 lines · 18 code · 3 blank · 6 comment · 2 complexity · 8a6b16554407829d982815b0469c689e MD5 · raw file

  1. <%
  2. if (session("ID")="") then
  3. session.abandon
  4. response.redirect "../login.asp"
  5. end if
  6. %>
  7. <html>
  8. <head>
  9. <meta HTTP-EQUIV="Content-Type" CONTENT="text/html;charset=utf-8">
  10. <title><%=reportTitle%></title>
  11. </head>
  12. <body>
  13. <%
  14. if Request.QueryString("act")="show" then
  15. ' conStr="DRIVER={SQL Server};SERVER=(local);DATABASE=sefareshat;UID=sefadmin; PWD=5tgb;"
  16. conStr = "Provider=SQLNCLI10.1;Persist Security Info=False;User ID=sefadmin;Initial Catalog=sefareshat;Data Source=(local);PWD=5tgb;"
  17. Set conn = Server.CreateObject("ADODB.Connection")
  18. conn.open conStr
  19. ' ------------------
  20. ' -----
  21. ' ----- Create the Query from posted parameters
  22. ' -----
  23. ' ------------------
  24. %>