Did you know SD-WANs can improve network connectivity? Check out this webinar to learn how an SD-WAN simplified, one-click tool can help you migrate and manage data in the cloud.
Function SingleItem(Category,RowNumber) SQL=" SELECT * FROM ( " SQL=SQL & " Select Description, PartNo, " SQL=SQL & " Row_Number() Over(Order By PartNo) as rownumber, " SQL=SQL & " Count(*) Over() as TotalRecordCount " SQL=SQL & " From Products " SQL=SQL & " where Category = '" & Category & "' ) T1 " SQL=SQL & " WHERE rownumber = '" & RowNumber & "' " SQL=SQL & " Order By partno asc " Set dbsecurecon = Server.CreateObject("ADODB.Connection") dbsecurecon = "PROVIDER=SQLOLEDB;DATA SOURCE=1xxx;DATABASE=xxx;User ID=sa;Password=xxx" Set RS = Server.CreateObject("ADODB.recordset") RS.open SQL, dbsecurecon,3,3 If Not RS.EOF Then PartNo = RS("PartNo") End If SingleItem=PartNo End Function
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.