Модераторы: diadiavova, gambit

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как серелизовать CollectionBase? 
:(
    Опции темы
kentaro
Дата 15.11.2009, 23:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 113
Регистрация: 24.3.2009

Репутация: нет
Всего: нет
При серелизации дает ошибку Object reference not set to an instance of an object.
Код

 Public Sub InsertContact()
        ' _CollectionContacts = New CollectionContacts
        Dim PathFileContact As String
        PathFileContact = My.Settings.DataFilesPath
        Try
            _CollectionContacts.AddContact(_Contact)
        Catch e As ApplicationException
            MsgBox(e.Message)
        End Try

        Dim fs As New FileStream(PathFileContact & FILE_CONTACTS_NAME, FileMode.Create)
        Try
            MsgBox("Кол-во персонала в коллекции " & _CollectionContacts.Count.ToString) 'тестовая проверка
            ' PathFileContact &
            _Sf.Serialize(fs, _CollectionContacts)
        Catch e As System.Runtime.Serialization.SerializationException
            Console.WriteLine("Не могу серелизовать: " & e.Message)
            Throw
        Finally
            fs.Close()
        End Try
    End Sub
PM MAIL   Вверх
diadiavova
Дата 16.11.2009, 13:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
kentaro, ты и в правду думаешь, что из предоставленного кода можно понять откуда появляется ошибка?


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
kentaro
Дата 17.11.2009, 00:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 113
Регистрация: 24.3.2009

Репутация: нет
Всего: нет
diadiavova, Всё разобрался,забыл поставить new на soapformater

Добавлено через 2 минуты и 58 секунд
diadiavova, Я серелизовал CollectionBase в ListView.Как мне теперь сделать редактирование по выбраному item?
PM MAIL   Вверх
diadiavova
Дата 17.11.2009, 01:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Цитата(kentaro @  17.11.2009,  00:17 Найти цитируемый пост)
Я серелизовал CollectionBase в ListView

 smile Это как это? smile Сериализовал - это значит сохранил в каком-нибудь "печатном" формате(в твоём случае SOAP. Что значит то, что ты написал?
Цитата(kentaro @  17.11.2009,  00:17 Найти цитируемый пост)
Как мне теперь сделать редактирование по выбраному item? 

Тоже не понятно. Редактирование чего? Если коллекции, то что именно надо делать? Заменить ? Так просто присвой новое значение.


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
kentaro
Дата 17.11.2009, 13:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 113
Регистрация: 24.3.2009

Репутация: нет
Всего: нет
diadiavova, 
Код

Public Sub FillContacts(ByVal Contacts As CollectionContacts)
            If Contacts.Count = 0 Then Exit Sub

            'If lswMain.Items.Contains(CType()) Then
            'End If
            For Each con As Contact In Contacts
                _lvListItem = New ListViewItem
                _lvListItem.Tag = con.ID.ToString
                _lvListItem.Text = con.LastName
                _lvListItem.SubItems.Add(con.Name)
              lswMain.Items.Add(_lvListItem)
            Next
        End Sub

Это я при загрузке заполнил listview десерилизованой колекции.Потом я в listview  выбираю строку нажимаю кнопку редактировать.Как мне подтянуть в форму для редоктирование данные ,с выделеной строкой в ListView?
PM MAIL   Вверх
diadiavova
Дата 17.11.2009, 13:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
ListView.SelectedItems возвратит коллекцию выделенных элементов. Если выделен только один элемент - то соответственно тяни из коллекции элемент под индексом 0 приводи его к нужному тебе типу(при помощи CType) и редактируй, только к сериализации всё это отношения не имеет.


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
kentaro
Дата 17.11.2009, 14:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 113
Регистрация: 24.3.2009

Репутация: нет
Всего: нет
diadiavova, Можна пожалуйста пример собирание данных из  ListView.SelectedItems  в txtName smile 
PM MAIL   Вверх
diadiavova
Дата 17.11.2009, 14:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Что такое txtName и что такое "собирание данных?


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
kentaro
Дата 17.11.2009, 14:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 113
Регистрация: 24.3.2009

Репутация: нет
Всего: нет
diadiavova, обычный текстбокс, выделеную строчку ListView вставить по текстбоксам.Вобщем проста вытянуть из listview  в форму для редоктирования.
PM MAIL   Вверх
diadiavova
Дата 17.11.2009, 16:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Так что ли?

Присоединённый файл ( Кол-во скачиваний: 4 )
Присоединённый файл  LV2TB.rar 58,15 Kb


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
kentaro
Дата 17.11.2009, 23:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 113
Регистрация: 24.3.2009

Репутация: нет
Всего: нет
diadiavova, Нет у меня listview в нём встроке есть данные(телефон,id и.т.д) Тоесть item и subitem.Мне нужно выделеную строку сдаными поместить при нажатии на кнопку редактировать в текстбоксы(телефон,id).Я попробывал в массив засунуть но неполучается 
Код

 msg.Add(frmMain.lswMain.SelectedItems(0).SubItems(0).Text)


Добавлено через 9 минут и 55 секунд
А можна так например сделать  
Код

 Dim value As New ListViewItem
value = frmMain.lswMain.SelectedItems(0)
PM MAIL   Вверх
diadiavova
Дата 17.11.2009, 23:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Да сопсно так же всё делается. 

Присоединённый файл ( Кол-во скачиваний: 3 )
Присоединённый файл  LV2TB.rar 62,10 Kb


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
kentaro
Дата 19.11.2009, 12:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 113
Регистрация: 24.3.2009

Репутация: нет
Всего: нет
diadiavova, Как мне удалить контакт из ColectionBase когда у меня id является типа
_ID = Guid.NewGuid.ToString и он не сможет стать integer а без integer он его неудалит
   
Код


Public Overloads Sub RemoveContact(ByVal i As String)
        ' If Me.List.Contains(CType(Me.List.Item(CInt(i)), Contact)) Then
        Me.List.Remove(CType(Me.List.Item(CInt(i)), Contact))
        'End If
    End Sub
PM MAIL   Вверх
diadiavova
Дата 19.11.2009, 18:39 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Для удаления элемента из коллекции надо использовать индекс этого элемента. 
Код

    Public Overloads Sub RemoveContact(ByVal i As String)
        Dim index = Me.List.IndexOf(CType(Me.List.Item(CInt(i)), Contact))
        Me.List.Remove(index)
    End Sub
А вообще используй джинерики. Сейчас столько удобных коллекций существует, что мне трудно себе представить ситуацию, в которой может понадобиться CollectionBase.


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
kentaro
Дата 19.11.2009, 23:36 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 113
Регистрация: 24.3.2009

Репутация: нет
Всего: нет
diadiavova, Такую же ошибку дает Conversion from string "5ce94f42-6278-4b2e-aedd-2061936d" to type 'Integer' is not valid.
PM MAIL   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума VB .NET
diadiavova
  • Прежде чем задать вопрос, воспользуйтесь поиском: возможно Ваш вопрос уже обсуждался и на него был получен ответ.
  • Если такой же вопрос не найден, не стоит задавать свой вопрос в любую тему, создайте новую.
  • Заголовок темы должен отображать ее суть.
  • Содержание поста должно описывать проблему понятно, но в то же время, по возможности, лаконично. Сначала следует описать суть вопроса, потом можно привести пример кода, не вынуждайте других участников угадывать в чем Ваша проблема - телепатов здесь нет.
  • Будьте взаимно вежливы и дружелюбны.
  • При оформлении сообщений используйте форматирование, примеры кода заключайте в теги [CODE=vbnet][/CODE].
  • Также ознакомьтесь с общими правилами, действующими на всем форуме.
  • Если вопрос решен, не забывайте помечать тему решенной(вверху темы есть ссылка). Кроме того, если Вы хотите отблагодарить участников, оказавших помощь в решении, можно повысить им репутацию, в случае, если у Вас менее 100 сообщений в форуме и функция изменения репутации Вам недоступна, можете написать сюда.
  • Общие вопросы по программированию на платформе .NET обсуждаются здесь.
  • Литература по VB .NET обсуждается здесь.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, diadiavova.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB .NET | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0584 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.