ハムさん、こんにちは。

＞この状態はDBの接続情報に誤りがある為、正しい情報を要求する画面が出てくる状態で
＞ODBCのデフォルトの動作です。
＞エラーがあった場合にODBCの画面を出さなくする場合には、sqlca.dbparm にオプション
＞を指定します。（ConnectOptionパラメータ　詳細はオンラインヘルプで確認してください）
＞
＞If sle_userid.text <> trim(\"YID\") Then 
＞errflg = 1
＞End if
＞If sle_password.text <> trim(\"YPA\") Then
＞errflg = 1
＞End if
＞if errflg = 1 then return
＞//--------データベースの接続環境----------------
＞//sqlca = CREATE transaction   //SQLCAはグローバル変数です
＞sqlca.DBMS = ProfileString (ls_startupfile, \"database\", \"dbms\",\"\")
＞SQLCA.DBParm = \"ConnectString=\'DSN=EAS Demo DB V3;UID=\" +sle_userid.text  + \";PWD=\" + 
＞sle_password.text + \";\',ConnectOption=\' 
＞SQL_DRIVER_CONNECT,SQL_DRIVER_NOPROMPT\'\"
＞//ODBCではユーザID,パスワード、データソースは全てDBParmで指定します。
＞//--------初期ウィンドウのOPEN判定 --------------
＞//if errflg = 0 Then
＞connect using SQLCA;  //DB接続を行います
＞if sqlca.SQLCode <> 0  then　//DB接続はSQLCodeプロパティで判断します
＞   return  //処理を中断します
＞end if
＞OPEN (w_1)
＞
＞といったコーディングとなります
＞
＞

処理が上手くいきました。
ありがとうございました。