Need to boost the visibility of your question for solutions? Use the Experts Exchange Help Bell to confirm priority levels and contact subject-matter experts for question attention. Check out this how-to article for more information.
Public Shared Function getNenaRecords(ByVal myStatus As String) As SqlDataReader Dim myCon As SqlConnection = SqlConnectString() myCon.Open() Dim Myreader As SqlDataReader Dim cmd As SqlCommand = New SqlCommand("sp_E911Records_byStatus_SEL", myCon) cmd.CommandType = CommandType.StoredProcedure cmd.Parameters.AddWithValue("@status", myStatus) 'Status Myreader = cmd.ExecuteReader() myCon.Close() myCon.Dispose() Return Myreader End Function
Dim myReader2 As SqlDataReader = getNenaRecords("v")
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.