すべてのカテゴリ

背景ある日ふと思いました。Adoの『踊』って曲は本当に踊りやすいのか！？ということで（どういうこと？）『踊』の踊りやすさを調べてみようと思います！どうやって踊りやすさを数値化しようかと考えてたらなんとSpotifyが数値化してくれてました！（ありがとうSpotify✨✨）SpotifyのAPIを使うと曲ごとに数値化された以下の指標を取得できるようです！今回は・danceability（踊りやすさ）を利用して『踊』がどれほど踊りやすいのかを見ていきたいと思います👍週間TOP50との比較まずは人気曲と比較してどれほど踊りやすいのか調べました！(2022年初頭（詳細は忘れました）のspotifyランキングの人気曲です)その結果がこちら！！『踊』は11位ということですが…『踊り子 / Vaundy』に負けて『Permission to Dance / BTS』に勝ってる！！（なんだこのダンス曲の序列は！？）とりあえず『踊』は人気曲の中ではそこそこ踊りやすいということですね!(^^)!その他を見るとやはりK-POP（IVE, TWICE, Kep1er, BTSなど）は強いですね…『ヨワネワキ』や『きらり』が上位で健闘してますが、一歩及ばずというところでしょうか。タイトルに"踊"が入った曲との比較『踊り子』より踊りにくいということが分かったことで、他の"踊"る系の曲と比較してみようと思いました！曲タイトルに「踊」が入っていれば踊る曲だろう、という安直な考えでデータを抽出して比較した結果がこちら↓Adoの『踊』は321曲中44位という上位ではあるものの微妙な結果に…（上図の赤枠）ただよく見

２０２３年　５月３０日　火曜日 ４月からですよねぇ？ フジテレビ　朝の番組 『めざましテレビ』 現在の「オープニング曲」 「Ado」ちゃんのガラガラ声 朝一番に　合わないと・・。 映画『ワンピース』主題歌の勢い そのままに　って依頼されたのかな？ ごめんなさい 私は「YOASOBI」さんの 『もう少しだけ』が好き。 幾田りら（通称イクラ）ちゃん　美人 私も 彼女ぐらいの美人に　なりたい。 そしたら　さ いくらでも 殿方を惑わせてあげるのに・・。 ちょっと残念かな？ 今日？ 遅くても明日までには 動画一本 ＹｏｕＴｕｂｅにアップします。 段取りは完了しているので。 あとは・・、 気合一発の「勢い」だけで 「躊躇」を吹き飛ばすだけなので。

Ado様の勢いが止まりません いつもお世話になっておりますユアベストプランです。 本日は勢いが止まらないAdo様に関しての記事を綴ろうと思います。 最近Ado様のカバー動画の広告ご依頼も多く頂いている状況でございます。 何を隠そう私もAdo様ファンの一人でございます。 この記事を最後まで読むことによって活動者様の今後の活動の参考にもなります。 ワンピースのタイアップ効果もあり、Apple MusicのTOPランキングをすべて独占しております。 本当に凄まじいです。 ライブに関しても 2022年4月にはZepp　DiverCity（観客動員数800人）初ライブ 2022年8月には埼玉スーパーアリーナ（観客動員数20000人）セカンドライブ なんと！！！ 4か月の間に25倍以上もの動員を増やしているんです。 このスピードは驚異的です。 私もZepp　DiverCityのライブに関しては観に行かせて頂きました。 満員で会場は興奮状態でした。 オーディエンス層は10代～20代が7割程、30代～50代が3割程という印象でした。 男女比率は半々くらい。 余談ではありますが、私は有名どころの歌い手様やグループの会場に定期的に足を運んでおり、 どういったお客様層なのか、どういった趣味嗜好やファッションを好むオーディエンスが多いのかなどのデータもSNSも併用して把握しております。 日々の広告運用での視聴者ターゲット設定に反映しております。 ではどうしてAdo様がここまで飛躍的に有名になったのか？ に対して解析していきたいと思います。 まず第一に一声聴けば圧倒される個性的な歌唱力が魅力です。 中

