常連

### 前提・実現したいこと

Ruby on Railsを用いて保育園との連絡帳のようなシステムを作っています。
新規に連絡帳機能を作成する実装中に以下のエラーメッセージが発生しました。

### 発生している問題・エラーメッセージ
フォームで各項目を入力し、連絡帳を作成しようとすると下記のエラーメッセージが表示されます。

```ruby
ActiveSupport::MessageVerifier::InvalidSignature

【該当箇所】
def create
    @contact = Contact.create(contact_params)　　#この部分がハイライトされています
    if @contact.save
      redirect_to root_path
    else
```
# Gyazo画像
- https://gyazo.com/a3958aa66f9dc4ead3377e4dbdbcbd1d


### 該当のソースコード

```ruby
【controllers/contacts_controller.rb】　※必要と思われる箇所のみを抜粋しています

 def new
    @contact = Contact.new
  end

 def create
    @contact = Contact.create(contact_params)
    if @contact.save
      redirect_to root_path
    else
      render new_contact_path
    end
  end


private
def contact_params
  params.require(:contact).permit(:image, :group_id, :last_name_c_j, :first_name_c_j, :last_name_c_k, :first_name_c_k ).merge(parent_user_id: current_parent_user.id)
end
```
```ruby
【models/contact.rb】　※必要と思われる箇所のみを抜粋しています

belongs_to :parent_user
has_one_attached :image
```
```ruby
【views/contacts/new.html.erb】

<div class="form__wrapper">

  <%= form_with(model: @contact, local: true) do |f| %>
    <%= render 'error_messages', model: f.object %>
    <%= render 'form', model: f.object , locals: { contact: @contact } %>
  <% end %>

</div>

```
```ruby
【views/contacts/_error_messages.html.erb】

<% if model.errors.any? %>
 <div class="error-alert">
  <ul>
    <% model.errors.full_messages.each do |message| %>
    <li class='error-message'><%= message %></li>
    <% end %>
  </ul>
 </div>
<% end %>

```
```ruby
【views/contacts/_form.html.erb】

<div class="form__wrapper">
  <h2 class="page-heading">新規連絡帳の作成ページ</h2>

  <%= form_with(model: @contact, local: true) do |f| %>
  
  <%= render 'error_messages', model: f.object %>

  <div class="field">
    <%= f.label :group_id, "お子さんの組" %><br />
   <%= f.collection_select(:group_id, Group.all, :id, :name, {}, {class:"select-box", id:"class"}) %>
  </div>

  <div class="field">
    <%= f.label :last_name_c_j, "お子さんの名前（名字）" %><br />
    <%= f.text_field :last_name_c_j %>
  </div>

  <div class="field">
    <%= f.label :first_name_c_j, "お子さんの名前（名前）" %><br />
    <%= f.text_field :first_name_c_j, class: :form__text %>
  </div>

  <div class="field">
    <%= f.label :last_name_c_k, "お子さんの名字（カナ）" %><br />
    <%= f.text_field :last_name_c_k %>
  </div>

  <div class="field">
    <%= f.label :first_name_c_k, "お子さんの名前（カナ）" %><br />
    <%= f.text_field :first_name_c_k, class: :form__text %>
  </div>
 
  <div class="field">
    <%= f.label :image, "お子さんの写真" %><br />
    <%= f.file_field :image %>
  </div>


  <div class="actions">
    <%= f.submit "連絡帳を作成する", class: :form__btn  %>
  </div>
<% end %>




</div>

```


### 試したこと
# pry-rails導入しparamsを確認しました
```ruby
    43: def create
 => 44:   binding.pry
    45:   @contact = Contact.create(contact_params)
    46:   if @contact.save
    47:     redirect_to root_path
    48:   else
    49:     render new_contact_path
    50:   end
    51: end

[1] pry(#<ContactsController>)> params
=> <ActionController::Parameters {"authenticity_token"=>"XXXXXXXXXXXXXXXXXXXXXXXXX==", "contact"=>{"group_id"=>"2", "last_name_c_j"=>"子供名字いち", "first_name_c_j"=>"子供名前いち", "last_name_c_k"=>"コドモミョウジイチ", "first_name_c_k"=>"コドモナマエイチ", "image"=>"child_1.jpg"}, "commit"=>"保存する", "controller"=>"contacts", "action"=>"create"} permitted: false>
[2] pry(#<ContactsController>)> contact_params
=> <ActionController::Parameters {"image"=>"child_1.jpg", "group_id"=>"2", "last_name_c_j"=>"子供名字いち", "first_name_c_j"=>"子供名前いち", "last_name_c_k"=>"コドモミョウジイチ", "first_name_c_k"=>"コドモナマエイチ", "parent_user_id"=>1} permitted: true>
[3] pry(#<ContactsController>)> @contact
=> nil
```
# 記述ミスがないかの確認をしました
ストロングパラメータなどのカラム名に記載ミスがないかなどの確認を行いました。

