@Blog{zip358.com}

JavaScriptでWebstorage使ってますか？🤔 #webstorage #javascript #cookie

2022.12.04

Logging

おはようございます。二日酔いです、遅めの更新🍃。

今日は今までフロントエンド側で使用していたcookieの処理コードをwebstorageに置き換えた理由と使い方のコードを記載します、JSでCookieを取り出すコードを書く場合、バニラコードで書くかライブラリを使用して書くかだと思います。自分は前者で、とにかくCookieで保存したものを取り出すのに無駄にコードを書いていましたので、そろそろコードを直そうと思ってwebstorageを採用しました。

webstorageを採用した理由は自分が保管するデータはそれ程、容量を食わないしローカル保存（ブラウザ側保存）で十分な情報だったのでwebstorageを採用しました。そして何より、もう殆どのブラウザで使用できるようになっただろうという考えの元、コードを改修しました。

今まで情報の呼び出しするのに数行書いていたものが、１行のコードで参照できるというのは本当に素晴らしいことです💯。

呼び出すコードはこちら

localStorage.getItem("bgcolor_code")

値を保存するコードはこちら

localStorage.setItem("bgcolor_code",color)

その他に削除やクリアするコードやSessionで保存するコード等も存在します、もし詳しく知りたい場合は上記のTwitterのリンクを辿ると情報にたどり着くはずです。

タグ

COOKIE, javascript, JS, webstorage, エンド, コード, データ, バニラ, ブラウザ, フロント, もの, ライブラリ, ローカル, 二日酔い, 今日, 使い方, 使用, 保存, 保管, 元, 処理, 前者, 場合, 容量, 情報, 採用, 改修, 更新, 殆ど, 無駄, 理由, 自分, 記載,

休みの日はアクセス数が少ないのを打壊したい人いる！？

2022.11.04

Logging

おはようございます、昨日は文化の日でお休みでしたね🫠。

アクセス数ゼロでも毎日のようにブログを書き続けて今のところ、二桁止まりですがアクセス数を維持しています。たまにプレビュー数だと三桁行く時がありますが、今はあまりですね～😗。

さて、そんな自分がアクセス数の増やし方を教えます。アクセス数を増やすには唯、流行の記事を追い求めるだけではダメです。未来を予想してその記事を書くこと。そしてまだ誰もその記事に付いて書いていない事が重要になります。

技術知見の二番煎じです、個人ブログでは検索サイトが拾ってくれません。なので、書くのはほぼ無駄です。たまに自分も書いたりしていますが検索にヒットすることは少ないです。技術知見を書くのなら出し惜しみせず、全力投球で書くことをオススメしますが、初学者への知見は書いても拾ってくれませんので、中級レベルの知見を書くことをオススメします。

上級者の知見は書いても無駄だと思っています。上級者ではないので分かりませんが、そもそも上級者になると論文やドキュメントで事が足りるから、わざわざそこら編を検索するという事は無くなるのではと思っています。

要約するとニッチな戦略で記事を書くべし！古い記事の上書き記事も有効😗

それらの事を注意して記事を量産すると徐々に記事を拾ってくれる確率は増えてきます✌。

尚、SEO戦略なんてブラックボックスのアルゴリズム＝重箱（ブラックボックス）の隅のホコリを見つけてこれは宝石だと喜び合うことだと思います。人工知能が文章を理解するよう事を見据えて、今から人が理解できる文章を書くことをオススメします😋。

タグ

アクセス, あまり, おすすめ, お休み, こと, サイト, たま, ため, ところ, ヒット, プレビュー, ブログ, レベル, 三, 上級, 上級者, 中級, 予想, 事, 二, 二番煎じ, 人, 今, 休み, 個人, 全力投球, 初学者, 技術, 数ゼロ, 文化の日, 日, 昨日, 時, 未来, 検索, 毎日, 流行, 無駄, 知見, 維持, 自分, 記事, 誰, 重要,

素晴らしいコードに出会うという事はとても大事ですよね。夜も眠れません😏

2022.03.22

Logging

おはよう御座います。
素晴らしい世界を聴きながら。

プログラマーにとって技術力を上げるのは多分、向上心があるからだと思います。

さてプログラミングをするにあたって素晴らしいコードに出会うという事はとても大事です。素晴らしいプログラマーをフォローして終わりにしていませんか、彼ら彼女たちのgithubなどを見てみてください。素晴らしいコードに必ず出会います。最初は何を書いているのかわからない事もあるかもしれませんが、その技術を理解すればするほど、これは美しくて素晴らしいコードだという事が理解できるはずです。

