Try
  Dim ConnectionString As String = "user id=ADMIN;password=MyPassword;initial catalog=MyDATABASE;data source=ServerName;Connect Timeout=120"
  Dim SqlConn As SqlClient.SqlConnection = New SqlClient.SqlConnection(ConnectionString)
  Dim SqlCommand As New SqlClient.SqlCommand
  SqlCommand.CommandTimeout = 15
  SqlCommand.CommandType = CommandType.Text
  SqlCommand.Connection = SqlConn
  SqlCommand.CommandText = "EXEC nome_della_sp"
  SqlConn.Open()
  SqlCommand.ExecuteNonQuery
  SqlConn.Close()
  SqlConn.Dispose()
Catch ex As Exception
End Try