Led (e Date...)

[luisa227]

Domanda forse stupida:
Esiste 1 sistema automatico x spegnere il LED del monitor senza premere il pulsantino col dito (visto che me lo dimentico sempre acceso?)?


Data:
Ora non ho il codice sottomano cmq ho un grosso problema sulle date:
devo confrontare la data attuale con quella immessa in un db ma il programma non me le confronta xchè mi calcola i giorni come mesi e viceversa (es.: 02/01 me lo calcola come il 1 febbraio invece dovrebbe essere 2 gennaio; invece 13/01 melo calcola esatto…)):
non sono riuscita a risolvere pur usando il format ed impostando la registrazione del format nel db in modo esatto. Lo so che senza codice è un casino capirlo…boh forse a qualcuno ècapitata la stessa cosa… help

[tas]

1. no
2. che database usi? come fai a fare il confronto?

[yyzyyz]

1)

Private Declare Function SendMessage Lib "user32" _
    Alias "SendMessageA" (ByVal hWnd As Long, _
    ByVal wMsg As Long, ByVal wParam As Long, lParam _
    As Any) As Long
Private Const WM_SYSCOMMAND = &H112
Private Const SC_MONITORPOWER = &HF170
Private Sub Command1_Click()

'Monitor spento ...spero
SendMessage Me.hWnd, WM_SYSCOMMAND, SC_MONITORPOWER, ByVal 1&

questo codice va testato bene, a seconda del pc devi cambiare i byVal, da me su 1 il monitor va in standby, cambiando il numero dovresti avere la possibilità anke di accenderlo (da testare).

2) X quando riguarda il problema delle date dovrebbe essere solo un problema di formato, il dbengine lavora sul formato americanoz , prima di mandare la query dovresti formattare le date in maniera adeguata .

[luisa227]

il db è access, lo creo da vb (non mi ricordo il nome...è un tool che ce in vb)

Non ricordo bene il codice cmq mi pare che il confronto ...non vorrei dire cacchiate... lo faccio cosi:

a= format(Date(), "dd mm yyy"))
if a= !rs.data then...

cmq facciamo cosi...la prossima volta vi scrivo il codice preciso cosi saprete aiutarmi


X il Led...proverò grazie...ma me lo spegne spegne o me lo lascia solo in standby?

Cmq..Private Const WM_SYSCOMMAND = &H112
Private Const SC_MONITORPOWER = &HF170

Mi puoi spiegare dove prendi le costanti x fare le operazioni con le API?

Tutte le api hanno delle costanti, dove le piglio???
spero che mi sono spiegata...