プログラミングは書けば書くほど、上達するというよりはシンプルで無駄のないような方法を見つけ出す思考身につけると上達するという事だと自分は思っています。闇雲に書くだけではそのコードを書く技術力は上がらないと思います。世の中には強者がゴロゴロといます。それらのコードから技術を習得するのが一番の手っ取り早い技術力の上げ方かと思います。そしてそのベースとなるのは基礎が身についているかどうかだと思っています。

タグ

8, com, github, https, TWo, vwLaT-, watch, www, youtube, コード, これ, シンプル, パス, フォロー, プログラマー, プログラミング, 上達, 世界, 事, 何, 向上心, 夜, 大事, 彼ら, 彼女, 思考, 技術, 技術力, 方法, 最初, 無駄, 理解, 自分, 身,

セレクトメニューの都道府県は毎回、作るよりストックしておくべし。

2021.12.13

Logging

駆け出しフロントエンドエンジニアさんや駆け出しコーダーさんの中にはお問い合わせなどで、都道府県を毎回、書いている人はいると思いますが、大体、同じことを何回もするのは無駄です。なので、自分専用の雛形を作っておくといいですよ。そうする事によって作業は結構、短縮されたりします。今回は自分がよく使う、セレクトメニューの都道府県をJSで都道府県リストを生成するように作りました。

繰り返しになりますが、こんな感じに自分が使用するデータや独自の関数はストックしておくと作業効率は上がります、毎回調べてプログラミングやコードを書くのは仕事上では手間になるので辞めた方が良いです。

最後にJSコードとGitHubのリンクを貼っときますので、ご自由使用くださいませ。

https://github.com/zip358/select_jp_ken

let useKendata = [
    {'no':'01','name':'北海道'},
    {'no':'02','name':'青森県'},
    {'no':'03','name':'岩手県'},
    {'no':'04','name':'宮城県'},
    {'no':'05','name':'秋田県'},
    {'no':'06','name':'山形県'},
    {'no':'07','name':'福島県'},
    {'no':'08','name':'茨城県'},
    {'no':'09','name':'栃木県'},
    {'no':'10','name':'群馬県'},
    {'no':'11','name':'埼玉県'},
    {'no':'12','name':'千葉県'},
    {'no':'13','name':'東京都'},
    {'no':'14','name':'神奈川県'},
    {'no':'15','name':'新潟県'},
    {'no':'16','name':'富山県'},
    {'no':'17','name':'石川県'},
    {'no':'18','name':'福井県'},
    {'no':'19','name':'山梨県'},
    {'no':'20','name':'長野県'},
    {'no':'21','name':'岐阜県'},
    {'no':'22','name':'静岡県'},
    {'no':'23','name':'愛知県'},
    {'no':'24','name':'三重県'},
    {'no':'25','name':'滋賀県'},
    {'no':'26','name':'京都府'},
    {'no':'27','name':'大阪府'},
    {'no':'28','name':'兵庫県'},
    {'no':'29','name':'奈良県'},
    {'no':'30','name':'和歌山県'},
    {'no':'31','name':'鳥取県'},
    {'no':'32','name':'島根県'},
    {'no':'33','name':'岡山県'},
    {'no':'34','name':'広島県'},
    {'no':'35','name':'山口県'},
    {'no':'36','name':'徳島県'},
    {'no':'37','name':'香川県'},
    {'no':'38','name':'愛媛県'},
    {'no':'39','name':'高知県'},
    {'no':'40','name':'福岡県'},
    {'no':'41','name':'佐賀県'},
    {'no':'42','name':'長崎県'},
    {'no':'43','name':'熊本県'},
    {'no':'44','name':'大分県'},
    {'no':'45','name':'宮崎県'},
    {'no':'46','name':'鹿児島県'},
    {'no':'47','name':'沖縄県'},
];
document.getElementById("ken").insertAdjacentHTML('afterbegin',(function(ken){
    let str = '';
    for (const key in ken) {
        str+= '<option value=' + ken[key].no + '>' + ken[key].name +'</option>';
    }
    return str;
}(useKendata)));

タグ

01, 39, github, JS, let, name, no, useKendata, エンジニア, エンド, お問い合わせ, コーダー, コード, こと, ご自由, ストック, セレクト, データ, プログラミング, フロント, メニュー, リスト, リンク, 中, 事, 人, 今回, 仕事, 何回, 作業, 使用, 効率, 北海, 大体, 専用, 感じ, 手間, 方, 最後, 毎回, 無駄, 生成, 短縮, 自分, 都道府県, 関数, 雛形, 駆け出し,

案件9割完成して案件に申し込むみたいな事は非効率だけど。

2021.08.05

Logging

