.NET Framework

Απ: SetSysTime

Vader — Thu, 20 Sep 2007 01:02:08 GMT

Καλά...Καλά..Ευχαριστώ Πάντως δουλεύει χωρίς πρόβλημα.

Απ: SetSysTime

Παναγιώτης Καναβός — Wed, 19 Sep 2007 17:01:18 GMT

Το πρόβλημα με τα επαναλαμβανόμενα CType είναι ότι ξοδεύεις συνέχεια χρόνο για να κάνεις parse το string, δημιουργείς 8-9 περιττά temporary strings με την Trim, δεν έχεις καμμία εξασφάλιση ότι θα πετύχει (ποιό είναι το format που καταλαβαίνει η CType?) και κάνεις και τον κώδικα άσχημο και δυσανάγνωστο. Καλύτερα να χρησιμοποιήσεις την DateTime.Parse ή την DateTime.TryParse για να μετατρέψεις το string μία φορά σε DateTime και να το χρησιμοποιήσεις μετά. Μπορείς επίσης να ορίσεις ακριβώς το format που περιμένεις να έχει το string που θα κάνεις parse.

Από εκεί και πέρα, η SetSystemTime εξ ορισμού περιμένει UTC, οπότε τί autodetection να έχει? Για να δώσεις local time ή θα μετατρέψεις την μεταβλητή DateTime με την DateTime.ToLocalTime ή θα χρησιμοποιήσεις την SetLocalTime η οποία περιμένει local time. Κοίτα πάντως και το documentation για τις μεταβλητές που περνάς. Θα δεις για παράδειγμα ότι το πεδίο DayOfWeek αγνοείται και από τις δύο συναρτήσεις, ενώ όλα τα πεδία του SYSTEMTIME είναι 16 bit unsigned. Όχι ότι αυτό δημιουργεί το πρόβλημα, αλλά στο παρασκήνιο η VB κάνει αυτή την μετατροπή χωρίς να το ξέρεις.

Τέλος, βεβαιώσου ότι το string που περνάς είναι σωστό. Μπορεί ένα λάθος στον κώδικα που δημιουργεί το string να προκαλεί το πρόβλημα.

Απ: SetSysTime

Vader — Wed, 19 Sep 2007 16:42:20 GMT

Την λύση την βρίκα τελικά..Αντί για την SetSystemTime έβαλα την SetLocalTime και τρέχει κανονικά...Μια χαρά όλα !!

Απ: SetSysTime

Vader — Wed, 19 Sep 2007 16:33:54 GMT

Δεν έχει κανένα πρόβλημα με το γεγονός ότι κάνω πολλά CTYPE...

Παναγιώτη έτσι ακριβώς συμβαίνει..Εχει απλά 2-3 ώρες διαφορά. Πως θα του ορίσω ότι η ώρα που έχω δεν έιναι UTC..? AutoDetect δεν έχει ..? Και αν δεν γίνεται πως αλλίως μπορώ να πειράξω την ώρα ..?

Απ: SetSysTime

Παναγιώτης Καναβός — Wed, 19 Sep 2007 05:36:13 GMT

Επίσης, θα πρέπει να έχεις υπόψη ότι η SetSystemTime χρησιμοποιεί UTC time, οπότε η ώρα που θα δεις στο ρολόι του υπολογιστή σου θα είναι αυτή που έδωσες +2/3 ώρες (ανάλογα με το αν έχουμε θερινή ώρα)

Απ: SetSysTime

Panagiotis Kefalidis — Wed, 19 Sep 2007 03:03:52 GMT

Κάνε ένα cast όλο το DateTimeToSet σε DateTime object type και πάρε τις τιμές απο εκεί μια-μια. Μην κάνεις cast κάθε φορά. Δεν ξέρω εάν παίζει ρόλο, γενικά σαν συμβουλή στο λέω.

SetSysTime

Vader — Wed, 19 Sep 2007 02:55:57 GMT

Δείτε το παρακάτω κομμάτι κώδικα και πείτε μου που κάνω λάθος..Εχω κολήσει πολύ και δεν το βρίσκω !!!

<DllImport("kernel32.dll", setLastError:=True)> Private Shared Function SetSystemTime(ByRef DateTimeToSet As SystemTime) As Boolean
                                                End Function
Private Shared Function SyncTime(ByVal DateTimeToSet As String) As Boolean
    Dim Temp As SystemTime

    If DateTimeToSet.Trim <> "" Then
      Temp.wYear = CType(DateTimeToSet.Trim, DateTime).Year
      Temp.wMonth = CType(DateTimeToSet.Trim, DateTime).Month
      Temp.wDayOfWeek = CType(DateTimeToSet.Trim, DateTime).DayOfWeek
      Temp.wDay = CType(DateTimeToSet.Trim, DateTime).Day
      Temp.wHour = CType(DateTimeToSet.Trim, DateTime).Hour
      Temp.wMinute = CType(DateTimeToSet.Trim, DateTime).Minute
      Temp.wSecond = CType(DateTimeToSet.Trim, DateTime).Second
      Temp.wMilliseconds = CType(DateTimeToSet.Trim, DateTime).Millisecond

      SyncTime = SetSystemTime(Temp)
    End If
End Function

Υπόθέστε ότι το DateTimeToSet έχει σωστή ώρα μέσα !!!

Εμ ..Μου κάνει set την ώρα αλλά μου βάζει τα δευτερόλεπτα για ώρα .....
Τι λάθος κάνω ..?