ファイナルアンラッキー

緊急事態宣言が延期されるかもしれないが、出勤し続けているワシに何も影響を与えない 取りあえず、今週も普通に時短も無く出勤だった、来週も！？ 事務所の密集レベルが酷い(;'∀') 日本企業がコロナ患者を培養しているのかと思える環境 どっちしても明日も出勤で満員電車に突撃だから、はよねよ。

ADODBで「パラメーターが少なすぎます。xを指定してください。」が表示される原因。 ADODB.ParameterとADODB.CommandのParameterで更新する時に出る。 .NET系のプログラマーは、データベース更新系のCommandと同じノリでやってしまうのだけれども、VBAの場合、些細なミスで頻繁に「パラメーターが少なすぎます。xを指定してください。」みたいなエラーが表示される。 主な原因は.... SQLの誤り バインド変数の数がSQLで指定しているパラメーターより実際に相違している。 Parameterに追加する際のデータ型が相違している。 エラーの内容と推測しにくいのが、3番目のParameterに追加する際のデータ型が相違しているの分だ。 エラー内容的には、SQLのバインド変数のパラメーター名が誤っているとか、パラメーターの数がズレてしまったとかを内容的には探すのだけれども、どれも問題が無い場合、3番目のデータ型が要注意だ。 しかもやっかいな事に、デバッグで2回実行すると何故か成功する等、振る舞いが不安定なので、余計原因を抑えるのに混乱する。 例えば、ACCESSのデータ型は、大きい数値、数値みたいなデータ型があって、とりあえず、何でもまかなえそうな[BigInt]を指定したりしていると、このエラーが表示される。 Set sql_prm = sql_cmd.CreateParameter("項目名", adBigInt, adParamInput) sql_cmd.Parameters.Append sql_prm アクセスのデータ型で数値は、Numericになるので要注意。 Set sql_prm = sql_cmd.CreateParameter("項目名", adNumeric , adParamInput) sql_cmd.Parameters.Append sql_prm このエラーに遭遇している人で解決が上手くいっていない人は、大抵の場合、エラー内容

Many tweet reveal AbenoMask has many defects. Japan's government don't reveal mask maker. 縮み志向の強いアベノマスクに変色や髪の毛、虫の混入。まずメーカーを公表して原価を明らかにしてほしいね。460億円もの税金を使ったんだから当然の義務。「ピークを後ろにずらす」と言っていながら医療の備えは何をしていたんだ。やったのは虫入りマスク2枚だけ。安倍追放！ https://t.co/cmbgkDiSUu — 佐藤 章 (@bSM2TC2coIKWrlM) April 19, 2020 Japan's government finally started delivering Abenomask(cloth mask) to all through the country. Japan's government delivered cloth masks has discoloration and including insects, including hair. Japan's government what did you do? Japan's government said the coronavirus pandemic peak to delay it. But actually nothing. Just send defects mask. 不思議な工程で作っているマスクっぽい。「タスケテ」のメモとか入っていないことを祈る：政府配布の布マスク、汚れ付着や虫の混入など不良品報告相次ぐ https://t.co/PE89zDJbjh — 早川タダノリ (@hayakawa2600) April 18, 2020 Japan's government delivers the mask including insects, pollution according to some reports. アベノマスク、正しい方法で洗ったのに「驚くほど縮んだ」 https://t.co/4YoB17d8vx — き

いつになったら緊急事態宣言（本当の）が出されるのだろうか？ 今のところは緊急事態宣言の練習なのだろうか？ 官公庁に関わる企業や、GPIFによってほぼ国営会社のようになっている企業については、休業や、テレワークといった対応を行っている企業も多いようだ。 自分の知る限り、殆どの人が普通に出勤している。 電車の混雑は少し減った雰囲気はあるが、基本的に通勤ラッシュ、帰宅ラッシュにしか電車を乗らないので、ちょっと減ったなぁ程度。 日によってはパッキングされているような人ごみの日もあるので、平日の普段は減っているのかはあまり体感出来ない。 緊急事態宣言でも関係なく営業をしているカフェ等では、特に3密に拘ることなく対策が取られているのか疑問符な喫茶店も多くあった。 土曜日でも立ち飲み屋が満員だったりもしていたから、ホント、日本って見せかけの対応が好きだなって思うね。 さて、今回のが緊急事態宣言ごっこだとして、本当の緊急事態宣言はいつ出すのだろうか？ 結局出す羽目になるのだろうから、早くやった方が世界からの評価もマシになるだろうが。 ひたすらやる事が遅いから、日本のコロナウイルス対応は手遅れかもしれない。 I wrote about Japan's response to the coronavirus for @nationalpost : Japan finally declared a state of emergency. But it's too little, too late https://t.co/tFD08wPa0K — Tokyo-StayHomeSaveLives-tronic (@robotopia) April 7, 2020 Tokyo’s coronavirus “state of emergency” is as surreal as they come, @WilliamPesek writes https://t.co/btHujqL8ix — Washington Post Opinions (@Pos