おはようございます。こんにちは。こんばんわ。 改善が大好きな、齋藤正夫です。 ブログをご覧いただき、ありがとうございます。今回は、ADO の RecordsetオブジェクトのOpenメソッドの最後の引数のOptionで指定するCommandTypeEnum定数の一つである「adCmdTableDirect」のご利用の注意点です。テーブルに設定した主キーやインデックスを指定して検索ができるのが特徴で、高速に検索が可能ですが、Accessで使用するには、注意が必要です。兎に角、利用できるには色々制限があります。・Indexプロパティが利用できない場合が多い。・ループ内で使用すると「これ以上テーブルを開くことはできません」とエラーが発生する。というように、VBAで使用するには、かなり限定的な用途しか使えない。つまり、「adCmdTableDirect」のご利用は、控えた方が正解です。では、代わりに何を使うの？「adCmdTable」を使ってください。これは、保存済のクエリも利用できますし、エラーの発生も少ないです。Seekメソッドの代わりに、Findメソッドで十分に機能は果たせます。

おはようございます♡みなさん、いかがお過ごしでしょうか♡週末の土曜日♡ゆっくり過ごしてくださいね♡平日が終わって、週末の土曜日はちょっとだけゆっくり起床✨と言っても、少しだけ寝坊したくらいです☺️というか土曜日の朝ってばーーー！って疲れが出てくるんですよね✨＊写真はイメージです平日はいろんな仕事に集中しているから週末になると体のスイッチが切れてどばーーーって（何回言う？🤣来ちゃいますねでも、頑張った証拠なのかなって思ってます✨頑張った分、土曜日はゆっくりしたい感じです☺️＊写真はイメージです昨日はちょっとだけトラブルもあったから気を張っててそれで疲れもあった感じ。なので、今日は緊張感から解放される意味でも嬉しいです✨やっぱり、トラブルは嫌だー🤣ほんと、面倒ですよ。。同僚スタッフなのに取引相手みたいな話し方されるからびっくりですよ🤣世の中はハロウィンですね🎃明日はちょっとだけハロウィン企画でもしようかな✨と言っても、普通の日記通信ですけど🤣せっかくなので、ハロウィンっぽいことを書いてみます✨最近はゾンビデダンスが流行りまくり✨新時代でも有名なAdoさん✨ほんと、今急上昇のアーティストさんですね☺️今私も密かに注目です✨＊写真はイメージですカーテンを開けて外を見ると久しぶりのちょっとだけ曇り空✨空の間から青空が見えてるからきっと晴れそうだけど☺️朝日があまり見えないからちょっとだけ肌寒いかもね✨ヒートテックは大事です☺️そろそろ朝活に集中かな✨＊写真はイメージですさて、今朝も読書や朝の仕事など朝活です✨土曜日なのでゆっくり、進めてリラックスしてきますよ☺️みなさんも週末の土曜日♡ゆ

まずODBC接続の際のCursorLocationはadUseServer一択。エグい処理であればあるほどadUseClientに比べて速度に差が生まれます。本日エグい処理をプログラムしていたので試してみましたら段違いでした。adUseServerだとrs.MovePrevious等の移動ができなくなるのですが、レコードセットを上に移動、だなんて一度もやったことがない！　まったく無問題！（それに上移動はちょっと危ない）。やはり水は下に流れるものです。ADOを勉強中の方はなにはともあれadUseServer一択、レコードセットの走査は上から下に、とされてください。あと処理速度に関して言えば、リンクテーブルもエグい処理では差が出ます。strSQL = "SELECT " & keyName(i) & " FROM [C:\Users\" & userName & "\server" & j & ".accdb]." & tableName(i)このかたちでほかのデータベースを参照する場合も速度的にはリンク扱いになります。なので、strSQL = "SELECT " & keyName(i) & " FROM " & tableName(i)cn.Open "Provider=Microsoft Office 12.0 Access Database Engine OLE DB Provider;" & "Data Source=C:\Users\" & userName & "\

YouTubeでも紹介しています。是非ご覧ください。なぜかクエリというものは、増えます。 それは、ACCESSの使い方を知らないからです。 または、覚えるのが面倒だからです。 毎月の集計クエリって意味あるの？ こんにちは。無駄なクエリを僕滅する委員会の伊川です。 ACCESSを、我が社でも利用していますが、なぜ、クエリは増え続けるのでしょうか？ カンタンな操作しか、基本書に掲載されていないことが原因でしょう。 ACCESSとExcelの連携となると敷居が高いと思う人も多いようです。 今回は、Excelを利用して、無駄なクエリを僕滅します。 実務でクエリが増える現象は 月の集計 4半期毎の集計 月間の個人成績 こんな感じでしょうか？ 日本人は、物持ちが良いので、平気で3年前のクエリを残しておきます。 3年前の情報は、普通、毎日の実務では利用しません。 でも、なんか、あった時に、困るから・・・・・・ 今回の記事で、もう、困ることはなくなります。 このブログはこんな人にお勧め ACCESSの中にクエリが沢山ある人 ExcelとACCESSの連携を勉強している人 SQLを勉強している人 このブログを、読み終わるころには・・・・ はっきり言いますが、無駄なクエリを30個減らせます。 集計に関するクエリは、作成する必要がなくなります。 問題は、SQLを利用するのですが、SQLの公式を利用すればカンタンです。 ExcelVBAで、SQL文を書く 以前にも、この手の記事は記載しました。 しかし、ユーザーフォーム等、結構、面倒です。 今回は、ユーザーフォームを利用しないで、セルで設定します。 要

