« パンク修理前の失敗 | トップページ | 28インチ車 チューブ交換 »

2013年4月13日 (土)

受注画面

自転車出張修理の為の受注画面をご紹介します。

Jyutyuu 受注時の顧客データ登録画面です。

電話での受注がメインですので、電話番号の検索と顧客名の検索を持っています。

ドコモとソフトバンクの携帯をつなぐと、着信時に電話番号から登録済みの顧客データを表示します。

新規顧客の場合、住所の入力は電話しながら住所を入力できるよう、マウスで、住所を選択できるようになっています。

住所を入力すると顧客先までのルートを表示します。

 

 

Jyusyo 住所データは郵便番号データダウンロードサイトを利用しています。

都市名、町名の先頭のローマ字、町名で絞り込んでいきます。

ルート表示は、下記のVBA構文で実現しています。

Dim objIE As Object

    Set objIE = CreateObject("InternetExplorer.Application")
    objIE.Visible = True
    objIE.Navigate "http://maps.google.co.jp/maps?f=d&source=s_d&saddr=" & Me.Lv_自宅 & "&daddr=" & Me.住所 & "&dirflg=d"
       
    Do While objIE.busy = True
        DoEvents
    Loop

« パンク修理前の失敗 | トップページ | 28インチ車 チューブ交換 »

Access 業務管理」カテゴリの記事

コメント

コメントを書く

(ウェブ上には掲載しません)

トラックバック


この記事へのトラックバック一覧です: 受注画面:

« パンク修理前の失敗 | トップページ | 28インチ車 チューブ交換 »

スライムパンク防止剤被害

川越市周辺の自転車屋MAP

埼玉県内出張修理店情報

自転車出張修理のブログ

カテゴリー

無料ブログはココログ

ブログランキング