påminnelser i VB.NET

[glucchip]

Hei!

Er det noen som har eller vet om et sted hvor det finnes en reminder med disse funksjonene:

en mainform med button1 og button 2.

Button1 er en knapp som du skal legge til en ny påminnelse med hvor du får opp form2

, som viser en textbox som skal være navn på påminnelsen, fri tekst, radiobuttons som velger hyppighet (Daglig, Ukentlg, Månedlig, eller årlig) og tidspunkt og startdato.

 

Når dato nåes, skal det komme opp en form som inneholder navnet på oppgaven og dn frie teksten. Og en bekreftelses knapp.

Hvis maskinen er avslått på dette tidpunktet skal den ploppe opp med engang den starter. DERSOM telleren er satt til ukentlig, må timeren starte igjen med en gang den forrige er utløst, IKKE først når den forrige påminnelsen bekreftes.

 

Button2 på mainform er en liste over alle oppgavene hittil, altså en "historie"

 

Noen som vet?

Endret 8. februar 2007 av glucchip

[ze5400]

Lag en?

 

*Ti tegn*

[glucchip]

Nei

 

Det var ikke det jeg spurte om. Jeg har begynt så vidt, fikk til reminder på tidspunkt ogsånn, men om noen har en ferdig, så hadde det vært bedre, dt var egentlig det jeg lurte på...

[GeirGrusom]

Jeg ville laget en listbox, og lagt ut en PropertyGrid, og laget en klasse som het f.eks. RemindMe

 

Public Enum Interval
 Single,
 Dayly,
 Weekly,
 Monthly,
 Annually
End Enum
Public Class RemindMe
 Protected m_name As String
 Protected m_int As Interval
 Protected DateTime m_trigger_time;
 Protected DateTime m_last_trigger;
 Public Event ReminderTriggered As EventArgs

 Public Property Name() As String '...
 Public Property LastTriggered() As DateTime '...
 Public Property Trigger() As DateTime '...

 Private Function DateIsLessOrEqual() As Boolean
   ' Sjekk om datoen er mindre
 End Function

 Public Function CheckTrigger() As Boolean
   Dim triggered As Boolean = False 
   Select Case m_int
     Case Single:
     ' Sjekk
     '...
   End Select
   If triggered Then RaiseEvent ReminderTriggered(Nothing)
   ' Jeg husker ikke hvordan RaiseEvent fungerer i VB.NET :P
 End Function

 Public Overrides Function ToString()
   Return m_name
 End Function
End Class

 

Legg disse direkte inn i listen (teksten som blir vist i listen er m_name)

og kjør CheckTrigger for å sjekke.

[Manfred]

...eller last ned et tredjepartsprogram. En hvilken som helst kalenderapp vil hjelpe deg med det der...

 

Hvorfor finne opp hjulet på nytt, liksom?