今日、先日にツイートした案件の締切日ですが・・・(*´ω｀*)、未来の自分は案件取れたでしょうか？来月の支払いをペイ出来る額ですので取れると良いですね。さて、案件9割完成して案件に申し込むみたいな事は非効率だけどこの非効率で仕事に応募している理由は、やっぱ安価な仕事でも仕事は仕事ですよという気持ちで取り組んでいます。

因みに今回はこういう案件を作りました。JSのコードの行数は約800行、PHPのコードは約200行で合計、1000行のコードを２日間で書きました・・・?。サイトを動的な処理で動かしているので結構、無駄にコードを書いています。いつもの通り設計はなし、頭の中でさっさと考えて作っております。

もし案件が取れなかったらコードなどを自分の名前のサイト、もしくはgithubに公開します?ので、その時はご利用ください、可能性としては５０％ぐらいの確率で請け負う事が出来ると考えています。

タグ

1000, 2, 200, 50, 800, ９, github, JS, php, コード, ご利用, サイト, ツイート, ペイ, 中, 事, 今回, 今日, 仕事, 先日, 公開, 処理, 効率, 可能性, 合計, 名前, 安価, 完成, 応募, 日, 時, 未来, 来月, 案件, 気持ち, 無駄, 理由, 確率, 締切, 自分, 行数, 設計, 通り, 頭, 額,

無駄な努力や非効率な努力があっても良いじゃないかな。効率的が全てではない。

2021.06.02

Logging

ガンバリマスとか言っているけど、今まで本当に頑張ったことがない自分。頑張ったら出来るというのは正しくないかもなとは思っている。人には得意分野や不得意分野があったりしますからね。ただ頑張っている人に否定する言葉は投げかけるのは辞めている。何故ならその人が一番自分の限界というものを知っているから、どこで切り替えるのかは、その人に任せれば良い。自分のことをわからない人でも気づく時が来るから言わないほうが良いし、人の技量なんてものを測れる人はあまりいない殆どの人は誤った判断する。

この頃、世の中は効率的に成功する事が良いような空気が流れているけど、それで本当に良いのかと・・・。無駄な努力もあって良いし、非効率な努力もあって良いじゃないかなと思います。自分で考えない人がこの頃、多くなったのか？

洗脳されやすい人が増えてきている気もします。マイノリティー（少数派）が正しい事だってあるのだから、長い目で見るという事が大事になってくるのだと、それを忘れかけている世の中にはなって欲しくないなと。

そういう事が出来なくなっているのは人々に余裕がなくなってきている証拠なのかもしれない。要するに心に余裕がない時は社会や人に当たりやすくなるという事そして誤った判断の中で世の中が進む時もある。

タグ

61, 8, com, fYz-, https, vx, watch, Wi, www, youtube, ガンバリ, こと, どこ, ます, もの, 不得意, 世, 中, 事, 人, 全て, 分野, 判断, 努力, 効率, 否定, 増, 得意, 成功, 技量, 時, 本当, 殆ど, 洗脳, 無駄, 空気, 自分, 言葉, 限界, 頃,

さくらサーバと別会社のサーバを使う場合。

2020.10.21

Logging

さくらサーバでメインドメインを使って、サブドメインを別サーバと紐付けて使用する場合は、ネームサーバで設定せずにAレコードで設定するに限る。この話はドメインをお名前.comなどのドメイン販売をメインで取り扱っている会社の話になると思います。レンタルサーバーでドメイン取得してサブドメインを別サーバで使用する場合もおなじですが、WEBの制作会社などは大体、ドメインをメインとして発売されている会社で取得して、サーバは別会社で取り扱っていることがセオリーなのかなぁ・・・。

何故ってサーバを別会社に移行する場合、サーバとドメインを同じところで取得しているとサーバ移行時に、無駄なお金が発生するからです。ドメインを移管しようものなら、高額なドメイン移管代を支払うハメになったり、サーバ移行したけどドメインはサーバのまま保持しないといけなくなったりして、新サーバ代と旧サーバ代の両方を毎月支払うハメになったりとサーバを移行するのに無駄なお金が発生するので、ドメインとサーバは別々にしていることが多いです。

話を戻して別会社のサーバを扱いたい場合はAレコードで設定してvalueにそれぞれのサーバのIP情報を入力すると良いです。さくらサーバのサーバIP情報はコントロールパネルのサーバ情報に記載されています。その情報をAレコードに入力してあげれば良いです?

タグ

com, web, お金, こと, サーバ, サーバー, さくら, サブ, セオリー, ところ, ドメイン, ネーム, はめ, まま, メイン, もの, レコード, レンタル, 両方, 会社, 何故, 使用, 保持, 別会社, 制作, 取得, 名前, 場合, 大体, 無駄, 発売, 発生, 移管, 移行, 紐, 設定, 話, 販売, 高額,

サーバー引っ越して突貫工事。

