Values can be bounded in same manner everywhere. Read about variables.
You already have this
Dim PartsDesc
PartsDesc = request.querystring("partsdesc")
<%
Response.Write "<label for = 'partsTxtBox' class = 'col-sm-4 col-form-label' name='"& PartsDesc &"'>" & PartsDesc & " </label>"
%>
where PartsDesc
is your variable, that has the value. If this is the required value for the email body then move the following line to be after the code where the value is assigned and use it in same manner
objMessage.TextBody=objMessage.TextBody & PartsDesc & ": " & Request("Parts") & vbCrLf
If all now works as expected, read about XSS.
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…