「人に実りを！」2008/5/13号

豊作プロジェクトの「人に実りを！」2008/5/13号 です！

 

  続きを読む

今年もらったカレンダー Ver2008用 Vol.6

　イーマイルネットさんよりカレンダーが届いた。ありがとうございます。

　客室乗務員さんの写真の卓上カレンダー。２００８年はこれを机に置こうと思う。

　みな素敵な方たちばかりである。

　イーマイルネットさんはマイレージスクエアを運営されている。もちろんＪＡＬのマイルがたまるサイトである。

　今年参加させていただいた東宝映像事業部さんの某年パーティーの大ビンゴ大会で豊作プロジェクトから出した品は、このマイレージスクエアで販売している

デバイススタイルさんのアジャスタブルポップアップトースター TA-2S

　であった。

　Ｇｅｔいただいた方に喜んでもらえたと思う。

　購入時にもちろんマイルをためさせていただいた（笑）

 

  

今年もらったカレンダー Ver2008用 Vol.5

　ＮＴＴＩＴ　さんからカレンダーが届いた。

　その名の通りパーソナルで使いやすそう。

　卓上型である。

　

 

[PR]
ショッピングカートの豊作くんカートサービス
青汁は青汁のダイショーで
アガリクスは健康市場のアガリクス
九州、福岡 求人 アルバイトは折込のパコラ

 

  

クリスマスイブ

　今日はクリスマスイブ。
　中野駅前のケンタッキーフライドチキンに列が出来ていた。
　我が家のそばの「栄楽」さんも長蛇の列。栄楽さんはクリスマスとは関係ない。

　先日知人に子供が生まれた。おめでとうございます！母子共に健康との事。ちなみに・・・秋田の誕生日は１月８日、嫁の誕生日は１２月２６日。秋田も嫁も子供のころ、クリスマスと誕生日プレゼントは一緒に丸められていた。きっと知人の子もそのようになるのであろう。同じ思いをする子供が増えた（苦笑）

　クリスマスイブにブログを書いている秋田も寂しいが、目の前で仕事をしてくれている嫁に感謝。
　さあ、秋田もブログ書くのやめて仕事しなきゃ・・・おっと・・・クリスマスイブだって。

 

  

携帯サイトに google map

　先日ライブハウスドットコム ってサイトの携帯向けコンテンツに google map を追加した。
http://www.livehouse.com/ へ携帯端末でアクセスしながらこのサイトを見てもらえればと思う。

　今回は、これを忘れないためにブログに書き記すと共に、誰かの役に立てればと思う。

　はじめに、google map を利用するには、Google Maps API の key 取得しなければならない。これに関しては、「Google Maps API key 取得」等で google 検索等で調べてもらい、 key を取得してほしい。

　次に、携帯でGoogle map を利用するとなると、JavaScript が使えないので、各プログラムからHTTPにて値を取得したりしなければならない。ソケットとかソープとか・・・そんな感じのものである。
　php や perl 等を使った事があれば問題ない。秋田の場合、VBScript が得意なので、VBScript （old asp）で作った。なるべく言語に依存しないように書くつもりである。

　プログラムの流れとしては、
　１、住所情報を Google に投げて、緯度と経度を教わる。
　２、緯度と経度を Google に投げて、地図イメージをもらい画面表示する。

　これだけである。

　１、で緯度と経度を取得する
　http://maps.google.co.jp/maps/geo?q=東京都中野区中野&output=xml&key=自分のgoogleKey
　このように値を投げると、XMLにて情報を返してくれる。
　q=住所（ビル名は入れると結果が戻らない）
　output=xml このままxml としておくのがよい
　key=自分のgoogle Key

　緯度と経度は <coordinates></coordinates> の中にカンマ区切りで入ってくる。
　３ヶ目（2）に「0」があるが、これはよくわからない。
　カンマ区切りの緯度と経度がこれで取得出来る。
　ここまではソケット通信などと呼ばれる技術になる。
　普通にブラウザのURL入力欄に入れてアクセスすると状況がわかる。
　これを試してからプログラムをいじるとイメージが湧きやすい。

　２、地図イメージをもらう
　こちらは単純に <img src=> でリクエストする。
　http://maps.google.com/mapdata? に以下の引数を渡してあげる
　w=もらう地図の横幅
　h=もらう地図の縦幅
　cc=jp（言語　jp のままでよい）
　min_priority=1（優先度　１のままで良い）
　latitude_e6=緯度
　longitude_e6=経度
　zm=地図のズームサイズ
　Point=b マーカー指定開始b のまま
　Point.latitude_e6=緯度座標
　Point.longitude_e6=経度座標
　Point.iconid=16 マーカーのアイコンを指定
　Point=e マーカー指定終了e のまま