2020.09.29

Logging

昨日、サーバー引っ越しして突貫工事を行っていました。ことの成り行きを説明するとサーバー移行しようとしてミスってしまった…。画像データのバックアップを取るのを忘れて、サーバーを消しちゃって『あぁ』ってへたってました。数時間、もうこのサイトを消そうかなとか思ったのですが今まで蓄積した、どうしようもないデータ量を無駄にするのは惜しいと思い、数時間後にテキストデータだけさくらレンタルサーバーに移行しました。

今までは別のVPSで動かしていたのですが、なんだかもったいなという気持ちが芽生えてきて元のさくらレンタルサーバーに移行しました。じぶんは結構、サーバーの移行を行います。これは計画的な移行というのはほぼ無くほぼ衝動的なサーバー移行が多いです。なので何の前触れもなくサイトが数時間見えなくなったり、見えづらい状態になったりということが数年間に何回かあります。

本当はもっと良いサーバーを借りたいものですが、収益とサーバー代がとんとんな状態なので、いまは良いサーバーを借りていません。

因みに自分がオススメするレンタルサーバーはXサーバーがしているwpxやかごやサーバーです。wpxは初心者でも簡単にワードプレスが構築できてそれでいて表示も高速です。かごやサーバーは高速化処理などは自分で試行錯誤しなければならないのですが、サービスのなかに回線速度を上げることが出来るオプションがあるので、そちらを使用すると大体のワードプレスは爆速化します。

まぁそんなですが自分はさくらレンタルサーバーでゴニョゴニョするのが好きかな。結構、ゴニョゴニョ細工出来ますよね。

タグ

VPS, いま, こと, これ, サ, サーバー, サイト, さくら, じぶん, データ, テキスト, とんとん, バックアップ, ミス, レンタル, 何, 何回か, 元, 別, 前触れ, 収益, 工事, 引っ越し, 数, 昨日, 本当, 気持ち, 無駄, 状態, 画像, 移行, 突貫, 蓄積, 説明,

そのままでそのままで。

2020.08.14

Logging

コンビニのお買い物でエコバッグを使わなくなる。あるコンビニのお客さんが「そのままで」と良いと言い、決済してそのまま持ち帰っていて、じぶんも真似してそのままの状態で持ち帰るようにした。

あるお客さんと同様にコンビニで買う商品は手で持ち帰るものなので、ほんとそのままで良いと思う。自転車のかごや車だったら車までの距離まで手で持って帰るだけなので、そのままで良いのだと。

そのためにレジ袋を購入するのは正直な所無駄だと。

因みにコンビニ繋がりで、昨日ツイートした話ですがセブンイレブンのコンビニの店員さんがとても丁寧な接客で正直な所、そこまで丁寧な接客しなくて良いよと思いたくなります。スーパーやコンビニで丁寧な接客をしてくれる店員さんがたまにいるのだけど・・・。海外の人が見ると驚くだろうなぁと思います…。本当にいるのだなぁってね。

タグ

エコ, お客さん, お買い物, かごや, コンビニ, じぶん, スーパー, セブンイレブン, そこ, そのまま, たま, ため, ツイート, バック, ほんと, もの, レジ袋, 丁寧, 人, 同様, 商品, 店員, 所, 手, 接客, 昨日, 本当, 正直, 決済, 海外, 無駄, 状態, 自転車, 話, 購入, 距離, 車,

弱いひと。被験者。加害者。

2020.06.28

Logging

被害者Aさん、談話より抜粋：

被験者と加害者。加害者はざっくり言うと精神的に弱いひとが多い。とくに男性は精神的に弱いひとが多いと思います。そして陰湿なことをする人が多いのだけど。そういう弱い加害者を見ていると、なんか可愛そうに思えてくる。この人達、ひとを貶すことで充実感や満足感を得ているだと思うと『あぁなんて』、時間の無駄なことをしているのかと思います。

そういう人達を見ていて共通しているのは、しつこい人が多い。ネチネチしているですよね、悲しいかな。悲しいかな。そういう人達を観察していると人生うまく行っていないだなと勝手に思ってしまいます。

会社で上手く行っていない、経営が上手く行っていない、家庭が上手く行っていないなど、その息抜きに立場の弱い人をいじめたりするですね。

そういうのを見ていて『あぁなんてしょうもない』ことをして、心を満たしているだと思うと滑稽にも思えるです。

という被害者の声を聞いた。

それを聞いてどっちが被害者なのかわからなくなってしまった。被害を受けているのでそれは被害者なのかもしれないが、もうその人は違う次元に行ってしまったんだなと思えてくる。あの『ひろゆき』さん見たいな領域に到達していっているような気もした。

