ОШИБОК 102

Vova_1805
Дата: 12.05.2014 15:54:01
Среда Visual Basic STUDIO’2010 Professional
Со STUDIO'2010 поставлены примеры проектов, в частности
LinqToNorthwind из папки LINQ Samples, т.е.
\LINQ Samples\LinqToNorthwind

1.Включил из примера в свой проект 4 файла:
Northwind.vb, ObjectDumper.vb, Samples.vb, app.config,
Ниже начало файла Northwind.vb
Option Strict On
Option Explicit On
Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Data.Linq
Imports System.Data.Linq.Mapping
Imports System.Linq
Imports System.Linq.Expressions
Imports System.Reflection

Namespace nwind
    Partial Public Class Northwind
        Inherits System.Data.Linq.DataContext

Ошибка 4 Тип "System.Data.Linq.Table" не определен.
2.В большом количестве свойств, включённых в файл Northwind.vb
ещё до трансляции красным подчёркивается "GetTable"
В В ОКНЕ "ОБОЗРЕВАТЕЛЯ РЕШЕНИЙ" показываю подсоединение к базе – папка "Data"

В нижепоказанном одном из свойств перепробовал 3 подсказки на заголовки свойств после "As"
P
ublic ReadOnly Property ActiveProductsFedarateds() As System.Data.Linq.Table(Of ActiveProductsFedarated)
            '-2 Public ReadOnly Property ActiveProductsFedarateds() As System.Data.DataTable(Of ActiveProductsFedarated)
            '-3 Public ReadOnly Property ActiveProductsFedarateds() As System.Data.SqlTypes.INullable(Of ActiveProductsFedarated)
            '-4 Public ReadOnly Property ActiveProductsFedarateds() As System.Data.TypedTableBase(Of ActiveProductsFedarated)
            Get
                Return Me.GetTable(Of ActiveProductsFedarated)()
            End Get
        End Property

Спасибо
Lelouch
Дата: 12.05.2014 16:21:05
Vova_1805,

System.Data.Linq (in System.Data.Linq.dll) - эта сборка есть в References ?
Vova_1805
Дата: 12.05.2014 16:48:54
автор
System.Data.Linq (in System.Data.Linq.dll) - эта сборка есть в References ?

я на уровне чайника, а Вы Гуру,
я не понимаю Вашей подсказки, моя беда.
Пример работает, но результаты выводит в консольное окно, я
думал что если подключить файлы из примера удасться
легко выводить в , например, TextBox or DGV
Vova_1805
Дата: 13.05.2014 14:29:22
На левом снимке папка "Ссылки" не содержит
System.Data.Linq.dll
На правом тоже отсутствует.
Левый снимок – это правильно работающий проект примера, справа – мой тестовый пример.
Konst_One
Дата: 13.05.2014 14:32:38
а что мешает добавить ссылку?
Vova_1805
Дата: 13.05.2014 14:57:57
щёлкнул правой клавишей мыши в обозревателе решений
на папке "Ссылки", есть строка меню Добавить,
но почему-то не добавляется,
Возможно я непавильно добавляю?
Спасибо
Konst_One
Дата: 13.05.2014 15:02:05
Добавить нажали, потом в открывшемся окошке в строке поиска наберите linq и выберите галочкой
Konst_One
Дата: 13.05.2014 15:02:50
раздел assemblies (сборки на русском, скорее всего)
Vova_1805
Дата: 14.05.2014 16:30:00
Большое Спасибо за ПРАВИЛЬНЫЙ ответ.
Благодаря Вашей подсказке количество ошибок из 102
Сократилось до 19.
которые, будьте так добры, если у Вас не потребуется много услий, прошу помочь устранить - своих знаний, к сожалению, не хватает

Что сделать для устранения приведенных сообщений?
Тип "System.Transactions.TransactionScope" не определен.
Тип "Order" не определен.
Тип "Northwind" не определен.
таких строк, как предыдущая, - 16
Тип "Customer" не определен.
Тип "Customer" не определен.

Включил из примера "LinqToNorthwind" в свой проект 4 файла:
Northwind.vb, ObjectDumper.vb, Samples.vb, app.config,
Ниже начало файла Northwind.vb

В файле "Samples.vb"
Imports nwind ' если курсор навести на "nwind", то подсказка будет Namespace nwind
' в этой строке подчёркнута красной чёрточкой последняя буква "d"
In file "Northwind.xml" много показанных ниже подобных строк:
<Type Name="nwind.AddressSplit"> - атрибуту, т.е. переменной, name присваивается значение
Northwind.xml

В окне "Обозреватель решений" присутствует XML_file "Northwind.xml"
Слева даже не транслируя подчёркнута красной чёрточкой последняя буква "d"
Nwind, Northwind,

Ниже начало "Northwind.vb":
Option Strict On
Option Explicit On

Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Data.Linq
Imports System.Data.Linq.Mapping
Imports System.Linq
Imports System.Linq.Expressions
Imports System.Reflection

Namespace nwind
  
  Partial Public Class Northwind
    Inherits System.Data.Linq.DataContext
    
   Public Sub New(ByVal connection As String, ByVal mappingSource As System.Data.Linq.Mapping.MappingSource)
      MyBase.New(connection, mappingSource)
      OnCreated
    End Sub
End Class


Ниже начало " ObjectDumper.vb":
Imports System
Imports System.IO
Imports System.Collections
Imports System.Collections.Generic
Imports System.Reflection

Public Class ObjectDumper
    Public Shared Sub Write(ByVal o As Object)
        Write(o, 0)
    End Sub
End Class


Ниже начало "Samples.vb":
I
mports System
Imports System.Collections
Imports System.Collections.Generic
Imports System.Linq
Imports nwind  эта строка подчёркнуиа красной чёрточкой
' если курсор навести на "nwind", то подсказка появляется "Namespace nwind"

Namespace Samples
    Public Class Samples

        Public Shared Sub Sample1(ByVal db As Northwind)
            ' Используйте Where() для поиска только соответствующих элементов
            Dim q As IEnumerable(Of Customer) = db.Customers.Where(Function(c) c.City = "London")
            ObjectDumper.Write(q, 0)
        End Sub
End Class
Lelouch
Дата: 14.05.2014 16:39:29
Vova_1805,

System.Transactions.TransactionScope - добавить ссылку на System.Transactions