Нуу там стандартный файл сгенерированный VS2008 - membership.dbml Код | <?xml version="1.0" encoding="utf-8"?> <Database Name="Avatar" Class="membershipDataContext" xmlns="http://schemas.microsoft.com/linqtosql/dbml/2007"> <Connection Mode="WebSettings" ConnectionString="Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\Avatar.mdf;Integrated Security=True;User Instance=True" SettingsObjectName="System.Configuration.ConfigurationManager.ConnectionStrings" SettingsPropertyName="AvatarConnectionString" Provider="System.Data.SqlClient" /> <Table Name="dbo.Users" Member="Users"> <Type Name="User"> <Column Name="PKID" Type="System.Guid" DbType="UniqueIdentifier NOT NULL" IsPrimaryKey="true" CanBeNull="false" /> <Column Name="Username" Type="System.String" DbType="NChar(255) NOT NULL" CanBeNull="false" /> <Column Name="ApplicationName" Type="System.String" DbType="NChar(255) NOT NULL" CanBeNull="false" /> <Column Name="Email" Type="System.String" DbType="NChar(128) NOT NULL" CanBeNull="false" /> <Column Name="Comment" Type="System.String" DbType="NChar(255)" CanBeNull="true" /> <Column Name="Password" Type="System.String" DbType="NChar(128) NOT NULL" CanBeNull="false" /> <Column Name="PasswordQuestion" Type="System.String" DbType="NChar(255)" CanBeNull="true" /> <Column Name="PasswordAnswer" Type="System.String" DbType="NChar(255)" CanBeNull="true" /> <Column Name="IsApproved" Type="System.Boolean" DbType="Bit" CanBeNull="true" /> <Column Name="LastActivityDate" Type="System.DateTime" DbType="DateTime" CanBeNull="true" /> <Column Name="LastLoginDate" Type="System.DateTime" DbType="DateTime" CanBeNull="true" /> <Column Name="LastPasswordChangedDate" Type="System.DateTime" DbType="DateTime" CanBeNull="true" /> <Column Name="CreationDate" Type="System.DateTime" DbType="DateTime" CanBeNull="true" /> <Column Name="IsOnLine" Type="System.Boolean" DbType="Bit" CanBeNull="true" /> <Column Name="IsLockedOut" Type="System.Boolean" DbType="Bit" CanBeNull="true" /> <Column Name="LastLockedOutDate" Type="System.DateTime" DbType="DateTime" CanBeNull="true" /> <Column Name="FailedPasswordAttemptCount" Type="System.Int32" DbType="Int" CanBeNull="true" /> <Column Name="FailedPasswordAttemptWindowStart" Type="System.DateTime" DbType="DateTime" CanBeNull="true" /> <Column Name="FailedPasswordAnswerAttemptCount" Type="System.Int32" DbType="Int" CanBeNull="true" /> <Column Name="FailedPasswordAnswerAttemptWindowStart" Type="System.DateTime" DbType="DateTime" CanBeNull="true" /> </Type> </Table> </Database>
|
И стандартный membership.dbml.vb Код | '------------------------------------------------------------------------------ ' <auto-generated> ' This code was generated by a tool. ' Runtime Version:2.0.50727.4200 ' ' Changes to this file may cause incorrect behavior and will be lost if ' the code is regenerated. ' </auto-generated> '------------------------------------------------------------------------------
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
<System.Data.Linq.Mapping.DatabaseAttribute(Name:="Avatar")> _ Partial Public Class membershipDataContext Inherits System.Data.Linq.DataContext Private Shared mappingSource As System.Data.Linq.Mapping.MappingSource = New AttributeMappingSource #Region "Extensibility Method Definitions" Partial Private Sub OnCreated() End Sub Partial Private Sub InsertUser(instance As User) End Sub Partial Private Sub UpdateUser(instance As User) End Sub Partial Private Sub DeleteUser(instance As User) End Sub #End Region Public Sub New() MyBase.New(Global.System.Configuration.ConfigurationManager.ConnectionStrings("AvatarConnectionString").ConnectionString, mappingSource) OnCreated End Sub Public Sub New(ByVal connection As String) MyBase.New(connection, mappingSource) OnCreated End Sub Public Sub New(ByVal connection As System.Data.IDbConnection) MyBase.New(connection, mappingSource) OnCreated End Sub Public Sub New(ByVal connection As String, ByVal mappingSource As System.Data.Linq.Mapping.MappingSource) MyBase.New(connection, mappingSource) OnCreated End Sub Public Sub New(ByVal connection As System.Data.IDbConnection, ByVal mappingSource As System.Data.Linq.Mapping.MappingSource) MyBase.New(connection, mappingSource) OnCreated End Sub Public ReadOnly Property Users() As System.Data.Linq.Table(Of User) Get Return Me.GetTable(Of User) End Get End Property End Class
<Table(Name:="dbo.Users")> _ Partial Public Class User Implements System.ComponentModel.INotifyPropertyChanging, System.ComponentModel.INotifyPropertyChanged Private Shared emptyChangingEventArgs As PropertyChangingEventArgs = New PropertyChangingEventArgs(String.Empty) Private _PKID As System.Guid Private _Username As String Private _ApplicationName As String Private _Email As String Private _Comment As String Private _Password As String Private _PasswordQuestion As String Private _PasswordAnswer As String Private _IsApproved As System.Nullable(Of Boolean) Private _LastActivityDate As System.Nullable(Of Date) Private _LastLoginDate As System.Nullable(Of Date) Private _LastPasswordChangedDate As System.Nullable(Of Date) Private _CreationDate As System.Nullable(Of Date) Private _IsOnLine As System.Nullable(Of Boolean) Private _IsLockedOut As System.Nullable(Of Boolean) Private _LastLockedOutDate As System.Nullable(Of Date) Private _FailedPasswordAttemptCount As System.Nullable(Of Integer) Private _FailedPasswordAttemptWindowStart As System.Nullable(Of Date) Private _FailedPasswordAnswerAttemptCount As System.Nullable(Of Integer) Private _FailedPasswordAnswerAttemptWindowStart As System.Nullable(Of Date) #Region "Extensibility Method Definitions" Partial Private Sub OnLoaded() End Sub Partial Private Sub OnValidate(action As System.Data.Linq.ChangeAction) End Sub Partial Private Sub OnCreated() End Sub Partial Private Sub OnPKIDChanging(value As System.Guid) End Sub Partial Private Sub OnPKIDChanged() End Sub Partial Private Sub OnUsernameChanging(value As String) End Sub Partial Private Sub OnUsernameChanged() End Sub Partial Private Sub OnApplicationNameChanging(value As String) End Sub Partial Private Sub OnApplicationNameChanged() End Sub Partial Private Sub OnEmailChanging(value As String) End Sub Partial Private Sub OnEmailChanged() End Sub Partial Private Sub OnCommentChanging(value As String) End Sub Partial Private Sub OnCommentChanged() End Sub Partial Private Sub OnPasswordChanging(value As String) End Sub Partial Private Sub OnPasswordChanged() End Sub Partial Private Sub OnPasswordQuestionChanging(value As String) End Sub Partial Private Sub OnPasswordQuestionChanged() End Sub Partial Private Sub OnPasswordAnswerChanging(value As String) End Sub Partial Private Sub OnPasswordAnswerChanged() End Sub Partial Private Sub OnIsApprovedChanging(value As System.Nullable(Of Boolean)) End Sub Partial Private Sub OnIsApprovedChanged() End Sub Partial Private Sub OnLastActivityDateChanging(value As System.Nullable(Of Date)) End Sub Partial Private Sub OnLastActivityDateChanged() End Sub Partial Private Sub OnLastLoginDateChanging(value As System.Nullable(Of Date)) End Sub Partial Private Sub OnLastLoginDateChanged() End Sub Partial Private Sub OnLastPasswordChangedDateChanging(value As System.Nullable(Of Date)) End Sub Partial Private Sub OnLastPasswordChangedDateChanged() End Sub Partial Private Sub OnCreationDateChanging(value As System.Nullable(Of Date)) End Sub Partial Private Sub OnCreationDateChanged() End Sub Partial Private Sub OnIsOnLineChanging(value As System.Nullable(Of Boolean)) End Sub Partial Private Sub OnIsOnLineChanged() End Sub Partial Private Sub OnIsLockedOutChanging(value As System.Nullable(Of Boolean)) End Sub Partial Private Sub OnIsLockedOutChanged() End Sub Partial Private Sub OnLastLockedOutDateChanging(value As System.Nullable(Of Date)) End Sub Partial Private Sub OnLastLockedOutDateChanged() End Sub Partial Private Sub OnFailedPasswordAttemptCountChanging(value As System.Nullable(Of Integer)) End Sub Partial Private Sub OnFailedPasswordAttemptCountChanged() End Sub Partial Private Sub OnFailedPasswordAttemptWindowStartChanging(value As System.Nullable(Of Date)) End Sub Partial Private Sub OnFailedPasswordAttemptWindowStartChanged() End Sub Partial Private Sub OnFailedPasswordAnswerAttemptCountChanging(value As System.Nullable(Of Integer)) End Sub Partial Private Sub OnFailedPasswordAnswerAttemptCountChanged() End Sub Partial Private Sub OnFailedPasswordAnswerAttemptWindowStartChanging(value As System.Nullable(Of Date)) End Sub Partial Private Sub OnFailedPasswordAnswerAttemptWindowStartChanged() End Sub #End Region Public Sub New() MyBase.New OnCreated End Sub <Column(Storage:="_PKID", DbType:="UniqueIdentifier NOT NULL", IsPrimaryKey:=true)> _ Public Property PKID() As System.Guid Get Return Me._PKID End Get Set If ((Me._PKID = value) _ = false) Then Me.OnPKIDChanging(value) Me.SendPropertyChanging Me._PKID = value Me.SendPropertyChanged("PKID") Me.OnPKIDChanged End If End Set End Property <Column(Storage:="_Username", DbType:="NChar(255) NOT NULL", CanBeNull:=false)> _ Public Property Username() As String Get Return Me._Username End Get Set If (String.Equals(Me._Username, value) = false) Then Me.OnUsernameChanging(value) Me.SendPropertyChanging Me._Username = value Me.SendPropertyChanged("Username") Me.OnUsernameChanged End If End Set End Property <Column(Storage:="_ApplicationName", DbType:="NChar(255) NOT NULL", CanBeNull:=false)> _ Public Property ApplicationName() As String Get Return Me._ApplicationName End Get Set If (String.Equals(Me._ApplicationName, value) = false) Then Me.OnApplicationNameChanging(value) Me.SendPropertyChanging Me._ApplicationName = value Me.SendPropertyChanged("ApplicationName") Me.OnApplicationNameChanged End If End Set End Property <Column(Storage:="_Email", DbType:="NChar(128) NOT NULL", CanBeNull:=false)> _ Public Property Email() As String Get Return Me._Email End Get Set If (String.Equals(Me._Email, value) = false) Then Me.OnEmailChanging(value) Me.SendPropertyChanging Me._Email = value Me.SendPropertyChanged("Email") Me.OnEmailChanged End If End Set End Property <Column(Storage:="_Comment", DbType:="NChar(255)")> _ Public Property Comment() As String Get Return Me._Comment End Get Set If (String.Equals(Me._Comment, value) = false) Then Me.OnCommentChanging(value) Me.SendPropertyChanging Me._Comment = value Me.SendPropertyChanged("Comment") Me.OnCommentChanged End If End Set End Property <Column(Storage:="_Password", DbType:="NChar(128) NOT NULL", CanBeNull:=false)> _ Public Property Password() As String Get Return Me._Password End Get Set If (String.Equals(Me._Password, value) = false) Then Me.OnPasswordChanging(value) Me.SendPropertyChanging Me._Password = value Me.SendPropertyChanged("Password") Me.OnPasswordChanged End If End Set End Property <Column(Storage:="_PasswordQuestion", DbType:="NChar(255)")> _ Public Property PasswordQuestion() As String Get Return Me._PasswordQuestion End Get Set If (String.Equals(Me._PasswordQuestion, value) = false) Then Me.OnPasswordQuestionChanging(value) Me.SendPropertyChanging Me._PasswordQuestion = value Me.SendPropertyChanged("PasswordQuestion") Me.OnPasswordQuestionChanged End If End Set End Property <Column(Storage:="_PasswordAnswer", DbType:="NChar(255)")> _ Public Property PasswordAnswer() As String Get Return Me._PasswordAnswer End Get Set If (String.Equals(Me._PasswordAnswer, value) = false) Then Me.OnPasswordAnswerChanging(value) Me.SendPropertyChanging Me._PasswordAnswer = value Me.SendPropertyChanged("PasswordAnswer") Me.OnPasswordAnswerChanged End If End Set End Property <Column(Storage:="_IsApproved", DbType:="Bit")> _ Public Property IsApproved() As System.Nullable(Of Boolean) Get Return Me._IsApproved End Get Set If (Me._IsApproved.Equals(value) = false) Then Me.OnIsApprovedChanging(value) Me.SendPropertyChanging Me._IsApproved = value Me.SendPropertyChanged("IsApproved") Me.OnIsApprovedChanged End If End Set End Property <Column(Storage:="_LastActivityDate", DbType:="DateTime")> _ Public Property LastActivityDate() As System.Nullable(Of Date) Get Return Me._LastActivityDate End Get Set If (Me._LastActivityDate.Equals(value) = false) Then Me.OnLastActivityDateChanging(value) Me.SendPropertyChanging Me._LastActivityDate = value Me.SendPropertyChanged("LastActivityDate") Me.OnLastActivityDateChanged End If End Set End Property <Column(Storage:="_LastLoginDate", DbType:="DateTime")> _ Public Property LastLoginDate() As System.Nullable(Of Date) Get Return Me._LastLoginDate End Get Set If (Me._LastLoginDate.Equals(value) = false) Then Me.OnLastLoginDateChanging(value) Me.SendPropertyChanging Me._LastLoginDate = value Me.SendPropertyChanged("LastLoginDate") Me.OnLastLoginDateChanged End If End Set End Property <Column(Storage:="_LastPasswordChangedDate", DbType:="DateTime")> _ Public Property LastPasswordChangedDate() As System.Nullable(Of Date) Get Return Me._LastPasswordChangedDate End Get Set If (Me._LastPasswordChangedDate.Equals(value) = false) Then Me.OnLastPasswordChangedDateChanging(value) Me.SendPropertyChanging Me._LastPasswordChangedDate = value Me.SendPropertyChanged("LastPasswordChangedDate") Me.OnLastPasswordChangedDateChanged End If End Set End Property <Column(Storage:="_CreationDate", DbType:="DateTime")> _ Public Property CreationDate() As System.Nullable(Of Date) Get Return Me._CreationDate End Get Set If (Me._CreationDate.Equals(value) = false) Then Me.OnCreationDateChanging(value) Me.SendPropertyChanging Me._CreationDate = value Me.SendPropertyChanged("CreationDate") Me.OnCreationDateChanged End If End Set End Property <Column(Storage:="_IsOnLine", DbType:="Bit")> _ Public Property IsOnLine() As System.Nullable(Of Boolean) Get Return Me._IsOnLine End Get Set If (Me._IsOnLine.Equals(value) = false) Then Me.OnIsOnLineChanging(value) Me.SendPropertyChanging Me._IsOnLine = value Me.SendPropertyChanged("IsOnLine") Me.OnIsOnLineChanged End If End Set End Property <Column(Storage:="_IsLockedOut", DbType:="Bit")> _ Public Property IsLockedOut() As System.Nullable(Of Boolean) Get Return Me._IsLockedOut End Get Set If (Me._IsLockedOut.Equals(value) = false) Then Me.OnIsLockedOutChanging(value) Me.SendPropertyChanging Me._IsLockedOut = value Me.SendPropertyChanged("IsLockedOut") Me.OnIsLockedOutChanged End If End Set End Property <Column(Storage:="_LastLockedOutDate", DbType:="DateTime")> _ Public Property LastLockedOutDate() As System.Nullable(Of Date) Get Return Me._LastLockedOutDate End Get Set If (Me._LastLockedOutDate.Equals(value) = false) Then Me.OnLastLockedOutDateChanging(value) Me.SendPropertyChanging Me._LastLockedOutDate = value Me.SendPropertyChanged("LastLockedOutDate") Me.OnLastLockedOutDateChanged End If End Set End Property <Column(Storage:="_FailedPasswordAttemptCount", DbType:="Int")> _ Public Property FailedPasswordAttemptCount() As System.Nullable(Of Integer) Get Return Me._FailedPasswordAttemptCount End Get Set If (Me._FailedPasswordAttemptCount.Equals(value) = false) Then Me.OnFailedPasswordAttemptCountChanging(value) Me.SendPropertyChanging Me._FailedPasswordAttemptCount = value Me.SendPropertyChanged("FailedPasswordAttemptCount") Me.OnFailedPasswordAttemptCountChanged End If End Set End Property <Column(Storage:="_FailedPasswordAttemptWindowStart", DbType:="DateTime")> _ Public Property FailedPasswordAttemptWindowStart() As System.Nullable(Of Date) Get Return Me._FailedPasswordAttemptWindowStart End Get Set If (Me._FailedPasswordAttemptWindowStart.Equals(value) = false) Then Me.OnFailedPasswordAttemptWindowStartChanging(value) Me.SendPropertyChanging Me._FailedPasswordAttemptWindowStart = value Me.SendPropertyChanged("FailedPasswordAttemptWindowStart") Me.OnFailedPasswordAttemptWindowStartChanged End If End Set End Property <Column(Storage:="_FailedPasswordAnswerAttemptCount", DbType:="Int")> _ Public Property FailedPasswordAnswerAttemptCount() As System.Nullable(Of Integer) Get Return Me._FailedPasswordAnswerAttemptCount End Get Set If (Me._FailedPasswordAnswerAttemptCount.Equals(value) = false) Then Me.OnFailedPasswordAnswerAttemptCountChanging(value) Me.SendPropertyChanging Me._FailedPasswordAnswerAttemptCount = value Me.SendPropertyChanged("FailedPasswordAnswerAttemptCount") Me.OnFailedPasswordAnswerAttemptCountChanged End If End Set End Property <Column(Storage:="_FailedPasswordAnswerAttemptWindowStart", DbType:="DateTime")> _ Public Property FailedPasswordAnswerAttemptWindowStart() As System.Nullable(Of Date) Get Return Me._FailedPasswordAnswerAttemptWindowStart End Get Set If (Me._FailedPasswordAnswerAttemptWindowStart.Equals(value) = false) Then Me.OnFailedPasswordAnswerAttemptWindowStartChanging(value) Me.SendPropertyChanging Me._FailedPasswordAnswerAttemptWindowStart = value Me.SendPropertyChanged("FailedPasswordAnswerAttemptWindowStart") Me.OnFailedPasswordAnswerAttemptWindowStartChanged End If End Set End Property Public Event PropertyChanging As PropertyChangingEventHandler Implements System.ComponentModel.INotifyPropertyChanging.PropertyChanging Public Event PropertyChanged As PropertyChangedEventHandler Implements System.ComponentModel.INotifyPropertyChanged.PropertyChanged Protected Overridable Sub SendPropertyChanging() If ((Me.PropertyChangingEvent Is Nothing) _ = false) Then RaiseEvent PropertyChanging(Me, emptyChangingEventArgs) End If End Sub Protected Overridable Sub SendPropertyChanged(ByVal propertyName As [String]) If ((Me.PropertyChangedEvent Is Nothing) _ = false) Then RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs(propertyName)) End If End Sub End Class
|
Соответственно - стандартный LINQ Data context генерится по принципу "Название_файла"+"Datacontext" - я просто не понимаю почему оно не работает в MemebershipProvider. И можно ли это как-то перебороть... Попробовал ручками импортировать всё что нужно для счастья - теперь ругается так: Цитата | Сообщение об ошибке компилятора: BC30007: Требуется ссылка на сборку "System.Data.Linq, Version=3.5.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089", содержащую базовый класс "System.Data.Linq.DataContext". Добавьте эту ссылку в проект.
Ошибка источника:
Строка 9: Imports System.Data.Linq Строка 10: Imports System.Data.Linq.DataContext Строка 11: Imports Avatar.membershipDataContext (Avatar - название проекта)
|
(Avatar - название проекта) Естественно в References System.Data.Linq тоже отмечен галочкой на всякий случай файл провайдера прилагаю... Это сообщение отредактировал(а) JaguarSmith - 26.11.2009, 00:57
Присоединённый файл ( Кол-во скачиваний: 3 )
JSQL.Membership_provider.vb 49,65 Kb
|