人を見下しているのは被害者なのかもしれない『この人、ひとを下に見ている』だから加害者がやめないだよと・・・。

そう思うとどっちもどっちだなと思えてくる。そして、そういう被害を何周も同じように経験をしていると人って悟だなと思えてきた。自分もそんな悟る領域に到達したいものです。

タグ

こと, しょう, それ, どっち, ひと, 人, 人生, 充実感, 共通, 加害者, 勝手, 声, 家庭, 心, 息抜き, 抜粋, 時間, 満足感, 滑稽, 無駄, 男性, 立場, 経営, 被, 被害者, 被験者, 観察, 談話, 陰湿,

無駄ってないよね。

2020.05.30

Logging

はい、落合陽一です、じゃなくてTaokaですという事で昨日の延長で記事を書きます、今日のタイトルは無駄って無いよねです。落合陽一さんは全然関係ないですが落合陽一さんがYOUTUBEチャンネルを開設しています。好きな人はご視聴ください。YOUTUBEしているひとが増えましたよね。YOUTUBEチャンネルの使い方はひとそれぞれです。

好きな分野をとことんやって発信するとどうも共感する人が集まってくるみたいですね。知の巨人とはいまではGサーチを指すようになったと思いますが、それでも人は趣向の合うひとをチェックしてブログを読んだり、共感したり、収入がないのに投げ銭したりする生き物です。でもそれは無駄ではないような気がします。立ち止まる事は良いことだと思いますし、笑ったりすることなどや何もしないで一日が経つ日も良いことのように感じます。

日本人、働きすぎですよ、、、。東南アジアとか旅行したことがないけれどYOUTUBEとかで見ると街頭で昼間からお仕事もせずに語らっている人々が結構います。なんかそれは日本人から見ると不思議な光景にうつるかもしれません…。でも人として生きるのにどちらが良いのだろうかと思ったりします。

なんかこの頃、思うのは何を基準にするかだと思います…。そして、たまに今は疎遠になった中学や高校時代の知人などは、今どんな人生を歩んでいるのだろうかと考えることがあります。多分、生きていく中でいろいろあっただろうと、その事によりそれぞれ自分の考えという物を持ち出す頃だと思います。自分はあまり考えを持ち合わせていないのですが、あまり頑張り過ぎず生きていこうと思っています、人生後半になる頃には大震災を経験したりするかもしれません。あまり持たないことが、そういう時には身軽なのかもしれないなと思っています。

失うものは少ないほうが良いと…。

タグ

taoka, youtube, アジア, いま, こと, サーチ, それ, それぞれ, タイトル, チェック, チャンネル, ひと, ブログ, 一, 事, 人, 今日, 何, 使い方, 共感, 分野, 収入, 巨人, 延長, 投げ銭, 旅行, 日, 日本人, 昨日, 東南, 気, 無駄, 生き物, 発信, 知, 落合, 街頭, 視聴, 記事, 趣向, 開設, 陽一,

映画、マスカレード・ホテルを観てきましたよ

2019.01.20

Logging

映画、マスカレード・ホテルを観てきましたよ。
途中ぐっと来るトコロがありましたが
全体的に見ると平均的な映画かなと思えました。
犯人逮捕後のストーリー展開がなければなんか良かった気がします。
無駄に長く感じてしまいました。
 

タグ

4118, 7, com, DlQ, Ft, nbsp, youtube, ストーリー, トコロ, ホテル, マスカレード, 展開, 映画, 気, 無駄, 犯人, 途中, 逮捕,

リモートワーク＝在宅で仕事を取り組んでみて分かったこと。

2018.10.21

Logging

リモートワークに取り組んでみて
非常にやりづらいということ、いまの仕事の体制ではリモートワークという形態は仕事がはけない、特に意思疎通に無駄に時間を割くことになり時間の無駄だと感じた。
電話を使わないは自分は賛成で、やはり記録に残るものでないと何かあったときにトラブルになりやすいから記録に残るものが大事という考え。
●リモートワークの必須ツールは？
リモートワークという仕事の場合はスカイプが必須、もしくはスカイプに変わる音声ツールは必須だと感じた。
あとはチャット系ツールも必須。
●リモートワークの問題点
リモートワークというのは孤立感が非常に感じるのものです、職場との温度差が非常に感じやすいという事。
特に自宅でいきなりリモートワークを始めると近所からは仕事をやめたのかなという事にもなりメンタル的によく感じない。
やるなら外で仕事をすることがオススメ。
ちなみにリモートワークを次に指令を受けた場合、自分は来年あたりに仕事を辞めるかを考え中です。
辞めて次は何をするかというのは、まだ未定だけど辞めて一年間の間にIT系の仕事に就けなかったら、
仕方なく【ひとり起業する】という選択をする可能性がある。
●【ひとり起業】から【企業】へ
たぶん、ひとりで起業して軌道に乗せるまでたぶん人脈もコミュ力もないので、数年はかかるだろうと思うが
仕方なく起業するひとは、意欲的なひとより成功しやすいらしい。
何故かなのかは知らないけどそういう統計がある。