　Windowsプログラム（VB.netやExcel VBAなど）からデータベースに接続する場合、ADO (ActiveX Data Object)を使用したコーディングが必要となります。　このコードは、外部データとの通信に不慣れなプログラマにとって、やや分りづらいものです。　そこで今回の記事では、中級者の方を対象として、Excel VBAを使用したデータベースアクセスの基本的な動作イメージを紹介したいと思います。　どのようなプログラムを組むにせよ、全体のデータフローがイメージできているか否かは、その後に進めるコード記述作業を、大きく左右すると考えます。　まず、全体の流れです。これは非常にシンプルです。(１) 対象のデータベースに接続する。　　データベースの形式は様々です。ファイル形式のものもあれば、データベースサーバとして独立したPCやサーバを立てている場合もあるでしょう。あるいは、Microsoft Shrepointなど メーカがサービスとして提供しているWEB上のデーがベースサーバもあります。　　まずはじめに、これからクエリを発行したいデータベースを特定できる形で、データベースに接続要求を行うことが、最初に行う作業になります。(２) データベースから接続応答が返ってくる。　　接続要求を受けたデータベースサーバ（対象がファイルの場合はデータベースドライバ）から、接続を受け付けるか／否かの応答が返ってきます。　　(１)項の接続要求にて、そのときに指定したユーザ名やパスワードなどの認証情報を元に、データベースサーバ（あるいはデータベースドライバ）が判断した結果となります。　　

２０２３年　４月１５日　土曜日 いつでしたか？ 皆さん　ご存知 歌手の「Ado」ちゃん。 映画『ワンピース』の 「UTA」ちゃん　と言った方が　わかり良い？ 生ライブを何度か　開催していて その映像が解禁されていますね。 彼女は『顔出し』をしないキャラクターとして 事務所（運営側）が推しています。 「顔出しＮＧ」とは違うと　感じます。 それが本人の希望なのか 企画会議での流れで 本人の意志が潰されているのかは 私達には　わかりません。 只、 昨年 生ライブを数回　開催しています。 ＤＶＤの販売は 今のところ　噂さえ聞きません。 エンタメニュースでね 彼女の映像は 最近　よく観ますよね。 観客席が暗くて 彼女のバック（背景）だけを明るくして 顔が見えないような演出で。 少なくとも 実在している存在で　ある事は 確かなようです。 あれも　ね 若いから出来る事で　あって 年配になって ああいう演出は 周りのブレーンが疲れちゃいません？ 本人に　その気が無くとも 勝手に 「超わがまま」なんて 陰口を叩かれてしまう 綱渡りみたいな 危なっかしい事を 現在進行形で進めています。 あと何年　続けられるのか？ いつか どんなタイミングで 顔を出す（曝す）のか？ 「ゆうこりん」が 「こりん星」を卒業したように いつか　終焉が訪れます。 過去に 「あまる」という 三人グループで活動していた事は 既に周知の事実です。 ＳＮＳでは「顔バレ」しています。 ライブ会場へ行けば 彼女の素顔が観られます。 そこが「価値」なんでしょうね。 メディアでは隠されたままですが 本人に逢う事は可能です。 じゃないと 生

