You haven't instantiated
connsql
. See bolded code:
connstr = "Provider=SQLOLEDB.1; Data Source=" & My.Settings.sqlservername & ";Initial Catalog=" & My.Settings.sqlDBname & ";Password=" & My.Settings.sqlPswd & ";User ID=" & My.Settings.sqlUserName
connsql = New SqlConnection(connstr)
connsql.Open()