FC2ブログ

.Net CompackFrameWork で PDA(PocketPC) を再起動

.Net CF(CompackFrameWork) で PDA(PocketPC) を再起動

今やっている開発で、どうしても定期的なPDAの再起動が必要になりました。
フリーソフトも探したければ、インストールやら設定やらと、、、
インストーラにすべて組み込めないため、数十台に配布するのはムり、、、
とても運用に耐えられない(-_-;)

というわけで、.Net(VB)CFアプリに組み込みました。
サンプルが"C"ばっかりだったので、VB板を残しておきます。
誰かの参考になれば、、、(-。-)y-゜゜゜

ちなみに、"<",">"は半角にしてね。

・開発環境).WinXP(VirtualPC)
      .NetCF(VB)2008
      .PDA(WindowsMobile5.0)
      .SQLServerCE2008


#Region "■■■ DllImport宣言 ■■■"

  '--------------------------------------------------
  ' 再起動関連
  '--------------------------------------------------

  <DllImport("CoreDll.Dll")> _
  Private Shared Function KernelIoControl( _
    ByVal dwIoControlCode As Integer, _
    ByVal lpInBuf As IntPtr, _
    ByVal nInBufSize As Integer, _
    ByVal lpOutBuf As IntPtr, _
    ByVal nOutBufSize As Integer, _
    ByRef lpBytesReturned As Integer) As Integer
  End Function

  Private Shared Sub SetCleanRebootFlag()
  End Sub

#End Region

#Region "■■■ 関数(再起動関連) ■■■"
  ''' <summary>
  ''' PDA再起動
  ''' </summary>
  ''' <remarks></remarks>
  Public Shared Sub gsHardReset()

    Dim IOCTL_HAL_REBOOT As Integer = &H101003C
    Dim bytesReturned As Integer = 0

    '起動時にハードリセットを行うフラグを立てる
    Call SetCleanRebootFlag()

    '再起動
    Call KernelIoControl(IOCTL_HAL_REBOOT, _
            IntPtr.Zero, 0, _
            IntPtr.Zero, 0, bytesReturned)

  End Sub
#End Region



【宣伝・・・(*´ω`)】

タイトルロゴ3

 システム葵では、個人様向けでも企業様向けでも、パソコン修理から、パソコン設定、パソコンの使い方、LAN環境構築、ソフトウェア開発まで、様々な実績がありますので、困ったことがあれば、お気軽にご相談下さい。
関連記事

テーマ : プログラミング
ジャンル : コンピュータ

コメントの投稿

非公開コメント

検索フォーム
最新記事
カテゴリ
全記事表示リンク

全ての記事を表示する

最新コメント
プロフィール

ITLife

Author:ITLife
システム葵新井聡太です。
東京都東村山市に生まれ、ここで育ち、ここで結婚し、システムエンジニア一筋で十数年やってきました。
ここでは主に、パソコンを中心にITに関わることを備忘録として残していきたいと思います。
少しでも来ていただいた方のお役に立てたら幸いです。
m(_ _)m

p.s
ここで紹介している内容は一例です。すべては、自己責任でお願いします。

カレンダー
07 | 2019/08 | 09
- - - - 1 2 3
4 5 6 7 8 9 10
11 12 13 14 15 16 17
18 19 20 21 22 23 24
25 26 27 28 29 30 31
訪問数
月別アーカイブ
リンク