katsuoさん、こんにちは。

＞rtn_code = GetFileOpenName(title,pathname,filename, \"txt\",\"Text Files (*.TXT),*.TXT,\")
＞dw_1.DataObject = dw_name
＞dw_1.SetTransObject(SQLCA)
＞dw_1.Retrieve()
＞dw_1.Reset()
＞rtn_code = dw_1.ImportFile( pathname )
＞
＞integer rtn
＞
＞CONNECT USING SQLCA;
＞

これって、同じイベント内でのスクリプトですよねぇ？
あのう・・・ここでCONNECTすると、エラーになりませんか？
RetrieveしたすぐあとにResetをかけているのも意味がよくわかりませんし。

＞dw_1.SetTransObject(SQLCA)
＞rtn = dw_1. Update()

SetTransObject関数やUpdate関数の戻り値、CONNECTしたときのエラーは、検証しましたか？
SQLCA.SQLCodeやSQLCA.SQLDBCode、DBErrいべんとの引数などは、検証されていませんでしょうか？
どんなエラー内容かは、その辺りを調べれば、大体察しがつくんですけど。