　これらを & で繋いで<img> タグで呼び出す。
　マーカーは複数指定できるが、携帯画面なのであまり指定しても・・・って感じなので、複数指定は割愛する。このページに辿りつくまでに色々と情報を見たと思うので、そちらで見てもらえればと思う。

　若干適当な所もあるが、以下に old asp のコードを記しておく。
　もし使うのであれば、自己責任でお願いしたい。

************************************************************************************

<img src=<%=googlemapMb(txt,googlekey,errcod,mpzm,mpw,mph)%>>>

Function googlemapMb(txt,googleKey,errcod,mpzm,mpw,mph)
 '日本語住所からGoogle map API で緯度、経度を取得し、
 '携帯で利用できる地図を取得する

 'txt 検索される住所
 'googleKey = google のキー
 'errcod = エラーコード
 'mpzm = 地図のズーム
 'mpw  = 地図の幅
 'mph  = 地図の高さ

 On Error Resume Next

 '緯度、経度取得のための url 作成
 dim url
 url = "http://maps.google.co.jp/maps/geo?" & _
    "q=" & txt & _
    "&output=xml" & _
    "&key=" & googleKey

 'オブジェクトの作成
 Dim objXMLHTTP,objXML,ReturnData
 Set objXMLHTTP = Server.CreateObject("Msxml2.ServerXMLHTTP")

 'ソケット通信
 objXMLHTTP.open "GET", url, false
 objXMLHTTP.Send

 'ソケット通信状況を見る
 if objXMLHTTP.status = "200" then
  ReturnData = objXMLHTTP.responseText
  'response.write ReturnData
 else
  errcod = "1" '通信エラー
  googlemapMb = errcod
  exit function
 end if

 If Err <> 0 Then
  errcod = "2" 'システムエラー
  googlemapMb = errcod
  exit function
 else
 end if

 Set objXMLHTTP = nothing

 On Error GoTo 0

 

 '取得した XML より緯度経度を取得する
 dim fTxt,eTxt
 'response.write InStr(lcase(ReturnData),"<coordinates>")
 'response.write InStr(lcase(ReturnData),"</coordinates>")

 if InStr(lcase(ReturnData),"<coordinates>") > 0 and InStr(lcase(ReturnData),"</coordinates>") > 0  Then
  fTxt = InStr(lcase(ReturnData),"<coordinates>")
  eTxt = InStr(lcase(ReturnData),"</coordinates>")
 Else
  errcod = "3" '緯度、経度取得エラー
  googlemapMb = errcod
  exit function
 End if

 'データ取得
 ReturnData = Replace(ReturnData,"<coordinates>","")
 dim coordinates: coordinates=mid(ReturnData,fTxt,eTxt)
 dim coordinates_Array
 coordinates_Array = Split(coordinates,",")

 '緯度、経度はカンマで区切られていて、配列要素は3ヶ。
 'Ubound して 2 以外はエラーなので、エスケープする
 if Ubound(coordinates_Array) <> 2 Then
  errcod = "4" '緯度、経度取得エラー
  googlemapMb = errcod
  exit function
 end if

 dim latitude  '緯度
 dim longitude '経度

 latitude = trim(coordinates_Array(1))
 longitude = trim(coordinates_Array(0))

 'response.write latitude & "<br>"
 'response.write longitude

 '必ず数字型なので、それを調べる。
 '数字方ではない場合、失敗しているのでエラーとする
 if IsNumeric(latitude) and IsNumeric(longitude) Then
 else
  errcod = "5" '緯度、経度取得エラー
  googlemapMb = errcod
  exit function
 end if

 latitude = replace(latitude,".","")
 longitude = replace(longitude,".","")

 '地図情報のURLを返す
 rtn = ""
 rtn = "http://maps.google.com/mapdata?" & _
    "w="             & mpw & _
    "&h="             & mph & _
    "&cc=jp"          & _
    "&min_priority=1" & _
    "&latitude_e6="    & latitude & _
    "&longitude_e6="  & longitude & _
    "&zm="            & mpzm & _
    "&Point=b"        & _
    "&Point.latitude_e6="  & latitude & _
    "&Point.longitude_e6=" & longitude & _
    "&Point.iconid=16" & _
    "&Point=e"

 googlemapMb = rtn

