Quantcast
Channel: campo dinamico envio de correo
Viewing all articles
Browse latest Browse all 5

campo dinamico envio de correo

$
0
0

Buenas noches, estoy trantado de hacer una clase que me permita ademas de crear una serie de dropdownlist en tiempo de ejecución, poder tambien mandar el resultado por correo, pero no he conseguido hacerlo aqui les dejo el fragmento de codigo que estoy usando para la creación del drop:
PublicSub edades()
Dim px AsInteger
Dim i AsInteger
For i = 0 To drpninos.SelectedValue - 1
Dim drpedades AsNewDropDownList
px = i * 30
drpedades.Style(
"Position") = "Absolute"
drpedades.Style("Top") = 205 + px & "px"
drpedades.Style("Left") = "395px"
drpedades.Items.Add(1)
drpedades.Items.Add(2)
drpedades.Items.Add(3)
If drpedades.SelectedValue > 0 Then
drpedades.ID ="edades"& i
lbledad.Visible =
True
Page.Form.Controls.Add(drpedades)
Else
Page.Form.Controls.Remove(drpedades)
lbledad.Visible =
False
EndIf
Next
EndSub

Estoy tratando de combiarlo para que en este fragmento del envio de correo pueda aparecer los campos creados
"Aqui va todo el envio del formulario que omito"
body = body &
"N° Niños:"& drpninos.SelectedValue.ToString & vbCrLf
body = body &
"Edades de Niños:"

Yo creo q es por que estoy usando la variable drpedades dentro del bucle, pero el problema es que si la coloco afuera no me muestra todas las opciones.

Saludos

 

 

 

 


Viewing all articles
Browse latest Browse all 5

Latest Images





Latest Images