none
Como mudar a data do Sistema? RRS feed

  • Pergunta

  • Olá pessoa tudo em paz?

    Preciso disponibilizar no meu sistema uma forma do usuário mudar a data do sistema.

    Para isso na inicialização terei que pegar a data atual do equipamento e comparar com uma data padrão que o equipamento configura quando é dado um reset.

    Se tiver esta data devo apresentar em uma tela a opção do usuário digitar a data atual.

    depois terei que pegar a data digitada e atualizar a data do equipamento.

    Alguém já fez isso?

    Desde já obrigado!

    Wescley
    terça-feira, 11 de março de 2008 21:21

Todas as Respostas

  • E ai pessoal, bom dia!


    Só para avisar que consegui fazer o que precisava da seguinte forma

    Criei esta classe



    Imports System.Runtime.InteropServices

    Code Snippet

    Code Snippet

    Public Class TrocaDataHora
        <StructLayoutAttribute(LayoutKind.Sequential)> _
       Public Structure SystemTime
            Public Year As System.UInt16
            Public Month As System.UInt16
            Public DayOfWeek As System.UInt16
            Public Day As System.UInt16
            Public Hour As System.UInt16
            Public Minute As System.UInt16
            Public Second As System.UInt16
            Public MilliSecond As System.UInt16
        End Structure

        <DllImport("CoreDll.DLL", SetLastError:=True)> _
        Public Shared Function SetLocalTime(ByRef st As SystemTime) As Boolean
        End Function
    End Class


    E depois no programa principal fiz assim:

    Code Snippet

    Try

                Dim st As TrocaDataHora.SystemTime

                st.Year = Convert.ToUInt16("1978")
                st.Month = Convert.ToUInt16("12")
                st.Day = Convert.ToUInt16("20")
              
                TrocaDataHora.SetLocalTime(st)
                Me.Label1.Text = ""
                Me.Label1.Text = DateString()
            Catch ex As Exception
                MsgBox("Erro " & ex.Message.ToString)
    End Try



    Fica ai a dica para quem precisar...
    abs


    Wescley Arruda
    WAC Tecnologia
    quinta-feira, 13 de março de 2008 14:54