Wrox Programmer Forums
|
Classic ASP Basics For beginner programmers starting with "classic" ASP 3, pre-".NET." NOT for ASP.NET 1.0, 1.1, or 2.0
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Classic ASP Basics section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
 
Old March 22nd, 2005, 08:14 AM
Friend of Wrox
 
Join Date: Jan 2005
Posts: 1,525
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via ICQ to crmpicco Send a message via AIM to crmpicco Send a message via MSN to crmpicco Send a message via Yahoo to crmpicco
Default calender

Code:
<tr>
      <td align="right">
         <div class="font">Departing</div>
        </td>
        <td>  
         <div class="font">
     <Select style="height: 20; font-size : 10;" Name="depDay" onchange="javascript: sortMn('OUT')">
        <% 
        dy = (DatePart("d", date()) + 7)
              nxtMn = False
              if dy > 31 then
                   dy = (dy - 31)
                     nxtMn = True
              end if        
        for i=1 to 31 
        %>
        <% if i=dy then %>
        <option value="<%=i%>" SELECTED><%=i%></option>
        <% else %>
        <option value="<%=i%>"><%=i%></option>
        <% end if 
        next %>
     </Select>
     </div>
    </td>
    <td>  
         <div class="font">
     <Select style="width: 110; height: 20; font-size : 10;" Name="depMonth" onchange="javascript: sortMn('OUT')">
        <% 
        mnNow = Month(Now)
        yr = Year(Now)    
              nxtYr = left(yr, 2) & "0" & (right(yr, 2) + 1)                            
                if nxtMn then
                     mnNow = (mnNow + 1)
                end if                    
        for i=mnNow to (mnNow + 11)
                ic = i
                nextYr = False
        if i > 12 then
                     ic = (i - 12) 
                     nextYr = True
                end if
                mn = MonthName(ic)                  
        %>
        <% if i=mnNow then %>
        <option value="<%=yr & "#" & ic%>" SELECTED><%=mn & " " & yr%></option>
        <% else %>                         
        <option value="<% if nextYr then response.write nxtYr else response.write yr %>#<%=ic%>">
                <%=mn & " "%><% if nextYr then response.write nxtYr else response.write yr %></option>
        <% end if 
        next %>
     </Select>
     </div>
    </td>            
    <td>
         <Select style="height: 20; font-size : 10;" Name="deptm" STYLE="color: black; font: 8pt Verdana, Arial, Helvetica, sans-serif;">
        <%for i=0 to 23%>
        <%if i=0 then%>
        <option value="">Any Time</option>
        <%elseif i>0 and i<9 then%>
        <option value="0<%=i%>00">0<%=i%>:00</option>
        <%elseif i=9 then%>
        <option value="" Selected>Any Time</option>
        <option value="0<%=i%>00">0<%=i%>:00</option>
        <%elseif i >9 and i<=23 then%>
        <option value="<%=i%>00"><%=i%>:00</option>
        <%end if%>
        <%next%>
        <option value="">Any Time</option>
     </Select>
        </td>                                       
        <td>
<a href="#">
<img src="asp/images/hd_icon_calender.gif" align="middle" alt="Calendar" width="21" height="15" border="0"></a>
        </td>
        </tr>


i am looking for code that will give me a small pop-up calender that will change the day and dates when clicked.

any pointers?



www.crmpicco.co.uk
www.crmpicco.co.uk.tt
www.milklemonadechocolate.uk.tt
www.griswolds.uk.tt
__________________
_______________________
Ayrshire Minis - a Mini E-Community
http://www.ayrshireminis.com
http://www.crmpicco.co.uk
 
Old March 22nd, 2005, 06:46 PM
Friend of Wrox
 
Join Date: Jan 2004
Posts: 1,870
Thanks: 12
Thanked 20 Times in 20 Posts
Send a message via AIM to mat41
Default

There are a huge number of these out there, have you asked Google?

Wind is your friend
Matt
 
Old March 23rd, 2005, 01:21 PM
Friend of Wrox
 
Join Date: Jan 2005
Posts: 1,525
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via ICQ to crmpicco Send a message via AIM to crmpicco Send a message via MSN to crmpicco Send a message via Yahoo to crmpicco
Default

does anyone know where I can get a FREEWARE version of a pop-up calender?

www.crmpicco.co.uk





Similar Threads
Thread Thread Starter Forum Replies Last Post
disply calender sharadavani6 Servlets 2 November 5th, 2007 06:14 AM
Regarding Calender Button kotaiah Excel VBA 0 September 21st, 2006 07:21 AM
Calender control anita VB How-To 4 December 12th, 2004 03:10 PM
Calender gmoney060 Classic ASP Basics 4 August 23rd, 2004 12:10 AM
Calender Controls KennethMungwira Access 12 October 29th, 2003 04:46 PM





Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright (c) 2020 John Wiley & Sons, Inc.