Re: [MS_AccessPros] Calendar tool

 

Hi Giorgio,

I am working an another project and won't be able to help with this anytime soon, sorry -- one reason I hesitated to post it! But please realize this is just a starting point. Things could be better!  Maybe someone else will jump in if you can't get it alone. Realize I spent many, many hours building this ...so investing a few hours to understand it is required. I would even need to put an hour in to refresh my mind!

The subform implementation uses a subset of the popup form, and has a few minor changes -- so the popup would be the version I suggest you change -- it works better too. Study how it was changed from a popup to a subform -- what is different?

have an awesome day,
crystal

On 6/26/18 10:14 AM, giorgio_rovelli wrote:

So I've uploaded a file GRTN for Crysta.mdb in the Assistance Needed folder.

The startup form compares Microsoft Active X calendar with yours.

I've made your subform unbound and here are 4 issues:

Make your calendar display the current date when you open the form that hosts it; it positions itself on the correct month and year but the wrong day is highlighted.

 

The button named Insert Date on the form, when clicked, creates 24 new records for the day you select on the calendar:

Private Sub Comando50_Click()

    On Error GoTo aa

    Dim rst As New ADODB.Recordset

    Dim cnn As ADODB.Connection

    Dim i As Integer, a As Integer

    Set cnn = CurrentProject.Connection

    rst.Open "Consuntivo", cnn, adOpenKeyset, adLockOptimistic

    For i = 0 To 23

        rst.AddNew

        rst!Giorno = CGior.Value

        rst!Ora = i

        rst.Update

    Next i

But I'm not sure what to use in place of CGior.Value where CGior identifies the ActiveX calendar.

 

The activeX calendar has an event Private Sub CGior_AfterUpdate() that positions the form's cursor on the record corresponding to the date selected on the calendar. How can you do that with your calendar? Maybe you can achieve that by adding code to the click event for each button on your calendar.

 

The day numbers in the outer columns of your calendar aren't bolded like the central ones.

__._,_.___

---

Posted by: crystal 8 <strive4peace2008@yahoo.com>

---

Reply via web post

•

Reply to sender

•

Reply to group

•

Start a New Topic

•

Messages in this topic (32)

---

Have you tried the highest rated email app?

With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.

---

Visit Your Group

• Privacy • Unsubscribe • Terms of Use

.

__,_._,___