Japan's want to just pretended to be emergency state? Date taken:17/4/2020 I can see every day that pretends to be a Japan's emergency. All photo date taken is 17/4/2020. By the way.  I'm still working at go to the workplace even if Japan emergency declared in coronavirus infection prevention. I'm not looking for particularly faults, But I'm can see the strange situation in Japan's emergency state response. I can see some cafe got customers packed even if emergency declared. I can see some still open adult store even if emergency declared. I can see still open Card game shop even if the Emergency state situation. I can see still open Anime goods shop too even if the Emergency state situation. How long continue pretended to be Wuhan-Coronavirus-emergency-declared??

ACCESSのVBAでバインド変数の利用方法 | 備忘録 今のACCESSのADOは、.NETとほぼほぼ手順が同じ。 参照設定は、[ Microsoft ActiveX Data Objects 6.1 Library ] 色々な言語をやると、久しぶりにACCESSで、しかもレガシーなVB6系であるVBAをやると、色々忘却している。 今回は、バリバリVBAをメインに使ったシステムを作るので、ADOでバインド変数を利用したデータベース連携のサンプルを載せてみる。 データ取得の例 Dim sql_con As New ADODB.Connection Dim sql_rs As New ADODB.Recordset Dim sql_cmd As New ADODB.Command Dim sql_prm As New ADODB.Parameter Set sql_con = CurrentProject.Connection 'sql_con.Open Dim rs As Object sql_cmd.ActiveConnection = sql_con sql_cmd.CommandText = "select * from test where test = ?" Set sql_prm = sql_cmd.CreateParameter("test", adBSTR, adParamInput) sql_cmd.Parameters.Append sql_prm sql_cmd.Parameters("test").Value = "aa" Set sql_rs = sql_cmd.Execute MsgBox sql_rs.Fields(1) データ取得もデータ挿入も全く同じ。 ’ Ins

い、行くか今日も。 一体どうなってるんだ？？ まさか、緊急事態宣言でも自分には何も影響が無いとは... まさかリモートワークが可能でも企業側が士気が下がる的な精神論で全く導入する気が無い。 殆どの企業は、在宅ワークで出社7割削減は結局勤怠上でだけ削減したことにするんじゃないかな？ さて、そろそろ出勤の時間だ......((((；ﾟДﾟ))))ｶﾞｸｶﾞｸﾌﾞﾙﾌﾞﾙ

Windows10のロック画面点灯時間の設定方法 ロックディスプレイオフのタイムアウト項目が無い場合もある 設定画面の表示方法は... 　スタートメニューを右クリックして、『設定』を選択。 　 設定画面から『システム』を選択。 　『電源とスリープ』を選択。 　『電源の追加設定』を選択。 　『プラン設定の変更』を選択。 　『詳細な電源設定の変更』を選択。 　『詳細な電源設定の変更』を選択。 　ここで、「コンソールロックディスプレイオフのタイムアウト」項目が無い場合は、レジストリエディタを開き下記の項目で、「2」を設定。 キー: HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Power\PowerSettings\7516b95f-f776-4464-8c53-06167f40cc99\8EC4B3A5-6868-48c2-BE75-4F3044BE88A7 項目:Attributes 値：2 　もう一度電源オプションを開きなおすと、「コンソールロックディスプレイオフのタイムアウト」項目が表示されるので、これで経過時間を設定出来るようになる。 ロック画面は時計が大きく表示されて稲荷、天気が表示されてたり、色々便利だから、消灯するより点けるようになった。

緊急事態ごっこはいつまで続く？ 緊急事態でもゲームセンターやパチンコはいつも通り 一体いつまで、緊急事態ごっこをやるつもりなのだろうか。 海外の緊急事態宣言と違って、日本の場合は、 ただ緊急事態だーー っって言ってるだけで、普段と何も変わらない。 政治の影響を受けやすい企業だけが政治的な対応として休業しているように見せかけて営業をしている雰囲気だ。 この見せかけ休業は、元々働き方改革で残業時間の上限を設定した時からも粉飾残業のように、勤怠管理上は帰った事にして労働を続けている文化がある日本。 それ以前に、元々サービス残業という文化が日本にはあり、元々勤怠管理上は休んでいたり、帰宅している事になっているが、勤務を続けている人が殆どだ。 屋外はさすがに人が少しは少なくなった感があるが、屋内は相変わらず特に変わらずといった印象だ。 そして、明日も普段通りいつもの出勤だ。 日本政府の緊急事態ごっこで、あとどのくらいの人が命を落とす事になるのだろうか？ そういえば、マスクの在庫がもうすぐ切れそうだ...1枚のマスクを消毒して2日使う戦法に切り替えるか...

My life can't find emergency declares pieces. Tweeted say so crowded commuter train even in Japan's emergency declare state. Where is emergency declared??  緊急事態宣言が出た翌朝の小田急線 完全な3密w何も変わらん。これじゃあ終息しない。 #3密 #小田急線 #通勤電車 pic.twitter.com/bF5DE4zDO4 — みこすりは～ん (@717wglxFg2O03xo) April 7, 2020 Where is emergency declared? 緊急事態宣言？何それ？ 今日の都内の駅及び電車の様子をご覧ください。 pic.twitter.com/DxInf2a9Z4 — える (@lTfC8qI4PATLiaC) April 7, 2020 Japan's government might be doing evil operative...  For example... might be declare decrease coronavirus infection 2 weeks later. My life ... Zero millimeter social distance... And maybe tomorrow too.