三流君 ken3のmemo置き場

メモ置き場、保管庫として利用。まとまっていませんがヨロシク

挨拶・自己紹介:
失敗続きのAB型の変わり者 :三流プログラマー Ken3です
フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 現在は小さな案件の受注請負 と 短期派遣 で 日々つつましく?ほそぼそと暮らしてます。
(※詳細は[三流君 三流プログラマーとは?]を見てください)


広告:


[記事一覧、バックナンバーを見る]

メールでブックマークが簡単にできるみたいです。

いままで、使っていなかったのが不思議なんだけど、
メールでブックマークが簡単にできるみたいです。

ブックマークを投稿する - はてなブックマークヘルプ
http://b.hatena.ne.jp/help/basic

マニュアル読まないとなぁ(笑)

B2に送り先、
B3に [区分]を付けて、

本文に
URL + 区分 + 固定文字 + タイトル
の1行を送ると、登録できるみたいです。
※B3に" 脳内を自分語で垂れ流した これはひどい 解説動画:" を 付けて、Youtubeの動画URLを少しアップしてみます。

    'メールアイテムの作成
    Set objMAIL = oApp.CreateItem(0) 'olMailItem=0 直値はいけないと思いつつ、
    objMAIL.display   '画面表示(Mail入力、編集画面を表示)

    '宛先・件名・本文 などのデータを代入する
    objMAIL.To = Trim(Range("B2"))           '宛先 ほかに.cc や.Bccも可能です
    
    objMAIL.Subject = Trim(Range("B3")) & " " & Trim(Cells(yy, "B"))  '.Subjectに文字列設定で件名
    
    '本文を作る、(URL + [区分]内容)
    strMOJI = Cells(yy, "C") & " " & Trim(Range("B3")) & " " & Trim(Cells(yy, "B"))
    DoEvents

    objMAIL.body = strMOJI                 '本文の代入
    DoEvents
    Application.Wait (Now + TimeValue("0:00:02"))

    objMAIL.send   '送信箱へ ※直ちに送信にして、連続で送るoutlook2007
    DoEvents
    Application.Wait (Now + TimeValue("0:00:05"))



三流君へ メッセージを送る

全ての質問に答えることはできませんが、
ダメもとで、気軽に質問、感想、メッセージを送ってくださいね・・・

感想や質問・要望・苦情など 三流君へメッセージを送る。
下記のフォームからメッセージを送ることができます。


あなたのお名前(ニックネーム):さん
返信は?:

アドレス:に返事をもらいたい
感想や質問↓:


(感想や質問・要望・苦情はHPで記事に載せることがあります。)
例:[XXXXさんへ回答例]←みたいに回答していたり...


Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。
・[Excel/Access VBA]の解説
・[ASP(Active Server Pages)]の解説。
・[元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
・[プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
三流君を踏み台にする
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。

三流解説動画の再生リスト
https://www.youtube.com/user/ken3video/playlists

本当に三流なんです(笑):たまにスゴイですねなんて言われることもありますが、
真実は→ [三流君の真実は...] ←を初めに見てくださるとわかると思います。
(からくりは、成功例↑しか載せてなくて ヒドイ失敗例はお蔵入り迷宮入りが多かったりします)