/beta/reports/reports_top.asp
ASP | 27 lines | 18 code | 3 blank | 6 comment | 2 complexity | 8a6b16554407829d982815b0469c689e MD5 | raw file
1<% 2if (session("ID")="") then 3 session.abandon 4 response.redirect "../login.asp" 5end 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<% 14if Request.QueryString("act")="show" then 15 16' conStr="DRIVER={SQL Server};SERVER=(local);DATABASE=sefareshat;UID=sefadmin; PWD=5tgb;" 17conStr = "Provider=SQLNCLI10.1;Persist Security Info=False;User ID=sefadmin;Initial Catalog=sefareshat;Data Source=(local);PWD=5tgb;" 18 Set conn = Server.CreateObject("ADODB.Connection") 19 conn.open conStr 20 21' ------------------ 22' ----- 23' ----- Create the Query from posted parameters 24' ----- 25' ------------------ 26 27%>