ASP에서 전자 메일 양식이 올바르게 형식을 정렬하지 않습니다.

ASP에서 광산의 친구에게 약간의 일을하고있었습니다 (그의 서버가 IIS를 실행하기 때문에) 나는 PHP에서 웹 사이트를 스크립트로 작성합니다. 그러나 일은 간단했기 때문에 일을 끝냈습니다. 그가 원했던 것은 그가 기존 양식 요소를 삽입 및/또는 편집 할 수있는 양식 페이지와 그 양식을 렌더링하고 결과를 전자 메일로 보내는 ASP 페이지였습니다. 이 모든 것은 내 대본에서 잘 작동합니다. 유일한 문제는 양식 HTML 페이지에서 볼 수있는 양식 요소를 정렬하지 않는다는 것입니다. 이 문제를 극복 할 수있는 방법이 있나요? 그래서 html 문서의 위치에 따라 정렬합니다. 내 코드는 다음과 같다 :ASP에서 전자 메일 양식이 올바르게 형식을 정렬하지 않습니다.

<% 
      Dim besked 
      Dim beskedhtml 

     for each x in Request.Form 
      if x = "submit" Then 

      Elseif x = "modtager" Then 

      Else 
     besked = besked & x & " : " & Request.Form(x) & "" & vbCrLf & "" & vbCrLf & "" 
      beskedhtml = beskedhtml & "<b>" & x & "</b>" & " : " & Request.Form(x) & "<br><br>" 
      End If 
     next 


Set myMail=CreateObject("CDO.Message") 
myMail.Subject=Request.Form("emne") 
myMail.From = "[email protected]" 
myMail.To=Request.Form("modtager") 
myMail.HTMLBody=beskedhtml 
myMail.TextBody=besked 
myMail.Send 
set myMail=nothing 

    Response.Write(beskedhtml & " was send.") 
    %>

편집 내가 내 자신에 그것을 알아 냈어. 같은 당신이 수치 요청에 카운트() 함수를 사용하여 반복해야하는 요청을 정렬하려면 :

당신은 값의 폼 요소의 이름을 Request.Form.key(x)과 Request.Form.item(x)으로 제어 그리고

for x = 1 to Request.Form.count() 
     if Request.Form.key(x) = "submit" Then 

     Elseif Request.Form.key(x) = "modtager" Then 

     Else 
     besked = besked & Request.Form.key(x) & " : " & Request.Form.item(x) & "" & vbCrLf & "" & vbCrLf & "" 
    beskedhtml = beskedhtml & "<b>" & Request.Form.key(x) & "</b>" & " : " & Request.Form.item(x) & "<br><br>" 
     End If 
next

요소의

해피 코딩 모두

출처

2011-10-29 Jonas m