大家好,
我正在处理这个查询,以便从 vb.net 3.5 网站上的 sql 2008 数据库中导出一些数据。我在初始查询之后使用动态 linq 来根据日期、州、国家、专业和附属医院过滤结果。
这些过滤器中的每一个在查询中都有一个奇异值。具有逗号分隔列表的附属医院除外。例如:OSUMC、西医院、东医院
过滤时,我需要做一个 .Contains 以查看逗号分隔的列表是否包含特定的医院。例如:(OSUMC、HospitalWest、Hospital East).contains(“OSUMC”)
如果我对日期、州、国家和专业进行过滤,则查询运行良好。但是,如果我为附属医院添加一个过滤器,它是一个 .Contains() 过滤器,那么我会收到超时错误。
Timeout expired. The timeout period elapsed prior to completion of the operation or the server is not responding.
说明:执行当前 Web 请求期间发生未处理的异常。请查看堆栈跟踪以获取有关错误及其源自代码的位置的更多信息。
异常详细信息: System.Data.SqlClient.SqlException:超时已过期。在操作完成之前超时时间已过或服务器没有响应。
Dim ctx As New OSUMCEntities
Dim query = (From ca As OSUMCModel.vw_ConferenceAttendance In ctx.vw_ConferenceAttendance Select New With _
{ _
.LastName = ca.LastName, _
.FirstName = ca.FirstName, _
.UserID = ca.UserID, _
.UserName = ca.Username, _
.Degree = ca.DegreeName, _
.Specialty = ca.Specialty, _
.Profession = ca.Profession, _
.HospitalAffiliations = ca.HospitalAffiliations, _
.Address1 = ca.MailingAddress1, _
.Address2 = ca.MailingAddress2, _
.City = ca.MailingCity, _
.State = ca.MailingState, _
.ZipPostal = ca.MailingZip, _
.Country = ca.MailingCountry, _
.ConferenceID = ca.ConfID, _
.Title = ca.Title, _
.Date = ca.StartDate, _
.MaxCredits = ca.Credits, _
.CreditsAwarded = ca.CreditHours, _
.CreditsAssignedOn = ca.AssignedOn, _
.LastUpdated = ca.LastUpdate _
})
If (txtDateStart.Text <> "" And txtDateEnd.Text <> "") Then
Dim StartDate As Date = txtDateStart.Text
Dim EndDate As Date = txtDateEnd.Text
query = query.Where("(Date >= @0 And Date <=@1)", StartDate, EndDate)
ElseIf (txtDateStart.Text <> "") Then
Dim StartDate As Date = txtDateStart.Text
query = query.Where("Date >= @0", StartDate)
ElseIf (txtDateEnd.Text <> "") Then
Dim EndDate As Date = txtDateEnd.Text
query = query.Where("Date <= @0", EndDate)
End If
If (ddlState.SelectedValue <> "Export All") Then
query = query.Where("State = @0", ddlState.SelectedValue)
End If
If (ddlCountry.SelectedValue <> "Export All") Then
query = query.Where("Country = @0", ddlCountry.SelectedValue)
End If
If (ddlSpecialty.SelectedValue <> "Export All") Then
query = query.Where("Specialty = @0", ddlSpecialty.SelectedValue)
End If
If (ddlHospitals.SelectedValue <> "Export All") Then
Dim Hospital As String = ddlHospitals.SelectedValue
query = query.Where("HospitalAffiliations.Contains(@0)", Hospital)
End If