Help with calendar control. - ASP / Active Server Pages

I am trying to use the calander control to pick a date and retrieve information from a database. When a date is clicked on, the page re-loads, with the selected date, gets the informatino from the database and creates a graph. The problem that I am having is that when you pick the "<" or ">" to navigate to a new month the page reloads with the current month. How do I get around this?

Expand|Select|Wrap|Line Numbers

 
<%@ Page Language="VB" %>

<script language="VB" runat="server">
 
    Dim MyVal1 As Boolean

    Dim SelectedDate As Date

    Dim testt As String
 
    Sub Page_Load()
 
        Try

            MyVal1 = Convert.ToBoolean(Request("checkbox1"))

        Catch

            MyVal1 = True

        End Try  
 
    End Sub
 
    Function GetmyDate() As String
 
        If Calendar1.SelectedDate.Date.ToShortDateString = "1/1/0001" Then

            GetmyDate = Now.ToShortDateString

        Else

            GetmyDate = Calendar1.SelectedDate.Date.ToShortDateString

        End If
 
        Calendar1.VisibleDate = GetmyDate
 
    End Function
 
</script>

<html>

<head id="Head1" runat="server">

</head>

<body scroll="auto">

    <form id="form1" runat="server">

        <strong><span style="font-size: 24pt"> <br /></span></strong>

        <br />

        The Date is: <%= GetmyDate%>

        <br />

        <Img ID="Image1" src="Draw_Pic.ASPX?val1=<%= MyVal1%>&val2=<%= GetmyDate%>" width=768 height=375><br />

        <strong><span style="font-size: 12pt"> <br /></span></strong>

        <strong><span style="font-size: 12pt"> <br /></span></strong>

        <strong><span style="font-size: 12pt"><br /></span></strong>

        <br />

        <asp:CheckBox ID="CheckBox1" runat="server" Font-Size="12pt" style="z-index: 104; left: 121px; position: absolute; top: 539px" />&nbsp; &nbsp;<br />

            <br />         

            <asp:Calendar ID="Calendar1" runat="server" Font-Names="Arial" Font-Size="12pt" Height="200px" Width="200px" BackColor="WhiteSmoke" BorderColor="Black" BorderWidth="3px" DayNameFormat="FirstLetter" EnableViewState="False" style="z-index: 105; left: 12px; position: absolute; top: 570px" >

                <TodayDayStyle BorderWidth="3px" BackColor="MistyRose" BorderColor="Red" />

                <DayStyle BorderStyle="Ridge" BorderWidth="1px" BackColor="WhiteSmoke" />

                <DayHeaderStyle BackColor="DarkGray" BorderStyle="Ridge" BorderWidth="1px" BorderColor="Black" />

                <TitleStyle Font-Bold="True" BackColor="LightSteelBlue" />

                <WeekendDayStyle BackColor="#E0E0E0" />

                <OtherMonthDayStyle BackColor="Silver" BorderColor="DimGray" BorderStyle="Solid"

                    BorderWidth="1px" />

            </asp:Calendar>

        <br />

        <br />

            <asp:Button ID="Button1" runat="server" Text="Button" style="z-index: 110; left: 231px; position: absolute; top: 536px" />

        <br />

        &nbsp;<br />

    </form>
 
</body>

</html>

Feb 20 '07 #1

Subscribe Post Reply

1824

jhardman

3,406

Expert 2GB

I may be way off, you write in a bit of a different style than I, but it looks like you load the page and then ask which date is entered. In the getmydate function you need to refer to the date picked on the last screen, not the current one. I would have the link look something like this:

Expand|Select|Wrap|Line Numbers

 
<%

dim prevDate, nexDate

prevDate = dateAdd("m", -1, date)

nexDate = dateAdd("m", 1, date)

%>

<a href="thispage.asp?myDate=<%=urlEncode(prevDate)%>">&lt;</a>

<a href="thispage.asp?myDate=<%=urlEncode(nexDate)%>">&gt;</a>

and then the page that opens it should say:

Expand|Select|Wrap|Line Numbers

 
dim getMyDate

