Dim builder As New SqlConnectionStringBuilder()
        builder.ConnectionString = "Data Source = FILIPPO; Initial Catalog = Prova; Persist Security Info= True"
        builder.Add("Initial Catalog", "Prova")
        builder.Add("Persist Security Info", True)
        builder.Add("user id", txtUser.Text)
        Dim id As String = txtUser.Text
        builder.Item("User ID") = id
        builder.Add("Password", txtpswd.Text)
      '  Response.Write(builder.ConnectionString)

        Dim connessione As New SqlConnection(builder.ConnectionString)
        connessione.Open()

        Dim cmd As SqlCommand
        cmd = New SqlCommand("SELECT * FROM tabella_prova")
        Dim dato As SqlDataReader = cmd.ExecuteReader()