- 日時： 2015/02/05 14:44
- 名前： VBレスキュー(花ちゃん)
- ***********************************************************************************
* カテゴリー：[システム関係][日付・時刻][]
* キーワード： 管理者権限,権限昇格 ,UAC ,特権 ,マニフェスト ,
***********************************************************************************
タイトル ：Win7でシステム日付を設定できません
記 事 No ：14813
投 稿 日 ：2010/07/12(Mon) 18:40
元質問者 ：come
システム日付と時刻を設定するロジックがあり、XPでは問題なく動作しておりましたが、Win7ではエラーが出て動作しないようです。
エラー内容：70 書き込みできません。
以下のようなロジックです。
Private Sub Command1_Click()
Dim dDate As Date
Date = Format(dDate, "2015/02/05")
Time = Format(dDate, "14:18:40")
End Sub
vistaではUACの問題で特権を設定しないといけないと見つけたので、同様にwin7でも試しましたがエラーが出て動作しません。
以下、権限を与えるロジック ------------- 省略 --------------
-----------------------------------------------------------------------------------
記事No ：14815
投稿日 ：2010/07/12(Mon) 19:25
回答者 ：オショウ
-----------------------------------------------------------------------------------
マニフェストファイルの設定した方が、早いと言うか・・・
その場合は、権限取得関連APIは全て不要です。
管理者権限で実行する(マニフェスト)
http://www.geocities.jp/i_love_balard/myhome/dnet/manifest.html
以上。参考まで
> マニフェストファイルの設定した方が、早いと言うか・・・
Exeからの実行の場合は問題ないのですが、ソースから実行（開発＆テスト）時にはエラーが発生してしまいますので…。
>ソースから実行（開発＆テスト）時にはエラーが発生してしまいますので…。
その場合は、 VB6.EXE を管理者権限で実行すれば、エラーは発生しません。
|
EXE ファイルをマニフェストファイルを使って管理者権限で実行(VB6.0)