Learn about Hyper-V features that increase functionality and usability of Microsoft Windows Server 2016. Also, throughout this eBook, you’ll find some basic PowerShell examples that will help you leverage the scripts in your environments!
I error at Line 9 char 7
Dim conn , rs, sql, ConnString sql = "SELECT * FROM sessiontbl" Set rs = CreateObject("ADODB.Recordset") Set conn = CreateObject("ADODB.Connection") With conn .Provider = "SQLOLEDB" .Mode = adModeReadWrite .ConnectionString ="Data Source=SANDBOX;Trusted_Connection=Yes;InitialCatalog=Inventory;" .Open WScript.Echo "Connection was established." End With rs.Open sql,conn If conn.State = adStateOpen Then WScript.Echo "Connection was established." Else WScript.Echo "No Connection ." End If rs.Close Set rs = Nothing conn.Close Set conn = Nothing