Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- <asp:CheckBoxList ID="cblDocType" runat="server">
- <asp:ListItem Text="EIR" Value="EIR"></asp:ListItem>
- <asp:ListItem Text="EIR/EIS" Value="EIR/EIS"></asp:ListItem>
- <asp:ListItem Text="MND" Value="MND"></asp:ListItem>
- <asp:ListItem Text="Neg. Dec." Value="Neg. Dec."></asp:ListItem>
- <asp:ListItem Text="NOD" Value="NOD"></asp:ListItem>
- <asp:ListItem Text="NOE" Value="NOE"></asp:ListItem>
- </asp:CheckBoxList>
- Protected Sub btn_SubmitSearch_Click(sender As Object, e As EventArgs)
- Dim AndOr As String
- AndOr = ddlSearchType.SelectedValue.ToString()
- SQLData_CEQA_Doc_gv.SelectCommand = "SELECT * FROM [Document_Properties] WHERE APN LIKE '%" & tbCEQASearch_APN.Text & "%' " & _
- AndOr & _
- " Title LIKE '%" & tbCEQASearch_Title.Text & "%' " & _
- AndOr & _
- " Approval_Date >= '" & tbDateFrom.Text & "' AND Approval_Date <= '" & tbDateTo.Text & "'"
- gv_CEQA_Search_Results.DataSource = Nothing
- gv_CEQA_Search_Results.DataBind()
- gv_CEQA_Search_Results.SelectedIndex = -1
- If gv_CEQA_Search_Results.Rows.Count = 1 Then
- lblSystemInfo.Text = "1 matching document found"
- Else
- lblSystemInfo.Text = gv_CEQA_Search_Results.Rows.Count & " matching documents found"
- End If
- End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement