שליחת מייל..

תנסה


For Each item in Request.Form
    sMsg=sMsg & item &":"& Request.Form(item)
Next
objCDO.HTMLBody = sMsg
Response.Write sMsg

אם זה לא עובד אז אולי כדי לתת שם עם מספר לכל האובייקטים שבאוסף ואז לרוץ עם לולאת FOR- NEXT . משהו כזה…
מספר האובייקטים ידוע מראש ומוגדר כ ItemsNum  ושם האובייקטים הוא
"sName2", "sName1"….

With Request
    For i=1 To ItemsNum  'מספר האובייקטים
        sMsg=sMsg & "sName"& i &":"& .Form("sName"& i)
    Next  'i
End With
objCDO.HTMLBody = sMsg
Response.Write sMsg