早速のご回答ありがとうございます。
MySQLは自機（127.0.0.1）で動かしているので問題ないと思っていますが・・・。ちなみにpingは先日pathの設定を触ってから？使用できなくなりました。そんなコマンドありませんと帰ってきます。
Cloceのあとすぐにオープンしているのは前回にSQL_Stringを使っていた場合、いったん閉じるようにしています。このやり方は変だなぁーと思いつつ・・・やはりオーソドックスな「開ける-SQLする-閉じる」でやり変えようと思います。


----- Original Message ----- 
From: "遠藤 俊裕" <endo@xxxxxxxxxx>
To: <ml@xxxxxxxxxx>
Sent: Friday, February 23, 2007 10:37 AM
Subject: [mysql 13756] Re: 処理速度について


> 遠藤と申します。
>
> DNS の設定はおかしくないですか？
> 例えば、そのマシンから「IP アドレス指定ではなく」サーバ
> 宛に ping を飛ばしたらすぐに飛びますか？
>
> ex)
>  ping hostname
>
> あと、VB は全く知らないのですが、Close してすぐさま Open
> するのは、一般的なんでしょうか？
>
> Fri, 23 Feb 2007 10:29:20 +0900 に、
> "Susumu.Hirai" <s_hirai@xxxxxxxxxx> さんは書きました:
>
>> いつもお世話になります。
>> VB6+MySQL+ADOでソフトを構築していますが、処理が遅すぎて困っています。基本的に３つの関数を作って起動したらSQL_StringでSQLを投げて取得するようなやり方をしていますが、★印のあるところで３秒程度かかります。
>> PHP＋MySQLで組む場合と速度が歴然と違いますが、何かいい策はありませんでしょうか？最悪VB6＋MySQL+PHPで組み直そうかと考えていますが・・・。
>>
>> Function SQL_Open()
>>     'SQL接続をオープン
>>     Set DBConn = CreateObject("ADODB.Connection")
>>     Set DBRS = CreateObject("ADODB.Recordset")
>>     DBConn.Open = "DRIVER={MySQL ODBC 3.51 Driver};" + _
>>                                  "SERVER=127.0.0.1;" + _
>>                                  "DATABASE=****;" + _
>>                                  "UID=****;" + _
>>                                  "PASSWORD=****;" + _
>>                                  "useUnicode=true & 
>> characterEncoding=SJIS;"
>> + _
>>                                  "OPTION=16834;STMT=set names sjis"
>> End Function
>>
>> Function SQL_Close()
>>     'SQL接続を閉じる
>>     Set DBRS = Nothing
>>     Set DBConn = Nothing
>> End Function
>>
>> Function SQL_String(strSQL As String) As Object
>>     'SQLを実行してフィールドを返す
>>     On Error Resume Next
>>     DBRS.Close
>>     DBRS.Open strSQL, DBConn '★ココが時間かかる
>>     Set SQL_String = DBRS.fields
>>     On Error GoTo 0
>> End Function
>>
>>
>
> --
> 株式会社あっぷらぼ 代表取締役 遠藤 俊裕
> 〒553-0003 大阪市福島区福島７丁目１４−１８
> 　　　　　 恒和殖産福島ビル４０２号室
> TEL:06-6456-5500 FAX:06-6456-5540
> E-Mail: endo@xxxxxxxxxx, endo@xxxxxxxxxx
> HomePage: http://www.applabo.com/
>
>