テキストエディットボックスの内容を「変数」に取得するにはどうすればよいですか?こんにちは、
変数を手動で変更する代わりの方法を探しています ("検査ロット") スクリプト自体の中にあります。
以前のストリップ:
Names Default To Here( 1 );
Open Database(
"DBQ=X:...
WHERE User1 LIKE '%Inspection Lot%'", "HSS"
);
これを試してみました - 以下ですが、機能しません。 スクリプトは実行されていますが、「変数」が使用されていません。 おそらくフォーマットに何か問題があると思われます。 アドバイスを求めています。
ありがとう。
新しいスクリプトのバージョン:
Names Default To Here( 1 );
win = New Window( "Edit Box - Enter the Inspection Lot",
<<MODAL></MODAL>
Re: テキストエディットボックスの内容を「変数」に取得するにはどうすればよいですか?どうもありがとうございます - 私の最初のダイアログ ボックスは機能しました - とても幸せです!!! 
Re: テキストエディットボックスの内容を「変数」に取得するにはどうすればよいですか?このフォーラムに投稿する際のいくつかの提案:
- コードをインデントします (右クリック > [スクリプトの再フォーマット])
- ボタンを使用してコードをフォーラムに貼り付けます。構文の色が保持されます
あなたの問題に移りましょう。私のコードは、テキスト ボックスに値が入力されたかどうかを確認します。そこに値がある場合は、変数を使用して SQL 文字列を作成します。 SQL 、そして Open Database を呼び出します。コードでは、その中に IF コマンドを使用してオープン データベースを呼び出します。それはうまくいきません。
このコードを試してください:
If( tbox_value != "",
sql = Eval Insert(
"SELECT TRBallShearHSBTTSF.Sample, Test, ....
FROM TRBallShearHSBTTSF INNER JOIN SSBallShearHSBTTSF
ON TRBallShearHSBTTSF.Sample = SSBallShearHSBTTSF.Sample
WHERE User1 LIKE '%^tbox_value^%'");
);
dsn_string = "DBQ=X:\- ...HS.mdb;DefaultDir=X:\- ...;Driver={Driver do Microsoft Access (*.mdb)};DriverId=..;FIL=MS Access;FILEDSN=X:\...dsn;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;";
Open Database(dsn_string, sql, "HSS-Dage 4000");
);
Re: テキストエディットボックスの内容を「変数」に取得するにはどうすればよいですか?こんにちは、
素早いご返信ありがとうございます。 残念ながら、私はプログラミングについてあまり知識がなく、まだ苦労しています - 以下を参照してください。
申し訳ありませんが、「IF コマンド」をどこに置くのか理解できませんでした。
Open Database(
"DBQ=X:\- ...HS.mdb;DefaultDir=X:\- ...;Driver={Driver do Microsoft Access (*.mdb)};DriverId=..;FIL=MS Access;FILEDSN=X:\...dsn;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;",
If( tbox_value != "",
sql = Eval Insert(
"SELECT TRBallShearHSBTTSF.Sample, Test, ....
FROM TRBallShearHSBTTSF INNER JOIN SSBallShearHSBTTSF
ON TRBallShearHSBTTSF.Sample = SSBallShearHSBTTSF.Sample
WHERE User1 LIKE '%^tbox_value^%'",
"HSS-Dage 4000"
)
)
);Re: テキストエディットボックスの内容を「変数」に取得するにはどうすればよいですか?テキストエディットボックスの変数を「texteditbox」と呼んでいます。これは許可されていますが、適切なプログラミング方法ではありません。テキストエディット ボックスに入力した値を使用する方法は次のとおりです。
Names Default To Here( 1 );
tbox_value = "";
win = New Window( "Edit Box - Enter the Inspection Lot",
<<MODAL></MODAL>
ABC と入力すると、ログに次のように表示されます。
sql = "SELECT foo, bar
FROM utopia
WHERE User1 LIKE '%{ABC}%'";
