189477_de-DE

liliconcom

Wie bekomme ich den Inhalt des Textbearbeitungsfelds in eine „Variable“?

Hallo,

Ich suche nach einer Alternative zur manuellen Variablenänderung (" Inspektionslos ") im Skript selbst.

 

ehemaliges Drehbuch:

 

Names Default To Here( 1 );
Open Database(
"DBQ=X:...
WHERE User1 LIKE '%Inspection Lot%'", "HSS"
);

 

 

Ich habe es versucht - siehe unten, aber es funktioniert nicht. Das Skript läuft, aber die „Variable“ wurde nicht verwendet. Wahrscheinlich stimmt etwas mit dem Format nicht. Ich suche Rat.

Danke schön.

 

neue Skriptversion:

 

Names Default To Here( 1 );
win = New Window( "Edit Box - Enter the Inspection Lot",
<<MODAL></MODAL>

 

Betreff: Wie bekomme ich den Inhalt des Textbearbeitungsfelds in eine „Variable“?

Vielen, vielen Dank – mein erstes Dialogfeld funktioniert – ich bin so glücklich!!!

Betreff: Wie bekomme ich den Inhalt des Textbearbeitungsfelds in eine „Variable“?

Ein paar Vorschläge für Beiträge in diesem Forum:

 

• Den Code einrücken (Rechtsklick > Skript neu formatieren)
• Fügen Sie den Code über die Schaltfläche in das Forum ein.Dadurch bleiben die Syntaxfarben erhalten

 

Weiter zu deinem Problem.Mein Code prüft, ob ein Wert in das Textfeld eingegeben wurde.Wenn dort ein Wert vorhanden ist, wird mithilfe der Variablen eine SQL-Zeichenfolge erstellt sql und ruft dann Open Database auf.Ihr Code ruft die offene Datenbank mit dem darin enthaltenen IF-Befehl auf.Das wird nicht funktionieren.

 

Probieren Sie diesen Code aus:

 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");
);

Betreff: Wie bekomme ich den Inhalt des Textbearbeitungsfelds in eine „Variable“?

Hallo,

vielen Dank für Ihre schnelle Antwort. Leider weiß ich nicht viel über Programmierung und habe immer noch Probleme – siehe unten:

 

Entschuldigung – ich habe nicht verstanden, wo ich den „IF-Befehl“ platzieren soll.

 

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"
  )
 )
);

Betreff: Wie bekomme ich den Inhalt des Textbearbeitungsfelds in eine „Variable“?

Sie rufen die Variable für Ihre Texteditbox „texteditbox“ auf, was zulässig ist, aber keine gute Programmierpraxis darstellt.So verwenden Sie den im Textbearbeitungsfeld eingegebenen Wert:

Names Default To Here( 1 );
tbox_value = "";
win = New Window( "Edit Box - Enter the Inspection Lot",
 <<MODAL></MODAL>

Wenn ich ABC eingebe, zeigt das Protokoll Folgendes:

sql = "SELECT foo, bar
   FROM utopia
WHERE User1 LIKE '%{ABC}%'";