こんにちは。
業務で、発行した宅配伝票番号を入力し、その出荷状況をインターネットの荷物追跡などで調べたいと思っています。
結果については、集荷店より出荷したか(「伝票未登録」の状態でないかどうか)だけを判別できればいいのですが、これらの結果を、インターネット上から一括で取得する方法はないでしょうか?
たとえば、100件分くらいの出荷データで、まだ出荷しているものと出荷していないものが混在しているデータがあり、これを一括でどこかに送ったり、もしくは何らかの処理(CSVアップロード?)をすると、「未出荷」「出荷済み」のフラグを返してくれるというようなしくみが理想です。
発伝する場所と出荷場所、出荷時期が異なるため、このような仕組みを必要としています。
最終的には、access2000にその結果データを取り込んで、出荷管理をしたいと思っています。
なにかよい方法がありましたらご教授ください。
No.2ベストアンサー
- 回答日時:
さて、いくつかの大きな問題を抱えていますが、
こういうのはどうでしょう。
・ Access でフォームを作成します。
・ 「挿入」-「ActiveX コントロール」にて
「Microsoft Web Browser」を貼り付けます。
・ 貼り付けたコントロールの名前を WebBrowser0 とします。
・ 適当にボタンを作成し、名前を Command0 とします。
・ ボタンの「イベント」-「クリック時」
に対応するコード作成画面に入ります。
・ 下記のようなコードを書きます。
Private Sub Command0_Click()
Dim strData As String
Dim bData() As Byte
strData = "no1=1234567890&act=1"
ReDim bData(Len(strData) - 1)
bData = StrConv(strData, vbFromUnicode)
WebBrowser0.Navigate2 "http://k2k.sagawa-exp.co.jp/cgi-bin/Sagawa.webcg … , , bData, "Content-type: application/x-www-form-urlencoded"
End Sub
・ 以上、準備出来たらフォームを開いて、ボタンを押してみます。
> strData = "no1=1234567890&act=1"
この10桁の番号がちゃんとした「お問い合わせNo」なら
結果が得られるかもしれません。
このように佐川急便のインターネットによる荷物追跡
サービスを利用して、取り込む方向性があります。
ただ問題点は
■ サービスを提供する CGI の仕様を勝手に解析して
利用しているので、このような利用が禁じられる
可能性があり、そうでなくても仕様を変えられると
こちらもその度にプログラムを変更しないといけない。
ということがあります。
さて、これでうまくいった場合
Private Sub WebBrowser0_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Text = WebBrowser0.Document.documentElement.outerHTML
End Sub
のプログラムで、返ってきた HTML を取得することが
できます。この HTML から「未出荷」「出荷済み」の
情報を抽出できれば、完成です。
さて、この二つのプログラムを、データベースに保存
してある、すべてのお問い合わせNo について実行し
その結果をレコードに書き込めは、出荷状況をデータベースに
取り込むことが可能になります。
# その前に、佐川さんややまとさんに
#「インターネット上から一括で取得する方法は
# ないでしょうか?」と相談するのがよいかと・・・
No.1
- 回答日時:
ヤマト運輸は送り状発行ソフトを利用した場合、伝票ナンバーから簡単に出荷済みか否かをチェック出来ます。
データはCSV,XML等のデータで落とせるようです・・・が、逆はどうでしょう・・・難しいかなあ。
結局、運送会社のデータベースにアクセスしてやらなければ出荷済みか否かの状況はチェック出来ないので、独自の形式のデータで処理しようと言うのは結構難しいと思います。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
wordの差込印刷(ラベル作成)...
-
Google form グーグルフォーム...
-
PDF 入力途中で改行したい
-
「ドゥ」の簡単なローマ字入力方法
-
エクセルの表を選択し、「画像...
-
ワードにて スペースを全て改行...
-
一太郎の日本語入力について
-
Wordを一太郎に変換
-
Office Word [ここに入力] が...
-
濁点のつく字が入力出来ないと...
-
googleカレンダーの予定を入力...
-
一太郎をワードに変換
-
あいうえおかきくけこさしすせ...
-
A4のレポート用紙1枚で2000文字...
-
ワードで住所の漢数字番地の縦...
-
1MBでドレくらいの文章を書くこ...
-
エクセルでセル未入力時の初期...
-
Notionが、テーブルビューを一...
-
作ったマクロを複数のシートで...
-
Excel csvから開くと上限文字数...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
wordの差込印刷(ラベル作成)...
-
差込印刷の逆?をしたい
-
F-TRANをAccessで使用したいの...
-
cactiでのデータ取得
-
質問:ブッシングVプーリのC...
-
漫画喫茶でお客様がPCでコミッ...
-
ヤマト運輸・佐川急便などの荷...
-
【至急】みんなの青色申告21...
-
フォトショップエレメンツ8.0の...
-
複合機でスキャンしたデータの...
-
下記のようなHP作成に必要な知...
-
Google form グーグルフォーム...
-
「ドゥ」の簡単なローマ字入力方法
-
PDF 入力途中で改行したい
-
googleカレンダーの予定を入力...
-
1MBでドレくらいの文章を書くこ...
-
エクセルの表を選択し、「画像...
-
ワードにて スペースを全て改行...
-
エクセルでセル未入力時の初期...
-
一太郎をワードに変換
おすすめ情報