@Blog
日常日誌からプログラムやYOUTUBER紹介、旅日記まで日々更新中です。
砂浜美術館Tシャツアート展2016へ行ってきました(｀・ω・´)、 #砂浜美術館Tシャツアート展2016
2016.05.01
砂浜美術館Tシャツアート展2016へ行ってきました。
去年、今度は電車で行くようにしようと書いていましたが
今回は車で行くことにしました。
朝、３時ぐらいに起き３時３０分ぐらいには
家を出てたと思います。これぐらい早く行けば独り占めできると
内心思っていたのですが、甘かった！！
５時半ぐらいには砂浜Tシャツアート展の駐車場に着いたのですが
もう一つの駐車場はほぼ満席でした。
朝、朝陽（日の出）とともにTシャツアートを撮りたいと
思っているカメラ小僧さんは他にもいたっていう・・・事です。
結構、女性の若い子もいました。
で、自分もパシャパシャカメラにTシャツアートを撮ってきました。
ちなみに、今日の朝は無風だったので
なびいているTシャツは撮れなかったですが、
その分、Tシャツのそれぞれの作品を見ることが出来て良かったです。
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
2016, ３, 30, 5, AM-z, com, https, watch, www, youtube, アート, カメラ, こと, これぐらい, シャ, シャツ, それぞれ, パシャパ, もう一つ, 事, 今回, 今度, 今日, 他, 作品, 分, 半, 去年, 女性, 子, 家, 小僧, 日の出, 朝, 朝陽, 満席, 無風, 独り占め, 砂浜, 美術館, 自分, 車, 電車, 駐車場,
Windows10のコンピューターが毎日特定の時刻にスリープ状態から復帰するよ！？なぜ
2016.03.12
Windows10のコンピューターが毎日特定の時刻にスリープ状態から復帰するよ！？なぜ
ＡＮＳＷＥＲ
Windows Media Center の更新機能が自動的に開始されるときに発生します。ということです。
この問題を解決するには下記のURLをクリックして、手順に従ってスケジューラから変更等を行ってください。
https://support.microsoft.com/ja-jp/kb/979878
このようにスリープ状態から勝手に起動するようなソフトがインストールされている場合があるので注意してください。今回は、マイクロソフト社のソフトでしたが他のソフトでもこのような設定になっている場合があるので、気をつけてください。また、スケジュールに設定する事によって起動時にソフトを起動することや曜日によってソフトを起動するなどの設定するなどの設定を追加することも可能です。
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
10, 979878, ＡＮＳＷＥＲ, Center, com, https, ja-jp, kb, media', microsoft, support, url, Windows, インストール, クリック, こと, コンピューター, スケジューラ, スケジュール, スリープ, ソフト, とき, マイクロソフト社, 下記, 事, 今回, 他, 勝手, 可能, 問題, 場合, 変更等, 復帰, 手順, 時刻, 曜日, 更新, 機能, 毎日, 気, 注意, 特定, 状態, 発生, 解決, 設定, 起動, 追加, 開始,
弱者に優しくない会社は無くなるだろうか？。
2016.03.08
弱者に優しくない会社は無くなるだろうと言う事を聞いたことがある。
SNSなどの普及に伴い、誰でも情報を発信できるようになってきている。
ある意味、弱者の反撃みたいなものがいろいろな所で起きているような気がします。
昔は会社でなぁなぁで済ませてきたことが済ませなくなってきているようにも思えます。
健全な社会であれば良いのかという疑問を自分は持っています。いま何もかも正しいことが正義という風潮に
なってきているけど、本当は白黒付けずにグレーぐらいが良いんじゃないかなと思う所があります。
何もかもアメリカよりになってきている世の中、いまの社会がこのまま、うまく行く（経済成長する）とは
自分はどうも思えないのです。
何処かに歪みができて、その歪が大きくなり亀裂になってしまうように思えてなりません。
日本に合わないものを無理して受け入れても最終的には駄目だったという様になるのではないでしょうか？
派遣が良い例で、結局、日本では非正規社員より正社員が良いという事になり政府も派遣から正社員雇用を推し進めているわけですから・・・。
要するになぁなぁ具合の方が日本には合ってるのでは無いかと自分は思います。
日本語は曖昧な表現が多いことからも言えます。
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
2, 5, com, GOrw, https, ozg-B, SNS, watch, www, youtube, アメリカ, いま, いろいろ, グレー, こと, このまま, もの, 世, 中, 亀裂, 事, 会社, 何もかも, 何処か, 健全, 反撃, 弱者, 情報, 意味, 成長, 所, 日本, 昔, 普及, 本当, 正義, 歪, 気, 無理, 疑問, 発信, 白黒, 社会, 経済, 自分, 誰, 風潮, 駄目,
the presentっていう短編アニメが( ´∀｀)bｸﾞｯ!とくる。
2016.01.30
the presentっていう短編アニメが( ´∀｀)bｸﾞｯ!とくる。
ココロのお話ですね。こういうお話は良いなと感じます。
https://vimeo.com/152985022
こういうストーリーが描けちゃう人は、そういう経験が
少なくともある人なんだろうなと思ってしまいます。
そういう経験がないとそういう発想には至らないだなと
感じるので・・・・。
?
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
-GA, 16, 8, 89, com, HARUHI, https, uDE, watch, www, youtube, アーティスト, アイチューンズ, ｲｲ, オリコン, ミュージシャン, ランキング, 上映, 世界, 主題歌, 圧巻, 映画, 映画館, 曲, 歌唱力, 歌声, 猫, 線,
FF15がヤバい事になってる…(・・)
2015.10.04
FF15（ファイナルファンタジー15）の体験版がヤバい事になってるけど凄いなコレ、どんだけお金をつぎ込んでいるだ。
是非ともPC版も出して欲しい所です。PS4で購入するつもりでいるけど何だか、アクションRPGみたいになってるみたいだからアクションが不得意な自分にとってはクリアするのに一年ぐらいかかりそうな気がします。
おそらく、スクウェア・エニックスは開発以上の収益は得られそうにない気がします。もしくは赤字ポッい
タイトルですね、当初のリリース日から延期に延期と…いつになったら発売されるだみたいな事になってますから。
おそらく、FF16とかその他のRPGなんかにも汎用性あるように開発しているだろうから
長期的にみれば元は取れるだろうとは思いますが、このFF15、１タイトルだけでは開発費用は回収できそうにないですね。
発売されれば購入するつもりでいます。おそらく来年辺りには発売されるだろうなと思っています。それまで貯蓄して待っときます。
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
１, 15, 16, 4, FF, https, PC, PS, RPG, アクション, いつ, エニックス, お金, クリア, コレ, スクウェア, その他, それまで, タイトル, つもり, ファイナルファンタジー, リリース, 一, 不得意, 事, 体験, 元, 収益, 回収, 延期, 当初, 所, 来年, 気, 汎用性, 版, 発売, 自分, 貯蓄, 費用, 購入, 赤字, 開発,
速報 平成27年度、春期 基本情報技術者の午前の解答はこちら。(^^ゞ
2015.04.19
速報 平成27年度、春期?基本情報技術者の解答です。試験お疲れ様でした、今回は残念だったひとは次回頑張ってください。私なんて受けてもないですから次回、合格するつもりで今からコツコツと勉強するつもりでいます。基本情報の合格率は25％?30％なんですから落ちてもめげることはないかと思います。頑張らない程度に頑張りましょう(^^ゞ
追記：2015/10/18
http://www.o-hara.ac.jp/best/jyoho/sokuhou/kihon1510.pdf??平成27年度、秋期?基本情報技術者 解答リンク
下の解答はあくまでも私的解答ですので上記のリンクを目安にしてください。
平成27年度、秋期?基本情報技術者 解答
——————————————————————-
https://twitter.com/zip358com/status/655657591243014144
https://twitter.com/zip358com/status/655657623119790082
https://twitter.com/zip358com/status/655657651645231104
https://twitter.com/zip358com/status/655657651645231104
https://twitter.com/zip358com/status/655657680388751360
https://twitter.com/zip358com/status/655657710759776256
?
https://twitter.com/zip358com/status/655657744175898624
https://twitter.com/zip358com/status/655657782046121984
?
https://twitter.com/zip358com/status/655657814828822528
——————————————————————-
平成27年度、秋期?基本情報技術者 解答
https://twitter.com/zip358com/status/589707472874508288
https://twitter.com/zip358com/status/589707546807508992
https://twitter.com/zip358com/status/589707588360491009
https://twitter.com/zip358com/status/589707621638115329
https://twitter.com/zip358com/status/589707651241521153
https://twitter.com/zip358com/status/589707693696241665
https://twitter.com/zip358com/status/589707724042043392
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
-------------------------------------------------------------------, 10, 1510, 18, 2015, 25, 27, 30, ac, best, http, https, jp, jyoho, kihon, o-hara, pdf, sokuhou, twi, www, こちら, こと, つもり, ひと, リンク, 上記, 今, 今回, 勉強, 午前, 合格, 基本, 平成, 情報, 技術者, 春期, 次回, 残念, 目安, 私, 秋期, 程度, 解答, 試験, 追記, 速報,
【 #映画 】マエストロ観てきましたのでレビュー書いときますけど(´・ω・｀)
2015.02.19
朝、仕事行く前にマエストロを観てきましたのでレビューなんかを書いときますけど、おすすめ度はあまり高くないです。全体的に低予算で撮られている感じがします。ごく普通の映像なんですけど徐々に、それが違和感なく感じてきます（そういう映画だという感じ）。そして、この映画は下ネタが多いです。西田敏行さんが演じるマエストロが下ネタ連呼します・・・・。
映画の内容は良くも悪くもない感じです。いまひとつスパイスの足りなかった感が自分には残りました。ちなみに映画のテンポは結構良い方だと思います。長いという印象は受けなかったです。トイウコトデ、そんな感じの映画でした。
?
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
-eohDY, 2, 4, ch, com, https, watch, www, youtube, おすすめ, スパイス, それ, テンポ, トイウコトデ, マエストロ, レビュー, 下ネタ, 予算, 仕事, 内容, 前, 印象, 感, 感じ, 方, 映像, 映画, 普通, 朝, 自分, 西田敏行, 連呼, 違和感,
Accessのさんぷるコードができましたので(´Д｀)貼っときます。
2014.08.21
突貫工事で作ったのでバグは多少あると思いますが{例えば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ソースコード
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
35, 358, access, db, https, sample, samplezip, SQL, Viewer, www, zip, いま, インジェクション, コード, こと, コメント, これ, サンプル, ソース, それ, ダウンロード, つもり, バグ, ファイル, マイクロソフト, ﾖﾛｼｸ, 下記, 他, 何, 修正, 削除, 動作, 嘘, 対策, 工事, 改良, 時, 暇, 無駄, 空, 突貫, 若干, 軽量, 追加, 追記, 飯,
映画：時をかける少女：タイム・ウェイツ・フォー・ノー・ワン
2014.08.19
タイム・ウェイツ・フォー・ノー・ワン{time waits for no one}=過ぎ去った時間は戻らないとかいう意味らしいです。この時をかける少女というアニメ映画はよく出来ているなと思います。内容の方は記載しませんが、結構おすすめ度の高いアニメ映画です。過ぎ去った時間は戻らないけど、未来は自分で切り開けます。この映画は過去に何度もタイムスリップして過去を書き換えていますが、実際、この世界は多次元｛たぶん｝なので、タイムスリップして過去を変えたとしてもそこから、次元が分岐するというオチ｛突っ込みどころ(´Д｀)｝。過去に何度もタイムスリップするということは多次元世界（パラレルワールド）を複数つくる事になるのではないかと自分は思っています。そんな身も蓋もない事を考えて観なければ良いだけですね｛※この映画、時をかける少女、青春アニメ映画は面白かったです｝。
ちなみに、多次元世界の話でうまく説明している映画があります、ミッション: 8ミニッツ（ソースコード）と言う映画で何度も過去に戻って爆弾処理（何度も失敗する）をするというストーリーです、コレを観ると多次元世界と時間との関係をうまく説明しているように思えます。
時をかける少女もおすすめですが、映画、ミッション: 8ミニッツもおすすめ度の高い映画です。
著者名
@taoka_toshiaki
※この記事は著者が30代前半に書いたものです．
Profile
高知県在住の@taoka_toshiakiです、記事を読んで頂きありがとうございます.
数十年前から息を吸うように日々記事を書いてます．たまに休んだりする日もありますがほぼ毎日投稿を心掛けています😅．
SNSも使っています、フォロー、いいね、シェア宜しくお願い致します🙇.
SNS::@taoka_toshiaki
タグ
com, For, ge-CeHgimHU, https, no, one, time, waits, watch, www, youtube, アニメ, ウェイツ, おすすめ, オチ, こと, スリップ, そこ, タイム, ノー, パラレルワールド, フォー, ワン, 世界, 事, 何度, 内容, 分岐, 多次元, 実際, 少女, 意味, 方, 映, 映画, 時, 時間, 未来, 次元, 自分, 蓋, 複数, 記載, 身, 過去, 青春,