Passing Variables

[Guest_imported]

Please help, I am tring to pass field names from a text box to a variable, and then replace a field on my output file with whatever the field entered in the text box is, but it is replaceing the output field with the field name.

ex. they enter F1 in text box txtName

lcName = alltrim(ThisForm.txtName.Value)

select input
Scan while !eof()
scatter memvar
select output
replace Output.Name with (lcName)
select input
Endscan


well, thats basically it, but that replaces Output.Name with "F1" instead of the contents of Input.F1.

Thanks in advance

-BIBON

-Mike

 

[Guest_imported]

P.S.

I though about doing a textmerge to a .prg file and then calling that program, but that seems like the hard way to do it.....

 

[DSummZZZ]

If I am understanding correctly, try:

variable = ThisForm.txtName.name
REPLACE (variable) WITH ALLTRIM(ThisForm.txtName.Value)

ThisForm.txtName.Name must be the same name as the table field though.

Dave S.

 

[longda]

try expanding the variable by using the amphresand in front of the variable name

replace Output.Name with (&lcName)

this will be the equivalent of this:

replace Output.Name with (F1)

hope this what you were asking and it helps you with your problem

longda

 

[weedz]

The condition in the SCAN ENDSCAN being WHILE !EOF() is redundand and can be left out !!
SCAN ENDSCAN automatically scan throught the records and stops with the last record. Leaving out the condition will speed things up.

You store the value of your textbox in a variable.

if your variable would be "TestValue"

Your replace statement would be:

REPLACE myField WITH "TestValue", so if your variable would be:

MyVariable = "TestValue"

YOur replace statement would be:

REPLACE myField WITH MyVariable

leaving out the brackets !!.

HTH,
Weedz (Wietze Veld)
My private project:

http://www.crowncap.demon.nl\info\crwnbase

Download the CrownBase source code !!