# 考察
エラーメッセージからActiveStorageが原因か推測し、様々な検索を行ったのですが解決方法を見つけることができませんでした。

### 補足情報（FW/ツールのバージョンなど）
- rails (6.0.0)
- active storage (6.0.3.5)
学習を始めたばかりの初学者のため、質問に不備などありましたら申し訳ございません。
また、必要な項目が抜けているなどありましたら、お手数ですが、ご指摘いただけると助かります。

「ActiveSupport::MessageVerifier::InvalidSignature」 エラーを解決したいです

ローカル配置したhtmlをEdgeで開き、そこからローカル配置されたhta及びhtmlファイルを呼び出したいです。
IEからローカルファイルを開く場合はActiveXを使い呼び出せていましたが、ブラウザをEdgeにすると使用できません。
何か方法があればご教示いただきたいです。

【参考】
以下はActiveXでローカルファイルを呼び出していたソースです
var wsh = new ActiveXObject("Wscript.Shell");
wsh.Run(ローカルファイルのフルパス);

html(Edge)からローカルのhta及びhtmlファイルが開けない

### 実現したいこと

VBAを使用し、DBからデータを取得して、エクセルに貼り付けたいです。
RecordSetからエクセルに貼り付ける処理に時間がかかりすぎて困っています。

どのようにしたら高速化できますか。

### 前提

DB : SQLserver
データ数：15列3000行程度
今の処理時間：90秒
目標の処理時間：10秒

SQL文の処理時間は問題ないです。
再計算や描画はオフにしてます。

### 試したこと
```VBA
Dim SQL As String
Dim rst As Recordset

Set rst = DB.getRecordSet(SQL)
Call Range("A1").CopyFromRecordset(rst)

Public Function getRecordSet( _
                    OpenSQL As String, _
                    Optional CursorType As ADODB.CursorTypeEnum = ADODB.CursorTypeEnum.adOpenKeyset, _
                    Optional LockType As ADODB.LockTypeEnum = ADODB.LockTypeEnum.adLockReadOnly _
                ) As ADODB.Recordset
        Set getRecordSet = New ADODB.Recordset
        getRecordSet.Open OpenSQL, conn, CursorType, LockType
End Function
```


Recordsetをエクセルに貼り付ける処理を高速化したい(VBA)

いつもお世話になっております。
今回は少々珍しいエラーで困っているので、質問させていただきました。

### 現状の様子
現在、ExcelVBAでExcelシートからPowerpoint出力するというサンプルマクロを作っています。
VBAを使って既存のPowerpointファイルをPDFにするというイメージです。

それでこういうコードを作りました。
```ここに言語を入力

Public Sub ExportAsFixedFormat_Example()

    Dim prng As PrintRange
    ActivePresentation.PrintOptions.Ranges.ClearAll
    Set prng = ActivePresentation.PrintOptions.Ranges.Add(1, 3)
    '1～3ページを指定（スライド数が指定よりも少ない場合はエラー）
    ActivePresentation.ExportAsFixedFormat "C:\作業中\PPTtoPDF\test1.pptx", _
    ppFixedFormatTypePDF, , , , , , prng, ppPrintSlideRange, , , , , , False
    
End Sub
```

### エラー発生の様子
しかし、以下のコードの部分でエラーが発生します。
```ここに言語を入力
ActivePresentation.PrintOptions.Ranges.ClearAll
```
エラーメッセージは具体的にはこのような内容です。
![イメージ説明](22732c0b6ff5fd27b797bf7c1deca108.png)


### 分からない点

それで色々と調べたのですが、これは