さて、現在はどうなったでしょうか＠2021．07.11の君へ、リモートワークで働くじゃないの？

追記：会社のリモートワーク体制が整っていなかっただけだった、他の会社でリモートワークしてみてリモートワークの方が向いているなと感じました。

タグ

あと, いま, おすすめ, こと, スカイプ, チャット, ツール, とき, トラブル, メンタル, もの, リモート, ワーク, 事, 仕事, 体制, 問題点, 在宅, 場合, 外, 大事, 孤立感, 形態, 必須, 意思, 指令, 時間, 来年, 温度差, 無駄, 疎通, 職場, 自分, 自宅, 記録, 賛成, 近所, 電話, 音声,

笑いの源。

2017.05.06

Logging

笑いの源はなんだろう？
人はこういうときに何故か笑う。
自虐的な笑い、見下した笑い、愛想笑いの3種類に
分けられるのではないだろうか。
たまに馬鹿にした相手が後になって自分より優れていたりすると嫉妬の感情が
生まれたりするから人っていうのは変な生き物だなと。
この嫉妬とかいう感情がめちゃめちゃ人生で無駄な時間だと感じます。こうなってしまうと割り切れない人はなかなかその負の螺旋から抜け出せない。

http://www.ichinosuke-en.com/
先日、何の番組か忘れましたが春風亭一之輔 氏がTVで取り上げられていました。
昔から自分は落語は好きなんですね、子供の時から落語の喋りのリズムが好きでしてたまにYOUTUBE何かでたまに聞いたりします。
当たり前ですが落語は話のリズムだけではなく、聞き手をそのお話の中に引き込んでいく話術が必要になります。そういうのはいきなり出来るものではなく、経験や努力の末に身につくものだと
思います。なんでもそうなのだけど一流のひとはその事につぎ込んでいる時間が人よりも何倍も多いような気がします。
追記：嬉しいときの笑いは何処に分けられるのだろうか？

タグ

３, com, http, ichinosuke-en, TV, www, youtube, お話, たま, とき, なん, ひと, もの, リズム, 一流, 中, 事, 人, 人生, 何, 何か, 先日, 努力, 変, 嫉妬, 子供, 当たり前, 後, 必要, 愛想笑い, 感情, 昔, 春風亭一之輔, 時, 時間, 末, 源, 無駄, 生き物, 番組, 相手, 笑い, 経験, 聞き手, 自分, 落語, 螺旋, 話, 話術, 負, 馬鹿,

勿体無いことをしている人がいる。

2016.03.05

Logging

勿体無いことをしている人がいる。はたから見れば勿体無いことをしていると思うことが世の中にはたくさんあります。他人の少しした欠点を見つけて叩く人は「あぁもったいな」と思います。
わざわざ、その時間を嫌いな人に注ぐわけです。
「あぁ勿体無い」と思います。
その時間で他のことが出来るのに相手のことが気になってしかたがないのです。
「あぁ勿体無い」と思いませんか気に食わない人のために割く時間が勿体無い。
時間はみんな平等に割り振られています。
（寿命は不平等ですが）
その時間を嫌いな人に割くとは自分から言わせれば無駄な時間だと感じます。
もし寿命のカウンターが見れたらならおそらく嫌いな人に割く時間よりも自分に割く時間を
持つようになると自分は思います。

タグ

カウンター, こと, たくさん, ため, はた, みんな, もったい, わざわざ, 不平等, 世, 中, 人, 他, 他人, 嫌い, 寿命, 少し, 平等, 時間, 欠点, 気, 無駄, 相手, 自分,

MonacaはHTML5でマルチプラットフォーム対応のモバイルアプリ開発が行えます。

2015.04.26

Logging

MonacaはHTML5でマルチプラットフォーム対応のモバイルアプリ開発が行えます。このサービスには落とし穴があります、フリー版だとリリース出来るアプリは3つです。有料版だと月に980円、5000円、8000円とそれぞれコースがあり、作れるアプリはそれぞれ10個、100個、無制限となっています。試しに作ってみようと思う方にはオススメしますが、有料版で制作するよりはJAVAやObject-Cで制作してそれぞれReleaseする方が経済的なのかなぁと思ってしまいます。有料版でリリースしても元がとれなければ無駄な感じがします。このサービスの利点はHTMLとjavascriptで制作が行える事です。AndroidStudioでいま、この前作ったものを改良しているのですが落ちまくるんですIDEが・・・・・。すごく開発しづらい

