Я создаю страницу обратной связи, которая просит пользователя выбрать, что он думает о своей тренировке. Они могут оценить обслуживание как «Отлично», «Хорошо» или «Плохо». Я видел некоторые подобные вопросы, которые касаются только того, если что-то было проверено, и в этом случае было сказано, что он объявляет явное значение. который, я думаю, мог бы работать для ответа «да». Но как насчет того, когда у вас есть несколько вариантов?
Не уверен, где мой сценарий VB неверен.
почтовые программы/training_feedback_send.asp
<html>
<head>
<%
Sub ProcessContact
Response.Buffer = true
dim gRating, gTrainerKnowledgeable, gNotKnowl, gTrainingExperience, gTrainingMaterials, gRateUI, gTs150Perform, gTs150NonPerformReason, gRestorationsAttempted, gRestorationsSuccessful, gRestorationsUnsuccessful, gFeatureChange, gFutureUpdates, gPurchasingMotivation, gAdditionalQuestions, gContactRequest, gFullName, gEmail
gRating = Request.Form("Rating")
gTrainerKnowledgeable = Request.Form("TrainerKnowledgeable")
gNotKnowl = Request.Form("gNotKnowl")
gTrainingExperience = Request.Form("TrainingExperience")
gTrainingMaterials = Request.Form("TrainingMaterials")
gRateUI = Request.Form("RateUI")
gTs150Perform = Request.Form("Ts150Perform")
gTs150NonPerformReason = Request.Form("Ts150Perform")
gRestorationsAttempted = Request.Form("RestorationsAttempted")
gRestorationsSuccessful = Request.Form("RestorationsSuccessful")
gRestorationsUnsuccessful = Request.Form("RestorationsUnsuccessful")
gFeatureChange = Request.Form("FeatureChange")
gFutureUpdates = Request.Form("FutureUpdates")
gPurchasingMotivation = Request.Form("PurchasingMotivation")
gAdditionalQuestions = Request.Form("AdditionalQuestions")
gContactRequest = Request.Form("ContactRequest")
gFullName = Request.Form("FullName")
gEmailAddress = Request.Form("EmailAddress")
msg = msg & "How would you rate the overall effectiveness of the on-site training?: " & gRating & chr(10)& chr(13)
msg = msg & "Did you feel that the trainer was knowledgeable on the product and answered your questions to your satisfaction? If not, explain why: " & gTrainerKnowledgeable & chr(10)& chr(13)
msg = msg & "Did you feel that the trainer was knowledgeable on the product and answered your questions to your satisfaction? If not, explain why: " & gNotKnowl & chr(10)& chr(13)
msg = msg & "How would you rate your training experience on a scale of 1 - 5, where 1 is poor and 5 is excellent?: " & gTrainingExperience & chr(10)& chr(13)
msg = msg & "Do you find the published training materials helpful?(quickstart guide, tutorials, etc.): " & gTrainingMaterials & chr(10)& chr(13)
msg = msg & "How would you rate the user interface (GUI) in terms of ease of use and clarity of information?: " & gRateUI& chr(10)& chr(13)
msg = msg & "Does the TS-150 perform as you anticipated? " & gTs150Perform & chr(10)& chr(13)
msg = msg & "If not, in what way is the performance different?: " & gTs150NonPerformReason & chr(10)& chr(13)
msg = msg & "How many restorations have you attempted?: " & gRestorationsAttempted & chr(10)& chr(13)
msg = msg & "How many were successful?: " & gRestorationsSuccessful & chr(10)& chr(13)
msg = msg & "Please describe the problems on any unsuccessful restorations. For example, did they fail to mill? Did they not seat well? Were there problems with the material?: " & gRestorationsUnsuccessful & chr(10)& chr(13)
msg = msg & "Are there any features of the TS150 that you would change? If so what would they be?: " & gFeatureChange & chr(10)& chr(13)
msg = msg & "What features would you like to see in future updates to the design software and mill software?: " & gFutureUpdates & chr(10)& chr(13)
msg = msg & "What was your primary motivation for purchasing IOS products?: " & gPurchasingMotivation & chr(10)& chr(13)
msg = msg & "Do you have additional questions or would you like additional training?: " & gAdditionalQuestions & chr(10)& chr(13)
msg = msg & "Would you like to be contacted as a follow-up to this survey?: " & gContactRequest & chr(10)& chr(13)
msg = msg & "Full Name: " & gFullName & chr(10)& chr(13)
msg = msg & "Email Address: " & gEmailAddress & chr(10)& chr(13)
pages/training-feedback.aspx
<form action="/mailers/training_feedback_send.asp" method="post" name="Form1" id="trainingFeedback">
<fieldset>
<legend>Training and Product Feedback</legend>
<div class="row">
<div class="twelve columns">
<label>How would you rate the overall effectiveness of the on-site training?</label>
<input type="radio" name="Rating" value="Excellent">Excellent<br>
<input type="radio" name="Rating" value="Good">Good<br>
<input type="radio" name="Rating" value="Poor">Poor<br>
</div>
<div class="twelve columns">
<label>Did you feel that the trainer was knowledgeable on the product and answered your questions to your satisfaction?
<br>If not, explain why.</label>
<input type="radio" name="TrainerKnowledgeable" value="yes"><span>Yes</span>
<input type="radio" name="TrainerKnowledgeable" value="no"><span>No</span>
<textarea id="gNotKnowl" name="gNotKnowl" class="twoLines" rows="2" placeholder="reason"></textarea>
</div>