end Function

 

 

  

ちゃんこ浅瀬川で忘年会

　いや〜早いですなぁ〜
　豊作プロジェクトの忘年会しちゃいました。

　場所は秋田の幼馴染がやっている「ちゃんこ浅瀬川」親父さんが昔浅瀬川という力士だった。

　鶏がらスープで野菜たっぷり。すごく旨い。
　飲んで、食った後にお母さんが作ってくれるおじやがまた格別。

　年に１回〜２回程来ている。

　この冬、もう一回くらい来たいなぁ〜

  

酉の市に行ってきた

ちょっと遅めの報告であるが酉の市にて熊手を買ってきた。

今年は二の酉までしかないので、祭日にお酉様へ行き熊手を購入。

毎年同じ店で買う。今年も豊作プロジェクトの札を用意してくれていた。旦那も元気そう。一年に一回、熊手を買うときだけ会う。お互いに元気な姿を見て、来年も元気で会おうと思う。

さて、この熊手。どのくらいかき集めてくれるかな？

 

  

ネットショップでの商品の取り扱い

　豊作プロジェクトスタッフが作ってくれた豊作くんカートサービスのコンテンツを紹介したい。
　かなり詳しいコンテンツなので、ネットショップを開業したい方、すでに運営されている方等、一読いただければと思う。


　コンテンツのメインページは、
　ネットショップでの商品の取り扱いについての知識

　このコンテンツの中に、以下のコンテンツがある。

　ネットショップでの中古品取り扱い
　└中古品を扱う時の注意事項等、古物免許取得の事等、一通り読んでいただければ古物扱いの為の方法がわかる

　ネットショップでの食品の取り扱いについて
　└食品衛生や食品衛生法等。ネットショップで食品を扱う、扱っている場合は一読いただければと思う


　ネットショップでのアルコールの取り扱いについて
　└通信販売酒類小売業免許等、そうなんだ。って感じである。

　ネットショップでの輸入の取り扱いについて
　└植物防疫法や食品衛生法等、輸入物はかなり規制がある。商品毎に届出を行う必要があるものがある。輸入品を扱う場合は、知っておかなければならない事が結構ある。


　これらコンテンツは、ライターさんを雇って書いた物ではなく、スタッフが独自に調べて書いた物である。ばあいによっては、関係各所に問い合わせ等を行って書いてもらった。
　これからネットショップを始める方々に、様々な知識を持ったスタッフが手厚いサポートが行えるようになっていくのが何より嬉しい。

  

ショッピングカートコラム

ショッピングカートの豊作くんカートサービスページの新しいコンテンツ　ショッピングカートコラムも始まった。

ショッピングカート,ネットショップ,オンラインショップについてのコラムである。

ここは・・・多分、秋田がメインで担当する事になると思うが、スタッフにもバリバリ書いてもらいたい。


ショッピングカートコラム
　└レンタル型のショッピングカートについて
　└ネットショップの構築について
　└ネットショップの運営について



  

新しいコンテンツ

コンテンツは秋田が書いたのではなく、スタッフが色々と調査して書いてくれた。
ネットショップ開業に役立つコンテンツが盛りだくさん。
ネット通販を始める方の不安を少しでも取り除けたら嬉しい。
スタッフに感謝である。

以下各コンテンツページへのリンクである。
興味のある項目にアクセスいただければ幸いである。



■お申し込みから正式利用までの流れ

■ネットショップを開業しよう
　└商品の取り扱いについての知識等
　　└中古品（古物）の取り扱いについて
　　└食品の取り扱いについて
　　└アルコールの取り扱いについて
　　└輸入品の取り扱いについて
　　└動物（ペット）の取り扱いについて

　└提出書類（事業の開業届け等）を作成等
　　└個人事業の開業届を作りましょう
　　└個人事業の開始申請書（事業開始等申告書）を作りましょう
　　└所得税の青色申告承認申請書を作りましょう

　└決済方法を選択等
　　└代金引換について
　　└銀行振込について
　　└コンビニ決済について
　　└クレジット決済について

　└「特定商取引法」の表示義務事項等
　　└基本情報（販売業者・運営統括責任者など）
　　└お支払い方法について
　　└商品のお届けについて
　　└商品の代金以外の料金について
　　└商品の返品・交換について
　　└個人情報保護方針について