[https://docs.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/activex-component-can-t-create-object-or-return-reference-to-this-object-error-4?redirectedfrom=MSDN](https://docs.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/activex-component-can-t-create-object-or-return-reference-to-this-object-error-4?redirectedfrom=MSDN)
このURLによると、

> オブジェクトを作成するときは、オブジェクトのクラスがシステム レジストリに登録されていて、関連するすべてのダイナミックリンク ライブラリ (DLL) が使用できるようになっている必要があります。

とのことなので、何かのDLLが足りない、ということなのかなと思ったのですが・・
具体的にどんなDLLが足りないのか分かりません。

ただ、気になっているのは、以前ハードディスクドライブの中身の整理を色々としておりその時に不要なファイルなどは捨てたのですが、その時に何か必要なものも間違って捨てたのかな・・？と気になっています。


どなたかお分かりの方、こういうエラーの場合はどうすればいいのか教えていただけますでしょうか？
よろしくお願いいたします。

ExcelVBAでExcelシートからPowerpoint出力する時にActiveXコンポーネントはオブジェクトを作成できませんというエラーが出る

いつもお世話になっております。
javascriptでエクスプローラを起動し、別サーバ上の共有ディレクトリを開きたいです。
下記コードで以前はできていたのですが、現在はセキュリティの向上か？で同じディレクトリが開けません。
現在可能な実装方法をご存知の方がいらしたら、ご教授下さい。

```ここに言語を入力
	var openFolder = 'explorer.exe /n,/e,/root,' + link;
	var ActiveXobj = new ActiveXObject("WScript.Shell");

	ActiveXobj.Run(openFolder);
```

javascriptからエクスプローラで別サーバの共有ディレクトリを開きたい

### 前提・実現したいこと

Webアプリから、クラサバのソフトウェアへデータ入力を行う処理を実装したい。

### 発生している問題・エラーメッセージ

javascriptでActiveXObjectを使用し、SendKeysとsleepを交互に行う処理を作成していますが、
SendKeys後、sleepが行われず、sleep後にまとめてSendKeysが実行されているような動きになってしまいます。
どうしたらよいのでしょうか？

### 該当のソースコード
以下のhtmlファイルをIEで開き、データ入力画面というファイル名のテキストファイルをメモ帳で開いた状態で、ブラウザのbuttonを押すと、事象を確認できます。
また、button2はRunで新規に開いたやり方です。これだとうまくいくようです。

```html
<!DOCTYPE html>

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
    <title></title>
    <script type="text/javascript">
		function inputData(arg1) {
		    var obj = new ActiveXObject("WScript.Shell");
		    obj.AppActivate("データ入力画面");
			sleep(1000);
			//キー・コードを送る。
			obj.SendKeys(arg1);
			sleep(2000);
			obj.SendKeys("{ENTER}");
			sleep(900);
			obj.SendKeys("{F5}");
			sleep(2000);
			obj.SendKeys("{ENTER}");
			obj = null;
		}
		function inputData2(arg1) {
		    var obj = new ActiveXObject("WScript.Shell");
		    obj.Run("notepad");
			sleep(1000);
			//キー・コードを送る。
			obj.SendKeys(arg1);
			sleep(2000);
			obj.SendKeys("{ENTER}");
			sleep(900);
			obj.SendKeys("{F5}");
			sleep(2000);
			obj.SendKeys("{ENTER}");
			obj = null;
		}
		function sleep(waitMsec) {
		  var startMsec = new Date();
		  // 指定ミリ秒間だけループさせる
		  while (new Date() - startMsec < waitMsec);
		}
    </script>
</head>
<body>
    <form id="form1">
        <div>
        <button type="submit" onclick="inputData('12345');">button</button>
        <button type="submit" onclick="inputData2('12345');">button2</button>
        </div>
    </form>
</body>
</html>
```

### 試したこと

AppActivateでなくRunで新規に画面を起動した場合（button2のやり方）、うまくいくようです。

### 補足情報（FW/ツールのバージョンなど）

IE11
ASP.NET WebForm
.NET Framework 4.0

javascriptでActiveXObjectを使用し、SendKeysとsleepを交互に行いたい

### 実現したいこと
<input type="file"/> に入力されたファイルをActiveX（Scripting.FileSystemObject等）で扱いたい。

### 前提
社内Webアプリにファイルアップロード機能がある。
現状はファイルをWebサーバーにPOSTし、Webサーバー側でファイルサーバーへの保存を行っている。

数百MB～数GBのファイルを扱うことが増えてきたため、Webサーバーを経由せず、直接ファイルサーバーへ保存できるようにしたい。

既存のUIを変更したくないので、入力（ファイル選択）には引き続き<input type="file" />を使用したい。

元々ActiveXを多用している社内アプリなので、技術的負債となりうることについては考慮しなくてよい。

### 知りたいこと
<input type="file"/> に入力されたファイルを指定したディレクトリに保存することはActiveXで実現可能か。

### 言語
HTML5 + JavaScript (TypeScript)

### 利用環境
Internet Explorer 11

FileオブジェクトをActiveXで扱うことはできますか？

phpからwshを実行したいと思っています。
php.iniに設定があるのでしょうか。

環境はwindowsです。

```php
$WshShell = new COM("WScript.Shell");
```

```phpでのエラー
<b>Source:</b> Unknown<br/><b>Description:</b> Unknown
```

いろいろ検索していたのですが、COMを設定していないみたいです。
https://stackoverflow.com/questions/12435043/fatal-error-uncaught-exception-com-exception-with-message-bsource-b-unk

phpからCOMを使うにあたり、php.iniに設定の必要があるのであれば教えてください。
よろしくお願いします。