DoboWiki
Top
> .NETプログラミング研究/61 をテンプレートにして作成
.NETプログラミング研究/61 をテンプレートにして作成
開始行:
#title(.NETプログラミング研究 第61号)
#navi(.NETプログラミング研究)
#contents
*.NETプログラミング研究 第61号 [#md001445]
**.NET Tips [#x966fd09]
今回はVS.NETのデプロイメントプロジェクトに関する過去の記...
***Orcaの入手法 [#ib42e84a]
#column(注意){{
この記事の最新版は「[[Orcaの入手法>https://dobon.net/vb/d...
}}
いまさらですが、今まで嫌というほど登場したOrcaを入手する...
残念ながらOrcaは単体では配布されていません。OrcaはPlatfor...
-[[Platform SDK Update>http://www.microsoft.com/msdownloa...
-[[Windows Server 2003 SP1 Platform SDK Web Install>http:...
-[[Windows Server 2003 SP1 Platform SDK Full Download>htt...
-[[Windows Server 2003 SP1 Platform SDK ISO Install>http:...
インストール後、「Orca.msi」というファイルを探し、これを...
しかしPlatform SDKには非常に多くのファイルが含まれていま...
幸いにも、Windows Installer SDKの古いバージョンはサイズが...
-[[Windows Installer SDK (x86)>http://www.microsoft.com/d...
-[[Windows Installer 1.0 SDK (x86)>http://www.microsoft.c...
-[[Windows Installer 1.0 SDK (Alpha)>http://www.microsoft...
***「デスクトップにショートカットを作成するかユーザーが選...
.NETプログラミング研究第58号で「デスクトップにショートカ...
この記事では、カスタムアクションを使ってシュートカットを...
はじめに、ユーザーインターフェイスエディタで「チェックボ...
次に、インストールで使用するカスタムアクションを次のよう...
#code(vbscript){{
dim arg, args, desktop, WshShell, WshShortcut
'CustomActionDataを分解
arg = Session.Property("CustomActionData")
args = Split(arg, ":::")
if args(2)="1" then
set WshShell = CreateObject("WScript.Shell")
'デスクトップのパスを取得
if args(3)="1" then
desktop = WshShell.SpecialFolders("AllUsersDeskto...
else
desktop = WshShell.SpecialFolders("Desktop")
end if
'ショートカットを作成
On Error Resume Next
set WshShortcut = _
WshShell.CreateShortcut(desktop & "\" & args(1) &...
WshShortcut.TargetPath = args(0)
WshShortcut.Save
end if
}}
これを「カスタム動作」の「インストール」に追加し、CustomA...
[TARGETDIR]app.exe:::アプリケーション:::[CHECKBOXA1]:::[A...
のようにします。ここで「app.exe」はショートカットのリンク...
次にショートカットを削除するためのカスタムアクションを作...
#code(vbscript){{
dim arg, args, desktop, path, WshShell, fso
'CustomActionDataを分解
arg = Session.Property("CustomActionData")
args = Split(arg, ":::")
'デスクトップのパスを取得
set WshShell = CreateObject("WScript.Shell")
if args(1)="1" then
desktop = WshShell.SpecialFolders("AllUsersDesktop")
else
desktop = WshShell.SpecialFolders("Desktop")
end if
'削除するファイルのパス
path = desktop & "\" & args(0) & ".lnk"
'ショートカットを削除
set fso = CreateObject("Scripting.FileSystemObject")
if (fso.FileExists(path)) then
On Error Resume Next
fso.DeleteFile(path)
end if
}}
これを「カスタム動作」の「アンインストール」と「ロールバ...
アプリケーション:::[ALLUSERS]
のようにします。「アプリケーション」は「インストール」で...
これで「すべてのユーザー」か「このユーザーのみ」かで適切...
***RemovePreviousVersionsプロパティを使ってMajor Upgrade...
前回アップデートの方法について説明しましたが、幾つか注意...
***VS.NET 2002での注意 [#k3bb4600]
VS.NET 2002では、はじめのインストールで「すべてのユーザー...
-[[RE: RemovePreviousVersions does not work>http://groups...
***「すべてのユーザー」がデフォルトになるようにする [#qa6...
#column(注意){{
この記事の最新版は「[[「すべてのユーザー」がデフォルトに...
}}
前回説明したとおり、前のバージョンのインストールが「この...
まずデフォルトの設定を変更するために、Windows Installerの...
-[[ALLUSERS Property>http://msdn.microsoft.com/library/en...
注:ALLUSERSを1とした場合は「すべてのユーザー」インストー...
また、ダイアログのチェックボックスがデフォルトで「すべて...
以上を変更して保存すればOKです。
補足:VS.NETで作成されるMSIファイルでは、チェックボックス...
***「すべてのユーザー/このユーザーのみ」チェックボックス...
#column(注意){{
この記事の最新版は「[[「すべてのユーザー/このユーザーのみ...
}}
デフォルトを変更したところで、ユーザーが変更できるのであ...
注:またはサイレントインストールとし、ユーザーが設定を変...
このチェックボックス(およびその上に表示されるテキスト)はN...
|Dialog_|Control_|Action|Condition|h
|FolderForm|AllUsersRadioGroup|Show|VersionNT>=400 AND Pr...
|FolderForm|AllUsersText|Show|VersionNT>=400 AND Privileg...
のAction列を「Show」から「Hide」に変更することにより、常...
もう一つの方法は、Controlテーブルでコントロールを直接制御...
|Dialog_|Control|Type|X|Y|Width|h
|FolderForm|AllUsersRadioGroup|RadioButtonGroup|24|210|342|
|FolderForm|AllUsersText|Text|18|186|348|
のWidth列を「0」とすることにより、表示されなくなります。
もっと全うな方法で行うならば(つまりControlConditionテー...
-[[How to use the Orca database editor to remove the "Eve...
補足:VS.NET 2005からは、以上の設定はデプロイメントプロジ...
***設定ファイルの上書きを防ぐ [#xa86ce57]
#column(注意){{
この記事の最新版は「[[設定ファイルの上書きを防ぐ >https:/...
}}
設定ファイルなどのファイルをMSIファイルで配置した場合、通...
これを防ぐためには、設定ファイルのPermanentプロパティをTr...
補足:設定ファイルをアンインストールで削除させずに残す場...
このような問題を解消する別の方法が次のリンク先で紹介され...
-[[Uninstall a Previous Application Installation When Upg...
ここで紹介されている方法は、RemovePreviousVersionsプロパ...
具体的には、OrcaでMSIファイルを開き、InstallExecuteSequen...
**コメント [#t6bd7a31]
#comment
//これより下は編集しないでください
#pageinfo([[:Category/.NET]],2005-10-20 (木) 18:00:00,DOB...
終了行:
#title(.NETプログラミング研究 第61号)
#navi(.NETプログラミング研究)
#contents
*.NETプログラミング研究 第61号 [#md001445]
**.NET Tips [#x966fd09]
今回はVS.NETのデプロイメントプロジェクトに関する過去の記...
***Orcaの入手法 [#ib42e84a]
#column(注意){{
この記事の最新版は「[[Orcaの入手法>https://dobon.net/vb/d...
}}
いまさらですが、今まで嫌というほど登場したOrcaを入手する...
残念ながらOrcaは単体では配布されていません。OrcaはPlatfor...
-[[Platform SDK Update>http://www.microsoft.com/msdownloa...
-[[Windows Server 2003 SP1 Platform SDK Web Install>http:...
-[[Windows Server 2003 SP1 Platform SDK Full Download>htt...
-[[Windows Server 2003 SP1 Platform SDK ISO Install>http:...
インストール後、「Orca.msi」というファイルを探し、これを...
しかしPlatform SDKには非常に多くのファイルが含まれていま...
幸いにも、Windows Installer SDKの古いバージョンはサイズが...
-[[Windows Installer SDK (x86)>http://www.microsoft.com/d...
-[[Windows Installer 1.0 SDK (x86)>http://www.microsoft.c...
-[[Windows Installer 1.0 SDK (Alpha)>http://www.microsoft...
***「デスクトップにショートカットを作成するかユーザーが選...
.NETプログラミング研究第58号で「デスクトップにショートカ...
この記事では、カスタムアクションを使ってシュートカットを...
はじめに、ユーザーインターフェイスエディタで「チェックボ...
次に、インストールで使用するカスタムアクションを次のよう...
#code(vbscript){{
dim arg, args, desktop, WshShell, WshShortcut
'CustomActionDataを分解
arg = Session.Property("CustomActionData")
args = Split(arg, ":::")
if args(2)="1" then
set WshShell = CreateObject("WScript.Shell")
'デスクトップのパスを取得
if args(3)="1" then
desktop = WshShell.SpecialFolders("AllUsersDeskto...
else
desktop = WshShell.SpecialFolders("Desktop")
end if
'ショートカットを作成
On Error Resume Next
set WshShortcut = _
WshShell.CreateShortcut(desktop & "\" & args(1) &...
WshShortcut.TargetPath = args(0)
WshShortcut.Save
end if
}}
これを「カスタム動作」の「インストール」に追加し、CustomA...
[TARGETDIR]app.exe:::アプリケーション:::[CHECKBOXA1]:::[A...
のようにします。ここで「app.exe」はショートカットのリンク...
次にショートカットを削除するためのカスタムアクションを作...
#code(vbscript){{
dim arg, args, desktop, path, WshShell, fso
'CustomActionDataを分解
arg = Session.Property("CustomActionData")
args = Split(arg, ":::")
'デスクトップのパスを取得
set WshShell = CreateObject("WScript.Shell")
if args(1)="1" then
desktop = WshShell.SpecialFolders("AllUsersDesktop")
else
desktop = WshShell.SpecialFolders("Desktop")
end if
'削除するファイルのパス
path = desktop & "\" & args(0) & ".lnk"
'ショートカットを削除
set fso = CreateObject("Scripting.FileSystemObject")
if (fso.FileExists(path)) then
On Error Resume Next
fso.DeleteFile(path)
end if
}}
これを「カスタム動作」の「アンインストール」と「ロールバ...
アプリケーション:::[ALLUSERS]
のようにします。「アプリケーション」は「インストール」で...
これで「すべてのユーザー」か「このユーザーのみ」かで適切...
***RemovePreviousVersionsプロパティを使ってMajor Upgrade...
前回アップデートの方法について説明しましたが、幾つか注意...
***VS.NET 2002での注意 [#k3bb4600]
VS.NET 2002では、はじめのインストールで「すべてのユーザー...
-[[RE: RemovePreviousVersions does not work>http://groups...
***「すべてのユーザー」がデフォルトになるようにする [#qa6...
#column(注意){{
この記事の最新版は「[[「すべてのユーザー」がデフォルトに...
}}
前回説明したとおり、前のバージョンのインストールが「この...
まずデフォルトの設定を変更するために、Windows Installerの...
-[[ALLUSERS Property>http://msdn.microsoft.com/library/en...
注:ALLUSERSを1とした場合は「すべてのユーザー」インストー...
また、ダイアログのチェックボックスがデフォルトで「すべて...
以上を変更して保存すればOKです。
補足:VS.NETで作成されるMSIファイルでは、チェックボックス...
***「すべてのユーザー/このユーザーのみ」チェックボックス...
#column(注意){{
この記事の最新版は「[[「すべてのユーザー/このユーザーのみ...
}}
デフォルトを変更したところで、ユーザーが変更できるのであ...
注:またはサイレントインストールとし、ユーザーが設定を変...
このチェックボックス(およびその上に表示されるテキスト)はN...
|Dialog_|Control_|Action|Condition|h
|FolderForm|AllUsersRadioGroup|Show|VersionNT>=400 AND Pr...
|FolderForm|AllUsersText|Show|VersionNT>=400 AND Privileg...
のAction列を「Show」から「Hide」に変更することにより、常...
もう一つの方法は、Controlテーブルでコントロールを直接制御...
|Dialog_|Control|Type|X|Y|Width|h
|FolderForm|AllUsersRadioGroup|RadioButtonGroup|24|210|342|
|FolderForm|AllUsersText|Text|18|186|348|
のWidth列を「0」とすることにより、表示されなくなります。
もっと全うな方法で行うならば(つまりControlConditionテー...
-[[How to use the Orca database editor to remove the "Eve...
補足:VS.NET 2005からは、以上の設定はデプロイメントプロジ...
***設定ファイルの上書きを防ぐ [#xa86ce57]
#column(注意){{
この記事の最新版は「[[設定ファイルの上書きを防ぐ >https:/...
}}
設定ファイルなどのファイルをMSIファイルで配置した場合、通...
これを防ぐためには、設定ファイルのPermanentプロパティをTr...
補足:設定ファイルをアンインストールで削除させずに残す場...
このような問題を解消する別の方法が次のリンク先で紹介され...
-[[Uninstall a Previous Application Installation When Upg...
ここで紹介されている方法は、RemovePreviousVersionsプロパ...
具体的には、OrcaでMSIファイルを開き、InstallExecuteSequen...
**コメント [#t6bd7a31]
#comment
//これより下は編集しないでください
#pageinfo([[:Category/.NET]],2005-10-20 (木) 18:00:00,DOB...
ページ名:
▲
▼
[
トップ
] [
新規
|
子ページ作成
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
]