home *** CD-ROM | disk | FTP | other *** search
/ 202.53.64.216 / 202.53.64.216.tar / 202.53.64.216 / janahitha / Admin / AdsAdminUpdateHoardingType.asp < prev    next >
Text File  |  2004-11-26  |  6KB  |  153 lines
  1. <%
  2. Response.Buffer = true
  3. %>
  4. <%
  5.     if session("AdminLogin")="" then Response.Redirect "default.asp"
  6. %>
  7. <!-- #include file="AdsAdminConstants.asp" -->
  8. <!-- #include file="../AdsOpenConn.asp" -->
  9. <%
  10.     if Request.Form.Count = 0 then
  11.         hoardingtypeid = Request.querystring("hoardingtypeid")
  12.         set rs = server.CreateObject("adodb.recordset")
  13.         sql = "select HoardingTypeName,HoardingMaterial,HoardingTypeStatus,HoardingLightingType,HoardingStandType from HoardingTypeMaster where HoardingTypeId=" + hoardingtypeid
  14.         'Response.Write sql
  15.         rs.open sql, con, 3, 3
  16.         hoardingtypename = rs("HoardingTypeName")
  17.         HoardingLightingType = rs("HoardingLightingType")
  18.         'hoardingwidth = rs("HoardingWidth")
  19.         hoardingmaterial = rs("HoardingMaterial")
  20.         HoardingStandType = rs("HoardingStandType")
  21.         hoardingtypestatus = rs("HoardingTypeStatus")
  22.         rs.close
  23. %>
  24. <html>
  25.     <head>
  26.         <title> <%=SiteName%> - Welcome </title>
  27.         <meta name="author" content="Jagadish">
  28.         <script language="javascript" src="../func.js"></script>
  29.         <script language="javascript">
  30.             function check()
  31.             {
  32.                 validateform = document.updatehoardingtypeform;
  33.                 if(isempty(validateform.hoardingtypename))
  34.                     validateform.hoardingtypename.focus();
  35.                 else
  36.                 if(isempty(validateform.HoardingLightingType))
  37.                     validateform.HoardingLightingType.focus();
  38.                 else
  39.                 if(isempty(validateform.HoardingStandType))
  40.                     validateform.HoardingStandType.focus();
  41.         
  42.                 else
  43.                 if(isempty(validateform.hoardingmaterial))
  44.                     validateform.hoardingmaterial.focus();
  45.         //        else
  46.         //        if(!(ismoney(validateform.hoardingrentalprice)))
  47.         //            validateform.hoardingrentalprice.focus();
  48.                 else
  49.                     validateform.submit();
  50.             }
  51.         </script>
  52.     </head>
  53.     <body bottommargin=0 topmargin=0 leftmargin=0 rightmargin=0 marginheight=0 marginwidth=0 bgcolor=#ffffff>
  54.         <table cellpadding=0 cellspacing=0 border=0 width=780 height=450>
  55.         <tr height=1>
  56.             <td width="100" bgcolor="<%=LeftColor%>"><font face=verdana size=1> </font></td>
  57.             <td width="290" bgcolor="<%=LeftColor%>"><font face=verdana size=1> </font></td>
  58.             <td width="290" bgcolor="<%=RightColor%>"><font face=verdana size=1> </font></td>
  59.             <td width="100" bgcolor="<%=RightColor%>"><font face=verdana size=1> </font></td>
  60.         </tr>
  61.         <tr>
  62.             <td bgcolor="<%=LeftColor%>" colspan=2 valign=top > <font face="courier new" size=6 color="<%=SiteNameColor%>"> <b>   <%=SiteName%> </b> </font> </td>
  63.             <td bgcolor="<%=RightColor%>" colspan=2 align=right valign=top> <font face=verdana size=2> <a href="AdsAdminHome.asp"><font color="<%=TopLinksColor%>">Home</font></a>     <a href="AdsAdminHome.asp?lo"><font color="<%=TopLinksColor%>">Logout</font></a>   </font> </td>
  64.         </tr>
  65.         <tr>
  66.             <td bgcolor="<%=LeftColor%>">   </td>
  67.             <td colspan=2 align=center height=100 bgcolor="<%=OuterTblBGColor%>">
  68.                 <br>
  69.                 <form name="updatehoardingtypeform" method=post action="<%=Request.ServerVariables("script_name")%>">
  70.                 <table cellpadding=0 cellspacing=0 border=0>
  71.                 <tr> <td bgcolor="<%=TblBorderColor%>">
  72.                 <table cellspacing=1 cellpadding=3 border=0 width=400>
  73.                 <tr bgcolor="<%=TblHeadBGColor%>">
  74.                     <th colspan=2> 
  75.                         <font face=verdana color="<%=TblHeadFGColor%>"> Update A Hoarding Type </font>
  76.                     </td>
  77.                 </tr>
  78.                 <tr bgcolor="<%=TblBGColor%>">
  79.                     <td width="50%"> 
  80.                         <font face="verdana" size=2 color="<%=TblFGColor%>"> Hoarding Type Name </font> 
  81.                     </td>
  82.                     <td width="50%"> 
  83.                         <input type=text name="hoardingtypename" maxlength="50" value="<%=hoardingtypename%>">
  84.                     </td>
  85.                 </tr>
  86.                             <tr bgcolor="<%=TblBGColor%>">
  87.                     <td> 
  88.                         <font face="verdana" size=2 color="<%=TblFGColor%>"> Hoarding Material </font> 
  89.                     </td>
  90.                     <td> 
  91.                         <input type=text name="hoardingmaterial" maxlength=50 value="<%=hoardingmaterial%>">
  92.                     </td>
  93.                 </tr>
  94.                 <tr bgcolor="<%=TblBGColor%>">
  95.                     <td> 
  96.                         <font face="verdana" size=2 color="<%=TblFGColor%>"> Hoarding Lighting Type </font> 
  97.                     </td>
  98.                     <td> 
  99.                         <input type=text name="HoardingLightingType" size=10 maxlength=15 value="<%=HoardingLightingType%>">
  100.                     </td>
  101.                 </tr>
  102.                 <tr bgcolor="<%=TblBGColor%>">
  103.                     <td> 
  104.                         <font face="verdana" size=2 color="<%=TblFGColor%>"> Hoarding Stand Type </font> 
  105.                     </td>
  106.                     <td> 
  107.                         <input type=text name="HoardingStandType" size=10 maxlength=15 value="<%=HoardingStandType%>">
  108.                     </td>
  109.                 </tr>
  110.                 <tr bgcolor="<%=TblBGColor%>">
  111.                     <td> 
  112.                         <font face="verdana" size=2 color="<%=TblFGColor%>"> Active Or Not? </font> 
  113.                     </td>
  114.                     <td>
  115.                         <font face=verdana size=2 color="<%=RadioColor%>">
  116.                         <input type=radio name="hoardingtypestatus" value="1" <%if hoardingtypestatus then%>checked<%end if%>> Yes
  117.                         <input type=radio name="hoardingtypestatus" value="0" <%if not hoardingtypestatus then%>checked<%end if%>> No
  118.                         </font>
  119.                     </td>
  120.                 </tr>
  121.                 </table>
  122.                 </td> </tr>
  123.                 </table>
  124.                 <br>
  125.                 <input type=hidden name="hoardingtypeid" value="<%=hoardingtypeid%>">
  126.                 <input type=button value="Update The Hoarding Type" onclick="javascript:check();">
  127.                 </form>
  128.             </td>
  129.             <td bgcolor="<%=RightColor%>">   </td>
  130.         </tr>
  131.         <tr>
  132.             <td colspan=2 bgcolor="<%=LeftColor%>">   </td>
  133.             <td colspan=2 bgcolor="<%=RightColor%>">   </td>
  134.         </tr>
  135.         </table>
  136.     </body>
  137. </html>
  138. <%
  139.         set rs = nothing
  140.     else
  141.         hoardingtypeid = Request.Form("hoardingtypeid")
  142.         hoardingtypename = replace(trim(Request.Form("hoardingtypename")), "'", "''")
  143.         HoardingStandType = trim(Request.Form("HoardingStandType"))
  144.         HoardingLightingType = trim(Request.Form("HoardingLightingType"))
  145.         hoardingtypestatus = Request.Form("hoardingtypestatus")
  146.         hoardingmaterial= Request.Form("hoardingmaterial")
  147.         sql = "update HoardingTypeMaster set HoardingTypeName='" + hoardingtypename + "', HoardingStandType='" + HoardingStandType + "', hoardingmaterial='" + hoardingmaterial + "', HoardingLightingType='" + HoardingLightingType + "', HoardingTypeStatus=" + hoardingtypestatus + " where HoardingTypeId=" + hoardingtypeid
  148.         Response.Write sql
  149.         con.execute sql
  150.         Response.Redirect "AdsAdminViewHoardingTypes.asp"
  151.     end if
  152. %>
  153. <!-- #include file="../AdsCloseConn.asp" -->