2009-07-30 2 views
1

Я пытаюсь выполнить код, приведенным ниже, чтобы перечислить выберите пункт в флажкеПроблемы при попытке извлечь данные из флажка

в тело письма

Dim CheckedValues As String 
       For Each item In txt_panview0_ddinput1.Items 
        If item.checked Then 
         checkedValues = checkedValues & item.selectedValue 

        End If 
       Next 
       If Not String.IsNullOrEmpty(checkedValues) Then 
        checkedValues = checkedValues.Substring(1) 
       End If 


       tempCollector = tempCollector + "<br>" + "Area Name" + ": " + checkedValues 

Но я получаю следующее ошибка ..

System.MissingMemberException: Public member 'checked' on type 'ListItem' not found. 
at Microsoft.VisualBasic.CompilerServices.Symbols.Container.GetMembers(String& MemberName, 
Boolean ReportErrors) at Microsoft.VisualBasic.CompilerServices.NewLateBinding. 
LateGet(Object Instance, Type Type, String MemberName, Object[] Arguments, String[] ArgumentNames, Type[] 
TypeArguments, Boolean[] CopyBack) at WebApplication1._Default.collectEmailBodyText() 
in C:\UseFormCode\UseFormEnhWorking\Default.aspx.vb:line 271 

Пожалуйста, помогите

+0

Вы можете разместить HTML, чтобы показать, что флажки завернуты в? – cptScarlet

+0

Какой тип txt_panview0_ddinput1? –

+0

txt_panview0_ddinput1 не является списком, это checkboxlist - – 2009-07-30 15:07:43

ответ

1

напечатанный материал каждого элемента в итерация к CheckBox перед проверкой, если это проверено:

For Each item In txt_panview0_ddinput1.Items 
    dim c as CheckBox = Ctype(item.Value, CheckBox) 
    If c.checked Then 
     checkedValues = checkedValues & item.selectedValue 
    End If 
Next 

Чтобы иметь возможность выбрать несколько значений, установите SelectionMode свойство объекта ListBox в Multiple:

<asp:ListBox ID="ListBox1" runat="server" SelectionMode="Multiple"></asp:ListBox> 

Тогда итерацию по выбранным значениям, используйте следующее:

For Each item as ListItem In txt_panview0_ddinput1.Items 
     If item.Selected Then 
      CheckedValues = CheckedValues & item.Value 
     End If 
Next 

PS Я немного ржавый на синтаксис VB.Net мой код не может быть синтаксически идеально

+0

Теперь его подача: System.InvalidCastException: Невозможно привести объект типа «System.Web.UI.WebControls.ListItem» к типу «System.Web.UI.WebControls.CheckBox». в WebApplication1._Default.collectEmailBodyText() в C: \ UseFormCode \ UseFormEnhWorking \ Default.aspx.vb: линия 271 – 2009-07-30 14:19:52

+0

Try: тусклый с, как CheckBox = CTYPE (item.Value, CheckBox) –

+0

Нету еще ошибка: System. InvalidCastException: Невозможно применить объект типа «System.String» к типу «System.Web.UI.WebControls.CheckBox». в WebApplication1._Default.collectEmailBodyText() в C: \ UseFormCode \ UseFormEnhWorking \ Default.aspx.vb: строка 271 – 2009-07-30 14:24:33

Смежные вопросы