２０２６年　３月２日　月曜日 今夜から明日まで　雨が降ります。 水不足が叫ばれている今　恵みの雨です。 ダム湖も干上がって その昔に沈んだ村が　露わになっていますね。 干上がって　表面は　カラッカラでも 湖底として大量の水を含んだ 地盤の緩いだろう場所 （専門家は危険を指摘している）に立ち、 観光地化している現状を伝える為に 報道各社が取材に入っています。 極寒の時期 薄氷が張る湖面に 観光客が命の危険を顧みず 乗り込んでいたのが （中には大石を足元に落として遊ぶ阿呆） 遠い過去のようです。 人間って 普段と違う景色・風景を知ると その場へ行かなければ気が済まない動物で 聴くだけ 観るだけでは収まらず、 自ら体験・体感したがるので、 端から見ていると怖いんですよね。 尤も、 文明って　そうやって 切り開かれて来た一面も有りますけれど・・。 炊飯器で料理をする料理研究家 炊飯器メーカーでは 基本　炊飯以外での使用は好ましくないと、 公式な推奨は控えていると聞きます。 そんな事を言ったら私だって Windowsのヴァージョンアップで １０から１１への時だって ２３H2から　２５H2への時だって 非公式の裏技で更新しましたから、 他人の事は言えませんわ。 いわゆる「代用品」で本番に臨む？ 規定違反だから バレたら退場なんですけれど　ね。 そう言えば『Ado』ちゃん 新作ＭＶ（ミュージックビデオ）で 本人初登場なんですって。 今　めざましテレビで観ました。 普段の公開ツアーでは 暗闇の中で シルエットしか観られませんけれど、 事務所の「顔出しＮＧ」規制の中で かなり攻めた企画なんですね

これでほぼ揃うと思います！わかりにくかったら申し訳ありません、、ご依頼の場合、ハモリトラックについては歌唱が難しい場合生成でも対応可能です。オク下トラックも生成可能ですができれば歌っていただく方が良いものになるかと思います。通常はフルコーラス全て込み8000円でお受けしているのですが唱の場合はトラック数や加工の量等で多少お見積り金額が変わる場合がございます。ご了承ください。ご依頼はこちらから！ご希望の方にはPDFファイルでお渡しできますのでメッセージからご連絡ください。

「エキサイト・アイドル」さってぇ～、たまにはボクの得意ではないヤツを紹介じゃ。まあ、でもなぜか海外では大人気じゃ。前からボクもちょっと気になっていた「アメリカ」のDJ？というか、「パトリック」という黒人のDｊがいるのよ。かなり前からボクも拝見していたけど、彼とか彼のダチとかが日本の曲や歌や歌手を紹介していたので、かなり気にはしていたぞよ。「パトリック」の初期のころは、まあ、今でもそうじゃけど「玉置浩二」が超お気に入りじゃ。彼の「メロデイー」が特にフェボリットじゃ。あ、それで今回は「ＡＤＯ」ちゃんじゃ。実は、ボクは「初期のころ？」の「うっせぇわ」くらいしか、知らん。フフフ。最初は、「なんじゃとて？」・・・「こんな強烈な歌詞とサウンド」のヤツってどんなヤツなの？とは思ったものの。それからは、ぜんぜん「聴く機会」がなかったのよ。ほんとじゃ。まあ、でも正体がはっきりと「不明」な彼女じゃ。＾＾；「ＧＲｅｅｅｅＮ」だったっけ？彼らも「正体不明」じゃったよね。まあまあのイイ曲を創造していたので、もちろん知っているぜよ。（だけど、なぜか、最近彼らも名前を変更し顔出しバッチリじゃ）ホホホ。やっぱり「顔出したい」もんね。「え？ちがう？？事務所変更？？？」んなもん知らんわい。まるで「加勢大周」じゃんか。前事務所の社長が「新加勢大周」とか言って、かなり妨害していたよね。＾＾；最終的に「坂本一生？」だったかな？まあどうでもいいけどね。フフフ。でも「新新新加勢大周」にはおどろいた。なにもそこまでしなくても・・・ねぇ。コワイ世界であるぞよ。さて、ではもう今では、世界の「ADO」じゃけど、ボクもちょっと前から

コミットデータベース.BeginTrans...データベース.CommitTransロールバックデータベース.BeginTransOn Error GoTo エラー処理のラベル...エラー処理のラベル:    データベース.RollbackTrans    ...

参照設定①VBE ②ツール③参照設定④Microsoft ActiveX Data Objects 6.1 Library

取得レコードセット.Open Source:=sql, ActiveConnection:=conn　件数取得レコードセット.Open Source:=sql, ActiveConnection:=conn, CursorType:=adOpenStatic, LockType:=adLockReadOnly値レコードセット.Fields("列名").Value レコードセット!列名.Valueループ Do Until レコードセット.EOF     処理        レコードセット.MoveNextLoop結果をセルに貼り付け セル.CopyFromRecordset レコードセット件数 レコードセット.RecordCountCursorTypeをadOpenStaticにしておく

