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

[Anonymous]

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

Код: Выделить всё

Username = value
Email    = value
Title    = value
Company  = value
Product  = value
country  = option selected
region   = option selected

Приведенный ниже сценарий взят с этого сайта, но датирован 2007 годом:

Как сохранить информацию в HTA в виде файла значений, разделенных табуляцией
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

ОБНОВЛЕНИЕ №1
Ниже приведен полный код HTA для пояснения.

Код: Выделить всё

Save as txt File
Index


Подробнее здесь: [url]https://stackoverflow.com/questions/79874035/how-can-i-get-the-actual-values-of-a-list-box-or-dropdown-list-option-from-this[/url]