佐藤と申します。

初めての投稿です。
MYSQLの問題ではないかも知れませんが、御教授頂ければと思い投稿しました。

MYSQL実行環境は下記の通りです。

クライアント
OS:WIN2000SP2
ツール：VB6.0SP5

サーバー
NT4.0SP6.0
MYSQL VER4.0.12

ここで、PERLのDB更新用ファイル（クライアント側に存在）を、
クライアントのＶＢプログラムからSHELL関数を使用して、起動すると
うまくDBの更新ができません。実行前後でDB側は何もかわらず、
エラーメッセージも表示されません。

ＤＯＳ環境からこのPERLファイルを実行すると当然うまく更新のですが、
プログラム側からは実行できないのでしょうか？

-------- PERLファイル TEST.PL
use DBI;

$db = DBI->connect('DBI:mysql:temp:172.16.86.87','root','12345');
$sth = $db->prepare("INSERT INTO MOI VALUES ('NULL','2003/05/23','19891','ASI3','RH7-
1472-000000','RH7-1472 12345','2003/03/20','2400','2');");
$sth->execute;

$sth = $db->prepare("SELECT * FROM MOI");
$sth->execute;

$num_rows = $sth->rows;
print "$num_rows 件見つかりました。\n";

$sth->finish;
$db->disconnect;

--------- ＶＢ６．０ファイル

Private Sub Command1_Click()
    Dim I As Integer
    
    I = Shell("c:\perl\bin\perl test.pl", 3)
    MsgBox "実行結果=" & I
End Sub

※Ｉはプログラムのタスクコードで、きちんとエラー以外（０以外）の
実行結果が代入されて返ってきます。

-------------
Sato Hiroyuki