Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.
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
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.