simple blog いろいろ勉強中 へのコメント http://www.simple-sys.com/blog いろんなサイトから勉強のネタを拾ってきて独学中です Fri, 25 Jun 2010 02:54:17 +0000 hourly 1 http://wordpress.org/?v=3.0.1 admin より 注文メールの内容をサーバーから受信しExcelに取り込む仕組みのサンプル へのコメント http://www.simple-sys.com/blog/2008/04/14/337/comment-page-1/#comment-71 admin Fri, 25 Jun 2010 02:54:17 +0000 http://www.simple-sys.com/blog/?p=337#comment-71 ひめさん、こんにちは。 ご返事遅くなりました。 サンプルメールの件、大変申し訳ございません。 空メールの機能が正常に動作していませんでした。 今は正常に動いておりますので、改めて 空メールを送ってみてください。 なにか不明なところがありましたら、コメントまたは toi@simple-sys.com までメールください。 ひめさん、こんにちは。

ご返事遅くなりました。

サンプルメールの件、大変申し訳ございません。
空メールの機能が正常に動作していませんでした。

今は正常に動いておりますので、改めて
空メールを送ってみてください。

なにか不明なところがありましたら、コメントまたは
toi@simple-sys.com
までメールください。

]]> ひめ より 注文メールの内容をサーバーから受信しExcelに取り込む仕組みのサンプル へのコメント http://www.simple-sys.com/blog/2008/04/14/337/comment-page-1/#comment-70 ひめ Sat, 19 Jun 2010 07:07:28 +0000 http://www.simple-sys.com/blog/?p=337#comment-70 はじめまして。(^-^) あちこち検索していてたどり着きました。 このサンプル、今私が職場でやりたいこととぴったり一致しています！ （ネットショッピングではありませんが。。。） 日々届くメールの中から、特定のメールの特定の箇所を抜き出して 別のネットワークにあるACCESSにメールの情報を読込みたいと 考えています。 サンプルメールを頂きたく空メールを送信したのですが URLが届きません・・・。(T-T) VBAはまったくわからない素人ですが あちこち見てがんばってみます。 はじめまして。(^-^)

あちこち検索していてたどり着きました。
このサンプル、今私が職場でやりたいこととぴったり一致しています！
（ネットショッピングではありませんが。。。）

日々届くメールの中から、特定のメールの特定の箇所を抜き出して
別のネットワークにあるACCESSにメールの情報を読込みたいと
考えています。

サンプルメールを頂きたく空メールを送信したのですが
URLが届きません・・・。(T-T)

VBAはまったくわからない素人ですが
あちこち見てがんばってみます。

]]> admin より Yahoo!地図情報でFLASH版APIでのルート再生のxml作成支援 へのコメント http://www.simple-sys.com/blog/2008/03/13/60/comment-page-1/#comment-69 admin Sun, 16 May 2010 21:37:22 +0000 http://www.simple-sys.com/blog/?p=60#comment-69 プログラムとDBを復旧させました。 ぜひ、ご利用ください。 プログラムとDBを復旧させました。
ぜひ、ご利用ください。

]]> admin より Yahoo!地図情報でFLASH版APIでのルート再生のxml作成支援 へのコメント http://www.simple-sys.com/blog/2008/03/13/60/comment-page-1/#comment-68 admin Sat, 15 May 2010 05:30:57 +0000 http://www.simple-sys.com/blog/?p=60#comment-68 ご利用いただきありがとうございます。 申し訳ございません、現在サーバーの乗せ変え作業中で一部コンテンツが利用できなくなっております。 順次復旧させていただきますので、申し訳ございませんがしばらくお待ちください。 よろしくお願いいたします。 ご利用いただきありがとうございます。
申し訳ございません、現在サーバーの乗せ変え作業中で一部コンテンツが利用できなくなっております。
順次復旧させていただきますので、申し訳ございませんがしばらくお待ちください。

よろしくお願いいたします。

]]> 大村 より Yahoo!地図情報でFLASH版APIでのルート再生のxml作成支援 へのコメント http://www.simple-sys.com/blog/2008/03/13/60/comment-page-1/#comment-67 大村 Tue, 11 May 2010 08:43:12 +0000 http://www.simple-sys.com/blog/?p=60#comment-67 Ｆｌａｓｈ版ＡＰＩのルート再生のxml作成に御社サイトを 利用させていただいていました。 しばらく、中断していてはじめようと思っていたら ページがなくなっていて残念です。 また復活していただければ幸いです。 Ｆｌａｓｈ版ＡＰＩのルート再生のxml作成に御社サイトを
利用させていただいていました。

しばらく、中断していてはじめようと思っていたら
ページがなくなっていて残念です。