【Ado 踊】 ●このブログでは、ドラム演奏家のためにドラム譜面を記事にして販売します。この楽譜の続きの下半分を見たい方は記事の続きを購入して下さい。 記事購入代で500円です。 ●僕はドラマーちゃーりーです。 ポップスのレパートリーは５００曲以上あります。 しかも全部、このような　“見開き一枚の譜面”　を書いていますから、いつでも再現できます。 ●何十曲も演奏するセッションドラムや、カラオケドラムでは“見開き1枚で書かれた楽譜”　でないと現場では使えないですよね。 ぜひ画面メモでプリントアウトされるか、自分で書き写されてください。 ●書き方に多少オリジナルが含まれます。でも、見たら分かると思います。 ●以下の方はお気軽にメッセージをどうぞ。 ・リクエスト曲の相談 ・ご質問 ・演奏して見せて欲しい方 ・何曲かまとめて制作して欲しい方 何でも相談に乗ります。【Ado「踊」をドラムで演奏するポイントとは？】圧巻のボーカルと緊張感のあるサウンドで知られるAdoの「踊」は、ドラム演奏においても高い表現力と正確さが求められる楽曲です。 今回はこの曲をドラムで演奏する際の ・構成とキメのポイント ・注意点 ・ボーカルを引き立てるための演奏術 についてご紹介します。 【曲の構成とキメのポイント】 「踊」はイントロからテンションの高いサウンドが展開され、Aメロ～サビまで一貫して疾走感があります。 僕の譜面を見るとわかりますが、 ・ハーフビート ・バツカーダ のストロークさえ分かっていれば曲は通せます。 ただし、 ・キメ ・ブレイク がとても多いです。 ですので、 この譜面をみながら音源

実行データベース.Execute CommandText:="INSERT文", Options:=adExecuteNoRecords　オプション指定しないと　閉じたレコードセット　が返されるデータベース.Execute CommandText:="INSERT文"Dim コマンド As New ADODB.CommandWith コマンド    .ActiveConnection = データベース    .CommandText = "INSERT文"    .ExecuteEnd WithSet コマンド = Nothing

作成Dim コマンド As New ADODB.Command閉じるSet コマンド = Nothing

接続 Dim データベース As New ADODB.Connection With データベース    .Provider = "Microsoft.ACE.OLEDB.12.0"    .Open ファイルのフルパスEnd With閉じる データベース.Close Set データベース = Nothing　レコードセットを開いたとき レコードセット.Close データベース.CloseSet レコードセット = NothingSet データベース = Nothing

SQLDim レコードセット As New ADODB.Recordset レコードセット.Open Source:="SELECT文", ActiveConnection:=データベース...レコードセット.Closeデータベース.CloseSet レコードセット = NothingSet データベース = Nothingレコードセット.Open Source:="SELECT文", ActiveConnection:=データベース, Options:=adCmdTextクエリWith コマンド    .ActiveConnection = データベース    .CommandType = adCmdTable    .CommandText = "クエリ名"    .Parameters("[パラメータ名1]") = "値1"    ...End WithSet レコードセット = コマンド.executeテーブル レコードセット.Open Source:="テーブル名", ActiveConnection:=データベースレコードセット.Open Source:="テーブル名", ActiveConnection:=データベース, Options:=adCmdTable

SELECT With データベース     .Provider = "Microsoft.ACE.OLEDB.12.0"    .Properties("Extended Properties") = "Excel 12.0;HDR=YES"    .Open ブック.FullNameEnd Withレコードセット.Open Source:="SQL文", ActiveConnection:=データベース※集計行を表示してるとSELECTに含まれてしまうSQLのテーブル名　テーブル[シート名$テーブルのセル範囲の相対参照アドレス]"[" & シート.Name & "$" & シート.ListObjects("テーブル名").Range.Address(False, False) & "]"　Excel以外のデータベース接続の場合 "[Excel 12.0;HDR=YES;Database=" & ブック.FullName & "].[" & シート.Name & "$" & テーブル.Range.Address(False, False) & "]"　テーブルがシートのA1から始まってる場合[テーブルのシート名$]　テーブルのセル範囲を指定[テーブルのシート名$セル範囲の相対参照アドレス]SELECT　時に集計行を除外するSELECT前に集計行を非表示にしておくテーブル.ShowTotals = FalseSQL実行テーブル.ShowTotals = True