API tools faq
paste
Advertisement
Guest User

Sharenet

a guest
Oct 3rd, 2017
92
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ASP 4.97 KB | None | 0 0
raw download clone embed print report
  1. <html>
  2. <head>
  3. <meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">  
  4. </head>
  5. <link rel="stylesheet" href="Main.css">
  6. <body bgcolor="DarkGray" onload ="ShowPasswordetails('')">
  7. <table border="0" width="100" cellspacing="2" cellpadding="2">     
  8.        
  9.            
  10.         <tr onmouseover='m_over(this)' onmouseout='m_out(this)' onclick='m_passwordclick()' >
  11.         <td name='tdpassword' id='tdpassword'>Change Password</td>
  12.         </tr>
  13.         <tr onmouseover='m_over(this)' onmouseout='m_out(this)' onclick='m_homeclick()'>
  14.         <td name='tdhome' id='tdhome'>Home</td>    
  15.         </tr>
  16. </table>
  17. </body>
  18.     <script language="jscript">
  19.         function m_over(x)
  20.         {              
  21.             x.style.color ="red"           
  22.             window.event.srcElement.style.cursor = "hand"; 
  23.            
  24.         }
  25.         function m_out(x)
  26.         {  
  27.             x.style.color ="black"         
  28.             window.event.srcElement.style.cursor = "default";
  29.         }      
  30.     </script>
  31.     <script language="vbscript">
  32.         SUB m_Probationclick() 
  33.             ON ERROR RESUME NEXT       
  34.             tdjas.style.color = "darkblue"
  35.             tdadult.style.color = "black"                                                          
  36.             tdhome.style.color = "black"   
  37.             tdpassword.style.color = "black"
  38.             tdjasupdate.style.color = "black"                                          
  39.             tdadultupdate.style.color = "black"
  40.             parent.top.location.href = "../Jasasp/main.asp"
  41.         END SUB
  42.        
  43.         SUB m_CourtClick() 
  44.             ON ERROR RESUME NEXT
  45.             tdcourt.style.color = "darkblue"       
  46.             tdjas.style.color = "black"
  47.             tdadult.style.color = "black"                                                          
  48.             tdhome.style.color = "black"   
  49.             tdpassword.style.color = "black"
  50.             tdjasupdate.style.color = "black"                                          
  51.             tdadultupdate.style.color = "black"
  52.             parent.top.location.href = "../CourtAsp/main.asp"
  53.         END SUB
  54.        
  55.         SUB m_GroupAdminclick()
  56.             ON ERROR RESUME NEXT
  57.             tdcourt.style.color = "black"      
  58.             tdjas.style.color = "black"
  59.             tdadult.style.color = "black"                                                          
  60.             tdhome.style.color = "black"   
  61.             tdpassword.style.color = "black"
  62.             tdjasupdate.style.color = "black"                                          
  63.             tdadultupdate.style.color = "black"
  64.             tdgroupadmin.style.color = "darkblue"
  65.             parent.top.location.href = "../JASAsp/Address/AddressResults.asp"
  66.         END SUB
  67.        
  68.         SUB m_AdultProbationclick()    
  69.             ON ERROR RESUME NEXT                       
  70.             tdadult.style.color = "darkblue"   
  71.             tdjas.style.color = "black"            
  72.             tdhome.style.color = "black"   
  73.             tdpassword.style.color = "black"                                           
  74.             tdjasupdate.style.color = "black"  
  75.             tdadultupdate.style.color = "black"                                    
  76.             parent.top.location.href = "../AdultAsp/main.asp"
  77.         END SUB
  78.        
  79.         SUB m_AdultProbationUpdateclick()      
  80.             ON ERROR RESUME NEXT               
  81.             tdadultupdate.style.color = "darkblue"     
  82.             tdadult.style.color = "black"  
  83.             tdjas.style.color = "black"            
  84.             tdhome.style.color = "black"   
  85.             tdpassword.style.color = "black"                                           
  86.             tdjasupdate.style.color = "black"                                          
  87.             parent.top.location.href = "../AdultUpdate/main.asp"
  88.         END SUB
  89.        
  90.         SUB m_JASUpdateclick()     
  91.             ON ERROR RESUME NEXT                       
  92.             tdjasupdate.style.color = "darkblue"   
  93.             tdadult.style.color = "black"  
  94.             tdjas.style.color = "black"            
  95.             tdhome.style.color = "black"   
  96.             tdpassword.style.color = "black"                                       
  97.             tdadultupdate.style.color = "black"                                        
  98.             parent.top.location.href = "../JASUpdate/main.asp"
  99.         END SUB            
  100.         SUB m_passwordclick()  
  101.             ON ERROR RESUME NEXT
  102.             tdpassword.style.color = "darkblue"                                        
  103.             tdjas.style.color = "black"
  104.             tdadult.style.color = "black"                                                                                                              
  105.             tdhome.style.color = "black"
  106.             tdjasupdate.style.color = "black"                                      
  107.             tdadultupdate.style.color = "black"                                        
  108.             parent.RightMain.location.href = "../Administrator/Adminforall.asp"                
  109.         END SUB
  110.        
  111.         SUB m_Adminclick() 
  112.             ON ERROR RESUME NEXT
  113.             tdcourt.style.color = "black"      
  114.             tdjas.style.color = "black"
  115.             tdadult.style.color = "black"                                                          
  116.             tdhome.style.color = "black"   
  117.             tdpassword.style.color = "black"
  118.             tdjasupdate.style.color = "black"                                          
  119.             tdadultupdate.style.color = "black"
  120.             tdgroupadmin.style.color = "black"
  121.             tdgroupadmin.style.color = "darkblue"
  122.             parent.top.location.href = "../Administrator/main.asp"
  123.         END SUB
  124.        
  125.         SUB m_Devclick()   
  126.             ON ERROR RESUME NEXT
  127.             tdcourt.style.color = "black"      
  128.             tdjas.style.color = "black"
  129.             tdadult.style.color = "black"                                                          
  130.             tdhome.style.color = "black"   
  131.             tdpassword.style.color = "black"
  132.             tdjasupdate.style.color = "black"                                          
  133.             tdadultupdate.style.color = "black"
  134.             tdgroupadmin.style.color = "black"
  135.             tdgroupadmin.style.color = "black"
  136.             tddev.style.color = "darkblue"
  137.             parent.top.location.href = "../Dev/main.asp"
  138.         END SUB
  139.        
  140.         SUB m_homeclick()          
  141.             parent.location.href ="login.asp"
  142.         END SUB    
  143.        
  144.         SUB ShowPasswordetails(strdays)
  145.             ON ERROR RESUME NEXT
  146.             IF CINT(strdays) = 0 THEN
  147.                 Msgbox ("Your Password expires today")
  148.             ELSEIF CINT(strdays) =1 THEN
  149.                 Msgbox ("Password expires in one Day")
  150.             ELSEIF CINT(strdays) <6 THEN
  151.                 Msgbox ("Password expires in " & strdays & " Days")
  152.             END IF
  153.         END SUB    
  154.        
  155.     </script>  
  156. </html>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!