Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Anyone know if u can put values from a textfile back in to a form?
- Thread starter mijulie
- Start date
sure -
but there's no easy way to do it.
1) Use the FSO Object to read in the file contents.
2) Depending on how it's being stored, do an InStr or RegEx for the key/value pair that you are looking for
3) get that value, store it in a variable, then output that to the form.
But - if you're storing the file as a CSV, or any other delimited file, you might be able to access it as a recordset.
See
hope this helps
leo
but there's no easy way to do it.
1) Use the FSO Object to read in the file contents.
2) Depending on how it's being stored, do an InStr or RegEx for the key/value pair that you are looking for
3) get that value, store it in a variable, then output that to the form.
But - if you're storing the file as a CSV, or any other delimited file, you might be able to access it as a recordset.
See
hope this helps
leo
- Thread starter
- #3
I have a separate html file written for inputting the values from the textfile (this is just the start of it!) The file name i used is valid and contains the variable being passed in to the Binary text box. When i run this however the Binary textbox contains the actual word contents. I think it could be the script commands/html tags are maybe in the wrong place. Can anyone see what the problem might be?
<HTML>
<HEAD>
<H1>SIT_TEST_CIT: Build Validation</H1>
<SCRIPT LANGUAGE="VBSCRIPT">
sub d1_onclick
set readfile = filesys.OpenTextFile("F:\Corktest\Sit\Cit\tpota163 - pcplod - (22-05-01 ).txt", 1, false)
contents = readfile.Read(Buildform.TheBinary.Value)
readfile.close
end sub
</SCRIPT>
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<FORM NAME=BuildForm>
<BR><BR>
<B>Binary:</B>
<INPUT TYPE = TEXT
Name=TheBinary Value=contents SIZE=15>
<HTML>
<HEAD>
<H1>SIT_TEST_CIT: Build Validation</H1>
<SCRIPT LANGUAGE="VBSCRIPT">
sub d1_onclick
set readfile = filesys.OpenTextFile("F:\Corktest\Sit\Cit\tpota163 - pcplod - (22-05-01 ).txt", 1, false)
contents = readfile.Read(Buildform.TheBinary.Value)
readfile.close
end sub
</SCRIPT>
</HEAD>
<BODY BGCOLOR="#FFFFFF">
<FORM NAME=BuildForm>
<BR><BR>
<B>Binary:</B>
<INPUT TYPE = TEXT
Name=TheBinary Value=contents SIZE=15>
- Status
Similar threads
- Locked
- Question
- Locked
- Question