getMyDate = date

if request("myDate") <> ""  then getMyDate = request("myDate")

Feb 20 '07 #2

Similar topics

Help with MSCAL 7 calendar control

by: Tim Graichen | last post by:

Hello, I am making use of the Active X calendar control (mscal.Calendar.7) in several places in my main form, with the following code Below is an example of the code I'm using for the...

Microsoft Access / VBA

Need help with Datagrid Control in edit mode and Javascript

by: Gilles T. | last post by:

I have calendar control in Javascript including in the Head of mu page: <script charset="iso-8859-1" language="JavaScript" src="popcalendar.js"></script> I call this calendar popup with a image...

ASP.NET

retrieving the original value from a calendar control

by: bill yeager | last post by:

I would like to place the currently selected date (retrieved from the database) on a calendar control which is embedded inside a datagrid. However, I can't find the ID of the control to do so....

ASP.NET

Problem with a Calendar control

by: maxrawson | last post by:

First, let me start by saying my asp.net experience is still in it's infancy so please bare with me as I try to explain my situation. I have created a single page that with the use of many...

ASP.NET

Problem with a custom calendar control

by: Caesar Augustus | last post by:

First, let me start by saying my asp.net experience is still in it's infancy so please bare with me as I try to explain my situation. I have created a single page that with the use of many...

ASP.NET

Need Help in Custom Controls

by: Pavan | last post by:

Hi Group, I have created a custom calendar control with a layout of TextBox, Html Button & Calendar control. I have a property in the control, which sets or gets selected date of the calendar...

ASP.NET

Ajax doesn't work with calendar control

by: =?Utf-8?B?UGFycm90?= | last post by:

I applied the following Ajax code in my web page which has a calendar control to keep my page from completely reloading everytime something was changed. <atlas:ScriptManager ID="ScriptManager1"...

ASP.NET

Calendar Control ID unexpected result

by: John Kotuby | last post by:

Hi all, I am trying to use a calendar server control which I have ID="Calendar1" in the source code. What I am trying to do is emulate a JavaScript calendar that was being used in an older ASP...

ASP.NET

Pop up calendar error.

by: thorpk | last post by:

I have an access database that i have added a pop up calendar to, the Table information for the Date Reported field is Date/Time format short date, input mask is 00/00/0000. i have created a...

Microsoft Access / VBA

Serious help needed - Calendar!

by: William (Tamarside) | last post by:

Please, if you have the time and knowledge to help me I'd truly appreciate it! I need to build a calendar page that displays available/unavailable info from a DB and colour a cell according to...

ASP / Active Server Pages

Migrating Website to Cloud - Emmanuel Katto

by: emmanuelkatto | last post by:

Hi All, I am Emmanuel katto from Uganda. I want to ask what challenges you've faced while migrating a website to cloud. Please let me know. Thanks! Emmanuel

General

Looking to do Android software development, any suggestions? Is flutter better?

by: nemocccc | last post by:

hello, everyone, I want to develop a software for my android phone for daily needs, any suggestions?

General

Is that possible of reading the .csv file in column wise and the column have different lengths ?

by: Sonnysonu | last post by:

This is the data of csv file 1 2 3 1 2 3 1 2 3 1 2 3 2 3 2 3 3 the lengths should be different i have to store the data by column-wise with in the specific length. suppose the i have to...

C / C++

How to build RAID in BIOS?

by: Hystou | last post by:

There are some requirements for setting up RAID: 1. The motherboard and BIOS support RAID configuration. 2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...

Computer Hardware

What is ONU?

by: marktang | last post by:

ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...

General

Changing the language in Windows 10

by: Hystou | last post by:

Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...

Windows Server

Maximizing Business Potential: The Nexus of Website Design and Digital Marketing

by: jinu1996 | last post by:

In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...

Online Marketing

The easy way to turn off automatic updates for Windows 10/11

by: Hystou | last post by:

Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...

Windows Server

Access Europe - Using VBA to create a class based on a table - Wed 1 May

by: isladogs | last post by:

The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new...

Microsoft Access / VBA