また復活していただければ幸いです。

]]> admin より VBAのお勉強　住所の文字列→緯度・経度を求める へのコメント http://www.simple-sys.com/blog/2008/04/06/301/comment-page-1/#comment-65 admin Wed, 14 May 2008 03:45:12 +0000 http://www.simple-sys.com/blog/?p=301#comment-65 YONさん、再度コメントありがとうございます（＾＾） APIの利用規約については、どこまでが許されてどこからが許されないのか、いまいちよく分からないんですよ（＾＾；） 私の場合、お客様に提供する場合など商用として使う場合は有料サービスを選択しています。個人で使用する場合は、WEBで公開する場合はAPIを使い、公開しない場合は今回取った方法を使う、という感じで使い分けています。 これでよいのかも分かりませんが(＾＾；) ところで、サンプルソース、ありがとうございます（＾＾） 直接IEを呼び出してフォームに値を代入する、という方法ですね。 これなら文字コードとか、気にしなくて良いのかな？ 後でじっくり読ませていただきます。 ありがとうございました（＾＾） YONさん、再度コメントありがとうございます（＾＾）

APIの利用規約については、どこまでが許されてどこからが許されないのか、いまいちよく分からないんですよ（＾＾；）
私の場合、お客様に提供する場合など商用として使う場合は有料サービスを選択しています。個人で使用する場合は、WEBで公開する場合はAPIを使い、公開しない場合は今回取った方法を使う、という感じで使い分けています。
これでよいのかも分かりませんが(＾＾；)

ところで、サンプルソース、ありがとうございます（＾＾）
直接IEを呼び出してフォームに値を代入する、という方法ですね。
これなら文字コードとか、気にしなくて良いのかな？

後でじっくり読ませていただきます。
ありがとうございました（＾＾）

]]> YON より VBAのお勉強　住所の文字列→緯度・経度を求める へのコメント http://www.simple-sys.com/blog/2008/04/06/301/comment-page-1/#comment-64 YON Tue, 13 May 2008 10:10:07 +0000 http://www.simple-sys.com/blog/?p=301#comment-64 そうですね。けちをつけてすみませんでした。 ところで、今日ひまだったので、私もhttp://map.yahoo.co.jp/のﾍﾟｰｼﾞから 経度・緯度をExcel表に書き込むVBAを別の手法で作ってみました。 VBから、「CreateObject("InternetExplorer.Application")」で、ブラウザーを操作して、表示内容を取り込む手法です。IE6.0でないとだめみたいです。 http://www.happy2-island.com/vbs/cafe02/capter00701.shtml を参考にしました。 以下ソースです。 Sub ie_set() Set objIE = CreateObject("InternetExplorer.application") objIE.Visible = True Range(Cells(1, 2), Cells(Range("A65536").End(xlUp).Row, 3)).Cells.Value = "" For i = 1 To Range("A65536").End(xlUp).Row Step 1 address = Cells(i, 1).Value objIE.navigate "http://map.yahoo.co.jp/" Do While objIE.Busy = True DoEvents Loop Do While objIE.readyState 4 DoEvents Loop Title = objIE.LocationName 'MsgBox strTitle objIE.document.forms(1).Item("search_module__qbox").Value = address objIE.document.forms(1).Item("search_module__pbox").Value = address objIE.document.forms(1).Item("search_module__bexec").Click Do While objIE.Busy = True DoEvents Loop Do While objIE.readyState 4 DoEvents Loop chk = objIE.LocationName Do While chk = Title chk = objIE.LocationName DoEvents Loop Title = objIE.LocationName Do While objIE.Busy = True DoEvents Loop Do While objIE.readyState 4 DoEvents Loop result_str = objIE.document.links(20).href Cells(i, 2).Value = Mid(result_str, Application.WorksheetFunction.Find("lat=", result_str, 1) + 4, 11) Cells(i, 3).Value = Mid(result_str, Application.WorksheetFunction.Find("lon=", result_str, 1) + 4, 12) Next i End Sub そうですね。けちをつけてすみませんでした。
ところで、今日ひまだったので、私もhttp://map.yahoo.co.jp/のﾍﾟｰｼﾞから
経度・緯度をExcel表に書き込むVBAを別の手法で作ってみました。
VBから、「CreateObject(“InternetExplorer.Application”)」で、ブラウザーを操作して、表示内容を取り込む手法です。IE6.0でないとだめみたいです。
http://www.happy2-island.com/vbs/cafe02/capter00701.shtml
を参考にしました。
以下ソースです。
Sub ie_set()
Set objIE = CreateObject(“InternetExplorer.application”)
objIE.Visible = True
Range(Cells(1, 2), Cells(Range(“A65536″).End(xlUp).Row, 3)).Cells.Value = “”
For i = 1 To Range(“A65536″).End(xlUp).Row Step 1
address = Cells(i, 1).Value
objIE.navigate “http://map.yahoo.co.jp/”
Do While objIE.Busy = True
DoEvents
Loop
Do While objIE.readyState 4
DoEvents
Loop
Title = objIE.LocationName
‘MsgBox strTitle
objIE.document.forms(1).Item(“search_module__qbox”).Value = address
objIE.document.forms(1).Item(“search_module__pbox”).Value = address
objIE.document.forms(1).Item(“search_module__bexec”).Click
Do While objIE.Busy = True
DoEvents
Loop
Do While objIE.readyState 4
DoEvents
Loop
chk = objIE.LocationName
Do While chk = Title
chk = objIE.LocationName
DoEvents
Loop
Title = objIE.LocationName
Do While objIE.Busy = True
DoEvents
Loop
Do While objIE.readyState 4
DoEvents
Loop
result_str = objIE.document.links(20).href
Cells(i, 2).Value = Mid(result_str, Application.WorksheetFunction.Find(“lat=”, result_str, 1) + 4, 11)
Cells(i, 3).Value = Mid(result_str, Application.WorksheetFunction.Find(“lon=”, result_str, 1) + 4, 12)
Next i
End Sub

]]> admin より VBAのお勉強　住所の文字列→緯度・経度を求める へのコメント http://www.simple-sys.com/blog/2008/04/06/301/comment-page-1/#comment-63 admin Tue, 13 May 2008 05:26:15 +0000 http://www.simple-sys.com/blog/?p=301#comment-63 YONさん、コメントありがとうございます(＾＾) 私自身APIを使用する上での規約は自分なりの解釈でしかないので、正しいかどうかは不明です。 ひょっとしたら、APIを用いてローカルでExcel上で取り込んでも問題ないのかもしれません。 詳細はYahoo！さんまたはGoogleさんにご確認ください。 YONさん、コメントありがとうございます(＾＾)

