質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.49%
COM

COM(Component Object Model)はMicrosoftによるコンポーネントテクノロジーであり、 ソフトウェアの再利用を目的とした技術を指します。

DLL

DLL(Dynamic Link Library)とは、他のモジュールからも使用する事が出来る、関数とデータが格納されているモジュールのことです。

PowerShell

Windows PowerShellはコマンドラインインターフェースであり、システム管理を含むWindowsタスク自動化のためのスクリプト言語です。

.NET Framework

.NET Framework は、Microsoft Windowsのオペレーティングシステムのために開発されたソフトウェア開発環境/実行環境です。多くのプログラミング言語をサポートしています。

Q&A

解決済

2回答

2824閲覧

CMDからPOWERSHELLが起動できない

yuujiMotoki

総合スコア90

COM

COM(Component Object Model)はMicrosoftによるコンポーネントテクノロジーであり、 ソフトウェアの再利用を目的とした技術を指します。

DLL

DLL(Dynamic Link Library)とは、他のモジュールからも使用する事が出来る、関数とデータが格納されているモジュールのことです。

PowerShell

Windows PowerShellはコマンドラインインターフェースであり、システム管理を含むWindowsタスク自動化のためのスクリプト言語です。

.NET Framework

.NET Framework は、Microsoft Windowsのオペレーティングシステムのために開発されたソフトウェア開発環境/実行環境です。多くのプログラミング言語をサポートしています。

0グッド

1クリップ

投稿2020/06/02 11:01

編集2020/06/02 23:32

#内容

COM.DLLをREGASM登録するBATを書いています。

BATでCOM → POWERSHELL へ誘導する処理をしようとしています。

理由としては
0. .NETのREGASMのPATHを取得する
$result = [Runtime.InteropServices.RuntimeEnvironment]::GetRuntimeDirectory()
0. 管理者権限でPOWERSHELLを実行したい
$run = Join-Path $result "Regasm.exe" $target = "./dll/ExcelVbaExt.dll -Verb runAs" $run $target  → CMDとおなじように記載

現在のコード

INST.BAT

1@echo off 2cd /d %~dp0 3openfiles > NUL 2>&1 4if not %ERRORLEVEL% EQU 0 goto sub 5 6@set FwDir="%windir%\Microsoft.NET\framework" 7echo "%FwDir%" 8for %%a in (%FwDir%) do ( 9for /f "delims=" %%i in ('dir /b /s "%FwDir%\Regasm.exe"') do ( 10call :RegisteredDll %%i)) 11pause 12 13:RegisteredDll 14echo ---- regasm process ---- 15%1 "./dll/ExcelVbaExt.dll" 16goto end 17:sub 18powershell start-process %~nx0 -verb runas 19:end

#問題点

なんとか最終的に動かせるところまで、たどり着きました。

しかしながら、ループ脱出でてこずっています。

おそらく完了処理がおかしいのか、最後にエラーがでます。

どうしたらいいでしょうか?

`""C:\WINDOWS\Microsoft.NET\framework""
---- regasm process ----
Microsoft(R) .NET Framework Assembly Registration Utility 2.0.50727.8922
Copyright (C) Microsoft Corporation 1998-2004. All rights reserved.

RegAsm : error RA0000 : 'C:\Users\mm05162\Desktop\IMPRGSC\VBA\dll\ExcelVbaExt.dll' は有効な .NET アセンブリではないため 、読み込めませんでした。
---- regasm process ----
Microsoft .NET Framework Assembly Registration Utility 4.8.3761.0
for Microsoft .NET Framework Version 4.8.3761.0
Copyright (C) Microsoft Corporation. All rights reserved.

型は正常に登録されました。
続行するには何かキーを押してください . . .
`
イメージ説明

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答2

0

自己解決

VBA

1@echo off 2cd /d %~dp0 3@set FwDir="%windir%\Microsoft.NET\framework" 4echo "%FwDir%" 5for %%a in (%FwDir%) do ( 6for /f "delims=" %%i in ('dir /b /s "%FwDir%\Regasm.exe"') do ( 7%%i "./CSharp/ExcelVbaExt/bin/Release/ExcelVbaExt.dll" /codebase /tlb 8pause 9))

投稿2020/06/12 02:13

yuujiMotoki

総合スコア90

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

0

ループ後に goto で最後のラベルに行くようにすると良いのではないでしょうか。
ラベル(サブルーチン部分先頭)に関係なく、PAUSEの下を実行してしまっているように見えます。

ループ外部ではcall の引数 %1 の情報が無いので dll を直接実行し、関連アプリを開こうとしていて
エラーになっていると思われます。

BAT

1@set FwDir="%windir%\Microsoft.NET\framework" 2echo "%FwDir%" 3for %%a in (%FwDir%) do ( 4for /f "delims=" %%i in ('dir /b /s "%FwDir%\Regasm.exe"') do ( 5call :RegisteredDll %%i)) 6pause 7goto end

投稿2020/06/04 00:04

t-takayama

総合スコア167

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

yuujiMotoki

2020/06/12 02:12

ご指摘の通りです。 処理の入れ子を無くし、エラーが無くなりました。 あと、根本的にREGASMの、オプション /codebase /tlb が足りないことも 修正し、無事解決いたしました。
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.49%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問