Как я могу получить фактические значения поля списка или параметра раскрывающегося списка из этого HTA в текстовый файл?Html

Программисты Html
Anonymous
Как я могу получить фактические значения поля списка или параметра раскрывающегося списка из этого HTA в текстовый файл?

Сообщение Anonymous »

Приложения для повторной публикации, поскольку мои критерии изменились.
Надеюсь, кто-нибудь поможет мне изменить этот скрипт vb, чтобы я мог добавлять значения, выбранные из раскрывающегося списка, чтобы он также отправлял данные в текстовый файл, как например.
Текстовый файл должен отображать, например:

Имя пользователя=значение
Email=value
Title=value
Company=value
Product=value
country=выбранный вариант
region=выбранный вариант

Скрипт ниже взят с этого сайта, но датирован 2007 годом.
https://devblogs.microsoft.com/scriptin ... lues-file/[hey-scripting-guy-how-can-i-save-information -in-an-hta-as-a-tab-separated-values-file](https://devblogs.microsoft.com/scriptin ... lues-file/)
VBSCRIPT
Sub SaveData
Set objFSO = CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists("C:\temp\Test.txt") Then
Set objFile = objFSO.OpenTextFile("C:\temp\Test.txt", 8)

strLine = "username=" & UserName.Value & vbCRLF & "Email=" & Email.Value & vbCrLf & _
"Title=" & Title.Value & vbCRLF & "Company=" & Company.Value & vbCRLF & "Product=" & Product.Value
objFile.WriteLine strLine
objFile.Close
Else
Set objFile = objFSO.CreateTextFile("C:\temp\Test.txt")

strLine = "username=" & UserName.Value & vbCRLF & "Email=" & Email.Value & vbCrLf & _
"Title=" & Title.Value & vbCRLF & "Company=" & Company.Value & vbCRLF & "Product=" & Product.Value
objFile.WriteLine strLine
objFile.Close
End If
End Sub

HTML






COUNTRY



uk
usa
etc
etc


REGION



west midlands
south west
etc
etc





Подробнее здесь: https://stackoverflow.com/questions/798 ... -from-this

Вернуться в «Html»