私自身APIを使用する上での規約は自分なりの解釈でしかないので、正しいかどうかは不明です。
ひょっとしたら、APIを用いてローカルでExcel上で取り込んでも問題ないのかもしれません。
詳細はYahoo！さんまたはGoogleさんにご確認ください。

]]> YON より VBAのお勉強　住所の文字列→緯度・経度を求める へのコメント http://www.simple-sys.com/blog/2008/04/06/301/comment-page-1/#comment-62 YON Tue, 13 May 2008 04:35:38 +0000 http://www.simple-sys.com/blog/?p=301#comment-62 　　API利用の規約についての解釈が釈然としません。 この例でも、結局、Yahoo!地図情報のﾍﾟｰｼﾞを仲介して、Yahooのｻｰﾋﾞｽで緯度・経度を表示させ、勝手に自分のローカルなエクセルにデータを取り込んでいるではないですか？ 　Excel→API→Excel　は、だめでも 　Excel→WebページでAPI発行→Webページの結果→Excel　なら 規約違反にならないという解釈なら、そもそもExcelやVBからは直接 APIを発行出来ない（できるのかしら？）ので、YahooやGoogleの提供 ｻｰﾋﾞｽの結果をローカルなExcelファイルに取り込んではならないこと になりませんか。 　ちなみに私は、ローカルなWebページ（単なるHTMLファイル）を作って その中にGoogleMapのAPI利用したJavaScriptを作っておき、Excelから VBでそのﾍﾟｰｼﾞを操作して、自分のExcel表に緯度・経度を取り込んでいます。これって規約に反するのでしょうか？自分のExcelで利用するためには、このローカルなWebページをインターネット公開するだけでよいのかしら？ インターネット公開するだけで、自分のExcelで使ってよくなるのでしょうか？ 　　API利用の規約についての解釈が釈然としません。
この例でも、結局、Yahoo!地図情報のﾍﾟｰｼﾞを仲介して、Yahooのｻｰﾋﾞｽで緯度・経度を表示させ、勝手に自分のローカルなエクセルにデータを取り込んでいるではないですか？
　Excel→API→Excel　は、だめでも
　Excel→WebページでAPI発行→Webページの結果→Excel　なら
規約違反にならないという解釈なら、そもそもExcelやVBからは直接
APIを発行出来ない（できるのかしら？）ので、YahooやGoogleの提供
ｻｰﾋﾞｽの結果をローカルなExcelファイルに取り込んではならないこと
になりませんか。
　ちなみに私は、ローカルなWebページ（単なるHTMLファイル）を作って
その中にGoogleMapのAPI利用したJavaScriptを作っておき、Excelから
VBでそのﾍﾟｰｼﾞを操作して、自分のExcel表に緯度・経度を取り込んでいます。これって規約に反するのでしょうか？自分のExcelで利用するためには、このローカルなWebページをインターネット公開するだけでよいのかしら？
インターネット公開するだけで、自分のExcelで使ってよくなるのでしょうか？

]]> admin より VBAのお勉強　メールの取り込み へのコメント http://www.simple-sys.com/blog/2008/04/04/289/comment-page-1/#comment-61 admin Sun, 06 Apr 2008 20:39:36 +0000 http://www.simple-sys.com/blog/?p=289#comment-61 ictaさま、コメントありがとうございます。 また、質問にもお答えいただき、ありがとうございました。 ＞これでメールの内容を手作業に頼らず完全に取り込むことが可能になりました。 無事動いて何よりです（＾＾） ＞もしCSVなどでデータをダウンロードすれば月額1000円とデータ100件を超える ＞部分につき1件あたり10円（消費税別）の追加利用料がかかるようにようになっています。 なるほど。。。それでは件数にもよるとは思いますが、毎月固定+αの料金を支払うのは、馬鹿馬鹿しいですね。 ＞興味はあるのですが、メールが楽天だけではなく自社ドメインもあり、取り込みが複雑すぎる ＞のと、実際に運用するのがエクセルの知識のほとんどないアルバイトなので躊躇しております。 ＞メールの内容も多少変更があったりして柔軟に対応しにくくなるのを恐れています。 確かに作りこんでしまえばしまうほど、変更があったときにその対応が鈍くなってしまうのはありますね。イレギュラーのことを考えても、ある程度の手作業は逆に残しておくべきなのかもしれません。 ＞本当はファイルメーカーなどでリレーショナルデータベースを組みたいのですが、末端の ＞スタッフが新しいものについてこられないので数万行になった今日でもエクセルで運用 ＞している次第です。 一日に処理をする件数が手作業でも追いつける件数であれば、このままエクセルでの運用を お勧めします。ただ、件数が増えてきた場合や、過去のデータも含めての運用などをお考えでしたら、さすがにエクセルではきついですので、データベースが必要ですね。 逆にデータベースなどでシステム化してしまうと、作り方にもよりますが、「ボタン１つで取り込み」など、実際に操作される方の作業は楽で簡単なものにはなるかと思います。 ＞もしよろしければ今回ご回答いただいた内容をhatenaに投稿していただけませんでしょうか？ （＾＾；）あくまで、私はエクセルの勉強中なので、あまり自信を持ってhatenaに投稿できるプログラムではないのですよ。エクセルのプロの方からしてみたら、今回のプログラムはとてもエクセルらしからぬ使い方をしているので。。。 データベースを使った仕組みつくりにはある程度精通しているので自信を持った回答が出来るのですが。。。（＾＾；） 今回はこちらも大変勉強になりました。色々教えていただき、ありがとうございました。 ictaさま、コメントありがとうございます。
また、質問にもお答えいただき、ありがとうございました。

