Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/.htaccess/6.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net SQLite错误1:';没有这样的列:c.ClientId-查看错误的表_Vb.net_Entity Framework_Sqlite - Fatal编程技术网

Vb.net SQLite错误1:';没有这样的列:c.ClientId-查看错误的表

Vb.net SQLite错误1:';没有这样的列:c.ClientId-查看错误的表,vb.net,entity-framework,sqlite,Vb.net,Entity Framework,Sqlite,我有以下代码: Private Sub GetDropdowns() Using context As New ClientContext ClientTypeList = New ObservableCollection(Of ClientType)(context.ClientTypes.ToList()) CaseworkersList = New ObservableCollection(Of

我有以下代码:

Private Sub GetDropdowns()
        Using context As New ClientContext
            ClientTypeList = New ObservableCollection(Of ClientType)(context.ClientTypes.ToList())                
            CaseworkersList = New ObservableCollection(Of Caseworker)(context.Caseworkers.ToList())
        End Using
    End Sub
在这段代码中,ClientTypeList可以正确地提取。当前数据库中没有项目。CasewersList给出了以下错误:

{“SQLite错误1:'没有这样的列:c.ClientId.”

当我注释掉CaseworkersList时,ClientTypeList继续按预期工作,返回一个空列表

当我注释掉ClientTypeList时,我继续得到CasewersList的错误

我已经确认我的上下文正在创建数据库和表。CaseworkersList没有名为ClientId的列,但它尝试填充的对象/列表也没有此属性,因此我不明白为什么会出现此错误。似乎出于某种原因,它看错了表

我的上下文如下所示:

Namespace Models
Public Class ClientContext
    Inherits DbContext

    Public Property Clients As DbSet(Of Client)
    Public Property Attorneys As DbSet(Of Attorney)
    Public Property Caseworkers As DbSet(Of Caseworker)
    Public Property IncomeSources As DbSet(Of IncomeSource)
    Public Property InsurancePolicies As DbSet(Of InsurancePolicy)
    Public Property ClientTypes As DbSet(Of ClientType)
    Public Property ClientAttorneys As DbSet(Of ClientAttorneys)
    Public Property ClientCaseworkers As DbSet(Of ClientCaseworkers)
    Public Property ClientIncomeSources As DbSet(Of ClientIncomeSources)
    Public Property ClientInsurancePolicies As DbSet(Of ClientInsurancePolicies)

    Public Sub Create()
        Using dbContext As ClientContext = New ClientContext()
            dbContext.Database.Migrate()
            dbContext.InitialMigration()
            dbContext.SaveChanges()
        End Using
    End Sub

    Protected Overrides Sub OnConfiguring(optionsBuilder As DbContextOptionsBuilder)
        Dim connectionStringBuilder = New SqliteConnectionStringBuilder With {.DataSource = "ClientRecords.sqlite"}
        Dim connectionString As String = connectionStringBuilder.ToString()
        Dim connection As SqliteConnection = New SqliteConnection(connectionString)
        optionsBuilder.UseSqlite(connection)
    End Sub


#Region "Migration Code"

    Private Sub InitialMigration()

        'Create tables that do not exist

        'Create Clients Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'Clients' ('Id' GUID NOT NULL PRIMARY KEY, 'Name' TEXT, 'EstateNumber' TEXT,
                                                'ClientTypeId' GUID, 'Active' INTEGER, 'Residence' TEXT,
                                                'AddressLine1' TEXT, 'AddressLine2' TEXT, 'City' TEXT, 'State' TEXT, 'ZipCode' TEXT, 'County' TEXT, 'Phone' TEXT, 
                                                'Fax' TEXT, 'AcctCode' TEXT, 'BirthDate' DATE, 'Placement' DATE, 'Letters' DATE, 'LastAccounting' DATE, 
                                                'DateOfDeath' DATE, 'ClosureDate' DATE, 'Minor' INTEGER, 'Disabled' INTEGER, 'Deceased' INTEGER, 
                                                'PersonalRepresentative' INTEGER, 'OtherCheckFormat' INTEGER, 'BondCompany' TEXT, 'BondNumber' TEXT, 
                                                'BondAmount' REAL, 'SocialSecurityNumber' TEXT, 'MedicareClaimNumber' TEXT, 'MedicaidClaimNumber' TEXT, 
                                                'VaClaimNumber' TEXT, 'SsiEligibilityTest' INTEGER, 'MedicaidEligibilityTest' INTEGER,
                                                'PreferHome' TEXT, 'Cemetery' TEXT, 'BurialPlan' TEXT, FOREIGN KEY(ClientTypeId) REFERENCES ClientTypes(Id))")
        'Create Attorneys Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'Attorneys' ('Id' GUID NOT NULL PRIMARY KEY, 'Name' TEXT,
                                                'PhoneNumber' TEXT, 'Email' TEXT)")
        'Create Caseworkers Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'Caseworkers' ('Id' GUID NOT NULL PRIMARY KEY, 'Name' TEXT,
                                                'PhoneNumber' TEXT, 'Email' TEXT, 'Mileage' REAL, 'HourlyRate' REAL)")
        'Create IncomeSources Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'IncomeSources' ('Id' GUID NOT NULL PRIMARY KEY, 'Name' TEXT)")

        'Create InsurancePolicies Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'InsurancePolicies' ('Id' GUID NOT NULL PRIMARY KEY, 'Name' TEXT,
                                                'Number' TEXT)")
        'Create ClientTypes Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'ClientTypes' ('Id' GUID NOT NULL PRIMARY KEY, 'Name' TEXT)")

        'Create ClientAttorneys Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'ClientAttorneys' ('Id' GUID NOT NULL PRIMARY KEY, 'ClientId' GUID,
                                                'AttorneyId' GUID, 'StartDate' DATE, 'EndDate' DATE,
                                                FOREIGN KEY(ClientId) REFERENCES Clients(Id), FOREIGN KEY(AttorneyId) REFERENCES InsurancePolicies(Id))")
        'Create ClientCaseWorkers Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'ClientCaseWorkers' ('Id' GUID NOT NULL PRIMARY KEY, 'ClientId' GUID,
                                                'CaseworkerId' GUID, 'StartDate' DATE, 'EndDate' DATE,
                                                FOREIGN KEY(ClientId) REFERENCES Clients(Id), FOREIGN KEY(CaseworkerId) REFERENCES Caseworkers(Id))")
        'Create ClientIncomeSources Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'ClientIncomeSources' ('Id' GUID NOT NULL PRIMARY KEY, 'ClientId' GUID,
                                                'IncomeSourceId' GUID, 'StartDate' DATE, 'EndDate' DATE, 'Amount' TEXT, 'Period' INTEGER,
                                                FOREIGN KEY(ClientId) REFERENCES Clients(Id), FOREIGN KEY(IncomeSourceId) REFERENCES IncomeSources(Id))")
        'Create ClientInsurancePolicies Table
        Me.Database.ExecuteSqlCommand("CREATE TABLE IF NOT EXISTS 'ClientInsurancePolicies' ('Id' GUID NOT NULL PRIMARY KEY, 'ClientId' GUID,
                                                'InsurancePolicyId' GUID, 'StartDate' DATE, 'EndDate' DATE,
                                                FOREIGN KEY(ClientId) REFERENCES Clients(Id), FOREIGN KEY(InsurancePolicyId) REFERENCES InsurancePolicies(Id))")
    End Sub


#End Region
End Class
End Namespace
我的个案工作者模型是这样的:

Namespace Models
Public Class Caseworker

    Public Property Id As String
    Public Property Name As String
    Public Property PhoneNumber As String
    Public Property Email As String
    Public Property Mileage As Double
    Public Property HourlyRate As Double

End Class
End Namespace

我也有这个问题。Blog具有CategoryId,但CategoryId未添加到sqlite数据库中的Blog表中。