タグ

10, 100, ３, 5, 5000, 8000, 980, AndroidStudio, html, IDE, java, javascript, Monaca, Object-C, release, アプリ, いま, おすすめ, コース, サービス, それぞれ, プラットフォーム, フリー, マルチ, もの, モバイル, リリース, 事, 元, 利点, 制作, 前, 対応, 改良, 方, 月, 有料, 無制限, 無駄, 落ち, 落とし穴, 開発,

Accessのさんぷるコードができましたので(´Д｀)貼っときます。

2014.08.21

Logging

突貫工事で作ったのでバグは多少あると思いますが{例えばsql インジェクション対策とか。}、Accessのsampleコードができましたので貼っときます。なお、これで何が出来るかって言えばDBの修正、追加、削除といった基本的な動きをします｛挙動不審ぎみ嘘！？｝。若干、ソースコードを弄くれば使い回しが出来るようにしております。飯くったり他のことをしながらもガリガリとコードを書きました。ちなみにAccessのViewerをマイクロソフトからダウンロードすると動作すると思います。ファイルは下記からダウンロードください。 追記：暇な時に改良していきますので( ﾟдﾟ)ﾉ ﾖﾛｼｸとコメントも暇があれば書いときます。そして無駄なコードがありますが、それも軽量していくつもりです(｀・ω・´)。ちなみにいまはDBを空にすると落ちますので・・・・（直しました。）。?samplezip358.zip?[https://zip358.com/tool/samplezip358.zip][08/21 11:26]

Option Compare Database
Public db_x As Long
Public max As Variant
Function sel_all(tablename As Variant, tal_valname As Variant) As Variant
    Dim x As Long
    Dim y As Long
    Dim sql As String
    Dim RS As DAO.Recordset
    Dim db As DAO.Database
    Dim hoge(999, 999) As Variant
    Dim val_n As Variant
    Dim val As Variant
    Set db = CurrentDb
    sql = "SELECT * FROM " & tablename & " ORDER BY ID ASC;"
    MsgBox sql
    Set RS = db.OpenRecordset(sql)
    Do Until RS.EOF
        For y = 0 To UBound(tal_valname)
            hoge(x, y) = RS.Fields(tal_valname(y))
        Next y
        RS.MoveNext
        x = x + 1
    Loop
    Set db = CurrentDb
    sql = "SELECT MAX(ID) as maxs  FROM " & tablename & ";"
    MsgBox sql
    Set RS = db.OpenRecordset(sql)
    max = RS.Fields("maxs")
    db_x = x - 1
    Set db = Nothing
    sel_all = hoge
End Function
Function up_in(chk As Boolean, tablename As Variant, tal_valname As Variant, tal_val As Variant, ID As Long) As Variant
    Dim sql As String
    Dim RS As DAO.Recordset
    Dim db As DAO.Database
    Dim hoge_valname As String
    Dim hoge_val As String
    Dim hoge As Variant
    If chk = True Then
        For i = 0 To UBound(tal_valname)
            hoge_valname = hoge_valname & tal_valname(i) & ", "
        Next i
        hoge_val = sql_str(tal_val, "", "", True)
        sql = "INSERT INTO " & tablename & " (" & Left(hoge_valname, Len(hoge_valname) - 2) & ")VALUES (" & hoge_val & ");"
    Else
        hoge_valn_val = sql_str("", tal_valname, tal_val, False)
        sql = "Update " & tablename & " Set " & hoge_valn_val & " WHERE ID = " & ID & ";"
    End If
    MsgBox sql
    Set db = CurrentDb
    db.Execute (sql)
    Set db = Nothing
    up_in = True
End Function
Function del(tablename As Variant, tal_valname As Variant, tal_val As Variant) As Variant
    Dim sql As String
    Dim RS As DAO.Recordset
    Dim db As DAO.Database
    Dim hoge As Variant
    sql = "DELETE FROM " & tablename & " WHERE " & tal_valname & " = " & tal_val & ";"
    MsgBox sql
    Set db = CurrentDb
    db.Execute (sql)
    Set db = Nothing
    del = True
End Function
Function sql_str(hoge As Variant, tal_valname As Variant, tal_val As Variant, chk As Boolean) As Variant
    Dim i As Long
    Dim hoge_str As Variant
    If chk = True Then
        For i = 0 To UBound(hoge)
            If IsNumeric(hoge(i)) Then
                hoge_str = hoge_str & hoge(i) & ", "
            Else
                hoge_str = hoge_str & "'" & hoge(i) & "', "
            End If
        Next i
    Else
        For i = 0 To UBound(tal_valname)
            If IsNumeric(tal_val(i)) Then
                hoge_str = hoge_str & tal_valname(i) & " = " & tal_val(i) & ", "
            Else
                hoge_str = hoge_str & tal_valname(i) & " = '" & tal_val(i) & "', "
            End If
        Next i
    End If
    sql_str = Left(hoge_str, Len(hoge_str) - 2)
End Function

↑クラスdbソースコード

Option Compare Database
Dim max As Long
Dim ID As Long
Dim val_val As Variant
Private Sub Form_Load()
lod
End Sub
Sub lod()
    Dim db As db_db
    Dim val_name As Variant
    Dim x As Long
    Set db = New db_db
    val_name = Array("ID", "表題", "数値", "文字")
    val_val = db.sel_all("tableone", val_name)
    max = db.max + 1
    If cmb.ListCount > 0 Then
        For x = 0 To cmb.ListCount - 1
            cmb.RemoveItem 0
        Next
    End If
    For x = 0 To db.db_x
        cmb.AddItem val_val(x, 1)
    Next
    Set db = Nothing
End Sub
Private Sub cmb_Click()
    If cmb.ListIndex >= 0 Then
        Viw cmb.ListIndex
    End If
End Sub
Private Sub del_btn_Click()
    Dim db As db_db
    Dim hoge As Variant
    Set db = New db_db
    val_name = Array("ID", "表題", "数値", "文字")
    If ID > 0 And max > 1 Then
        hoge = db.del("tableone", "ID", ID)
    End If
    Set db = Nothing
    lod
End Sub
Private Sub in_btn_Click()
    Dim db As db_db
    Dim val_name As Variant
    Dim val As Variant
    Dim hoge As Variant
    chkchk
    val_name = Array("ID", "表題", "数値", "文字")
    val = Array(max, cmb, suuzi, moji)
    Set db = New db_db
    hoge = db.up_in(True, "tableone", val_name, val, max)
    Set db = Nothing
    lod
End Sub
Private Sub upd_btn_Click()
    Dim db As db_db
    Dim val_name As Variant
    Dim val As Variant
    Dim hoge As Variant
    chkchk
    val_name = Array("表題", "数値", "文字")
    val = Array(cmb, suuzi, moji)
    Set db = New db_db
    If ID > 0 And max > 1 Then
        hoge = db.up_in(False, "tableone", val_name, val, ID)
    End If
    Set db = Nothing
    lod
End Sub
Sub Viw(i As Long)
    ID = val_val(i, 0)
    suuzi = val_val(i, 2)
    moji = val_val(i, 3)
End Sub
Sub chkchk()
    If IsNumeric(suuzi) Then
        If suuzi > 9999 Then
            suuzi = 9999
        End If
    Else
        suuzi = 0
    End If
    If IsNumeric(moji) Then
        moji = "文字が不正＞" & moji
    End If
    If IsNumeric(cmb) Then
        cmb = "文字が不正＞" & cmb
    End If
End Sub

↑formソースコード

タグ

35, 358, access, db, https, sample, samplezip, SQL, Viewer, www, zip, いま, インジェクション, コード, こと, コメント, これ, サンプル, ソース, それ, ダウンロード, つもり, バグ, ファイル, マイクロソフト, ﾖﾛｼｸ, 下記, 他, 何, 修正, 削除, 動作, 嘘, 対策, 工事, 改良, 時, 暇, 無駄, 空, 突貫, 若干, 軽量, 追加, 追記, 飯,

土佐人｛自作サイト｝、鳴かず飛ばず！？。

2014.08.17

Logging

土佐人｛tosajin.info｝という自動更新サイトをひとつ制作しているのですけど、本当はもっと、まともなポータルなサイトにしたいですね。でも、金ナシ、やる気なしな自分がいます。本当はもっとやりたいことはあるんです。アイデアもいろいろ持っていますが、行動に移すことをしない自分がいます。本当にやる気だけなんですよね。例えば、嫌なことやいやがらせ等をされたりすると直ぐにやる気なくします。そこで頑張ろうとかいう考えは持ちあわせてません？。なにくそというど根性タイプではなく、別にいいや勝手にすればタイプです｛裏では・・・｝、作る気が無くなります。基本的に張り合う気がないのです、論理的に時間の無駄と思えばほっときます。
言いたいことは一応言いますが、ある程度言うこと言ったら終わりです。ちなみにtosajin.infoは当分、このままで放置します。やる気が出たら更新しますが・・・当分このまま運営。いま一つだけ温めているアイデアがあります、そのアイデアのサイトを年内か来年あたりに公開するつもりです。まぁでもその頃、違うことしてそうだけど・・・。
ドメイン所有に関してですが、今後、減らしていく方向で動いています。