＞これでメールの内容を手作業に頼らず完全に取り込むことが可能になりました。

無事動いて何よりです（＾＾）

＞もしCSVなどでデータをダウンロードすれば月額1000円とデータ100件を超える
＞部分につき1件あたり10円（消費税別）の追加利用料がかかるようにようになっています。

なるほど。。。それでは件数にもよるとは思いますが、毎月固定+αの料金を支払うのは、馬鹿馬鹿しいですね。

＞興味はあるのですが、メールが楽天だけではなく自社ドメインもあり、取り込みが複雑すぎる
＞のと、実際に運用するのがエクセルの知識のほとんどないアルバイトなので躊躇しております。
＞メールの内容も多少変更があったりして柔軟に対応しにくくなるのを恐れています。

確かに作りこんでしまえばしまうほど、変更があったときにその対応が鈍くなってしまうのはありますね。イレギュラーのことを考えても、ある程度の手作業は逆に残しておくべきなのかもしれません。

＞本当はファイルメーカーなどでリレーショナルデータベースを組みたいのですが、末端の
＞スタッフが新しいものについてこられないので数万行になった今日でもエクセルで運用
＞している次第です。

一日に処理をする件数が手作業でも追いつける件数であれば、このままエクセルでの運用を
お勧めします。ただ、件数が増えてきた場合や、過去のデータも含めての運用などをお考えでしたら、さすがにエクセルではきついですので、データベースが必要ですね。

逆にデータベースなどでシステム化してしまうと、作り方にもよりますが、「ボタン１つで取り込み」など、実際に操作される方の作業は楽で簡単なものにはなるかと思います。

＞もしよろしければ今回ご回答いただいた内容をhatenaに投稿していただけませんでしょうか？

（＾＾；）あくまで、私はエクセルの勉強中なので、あまり自信を持ってhatenaに投稿できるプログラムではないのですよ。エクセルのプロの方からしてみたら、今回のプログラムはとてもエクセルらしからぬ使い方をしているので。。。

データベースを使った仕組みつくりにはある程度精通しているので自信を持った回答が出来るのですが。。。（＾＾；）

今回はこちらも大変勉強になりました。色々教えていただき、ありがとうございました。

]]>