vb.net から Excel を操作

以前ここでExcel出力のことを書いたけど
裏技的で推奨できない。
正攻法で行くことにしました。
Excel参照設定もクライアント環境で違うでしょうから依存しない実行時バインディングで・・
excelのプロセスが残らないようにするのが大変でした
まずは単純に開いて5秒待って閉じるだけ

開いて閉じるだけでも変数が多くて混乱します
次に開いてセルに文字代入して保存して閉じる。

セルに代入するだけで変数が増えました。
これを踏み台にdatatableの数値を配列を使ってExcelのセルに代入する。

WSUSで苦しむ

WSUSサーバを移行したのですが・・・
移行も大変だったけどそのあとも大変。
クライアントからの接続がうまくいかないのだがどこが悪いかわからない。
windowsupdate.logを読みたいのだが最近のwindowsはPowerShellから翻訳しなければならない。
これもオンプレミスではたいへんなのだが苦労してログを取ると日本語は文字化け。
https://f-journey.com/it/convert_windowsupdate-log_from_etlfiles/#comment-139

からのスクリプトを少し検証して走らせるとうまく行きました。感謝です。

下のでwindows10、WS2016 では動作しました。ログの日本語を読むといろいろエラーでサーバの過負荷なのでインターネットに行かないのグループポリシーとWSUSプールのメモリー制限なしの設定でうまく行きました。

SQL serverが突然つながらなくなった

朝、突然に上記症状出現。
クライアントからつながらない。ローカルはつながる。
pingは通るし、ポートは開いている。nslookupはちゃんとしてるし、sqlbrowserも動いている。
クライアントのログインを作り直してもだめ。
ローカルはつながるので何とか業務をこなしつつ、SQLbrowserサービスを再起動させてみたら、
突然全部つながりました。
何だったのだろう。

Access ヒントテキスト

Accessのフォームでヒントテキストを初めて使ったのですが

開発機 windows server 2016 で Access2016のフォームでテキストボックスのヒントテキストが表示できません。
コマンドボタンは表示されます。
コマンドボタンのヒントが出た状態でマウスを素早く該当テキストボックスへスライドさせると表示されます。

いろいろ試してもダメで諦めてaccde作成、クライアントでruntime版で動かすと問題なく動きます。

選択ソート 二次元配列

ついでに選択ソートも

QuickSort 二次元配列

もともとはDictionaryでソートする必要があったので配列のソートを調べたのでした
dictionaryに入っているkeyとitemを二次元配列にしてソートする
もっと良い方法があると思いますが・・とりあえず
関数化したけど要素で型変換必要なので意味がなかった