Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere e scrivere su tabelle SQL Server

Ciao a tutti,
 
dato questo codice che (teoricamente) si connette ad una tabella su server :
 
Public Class Form1
 
    Public conn As New ADODB.Connection
    Public rs As New ADODB.Recordset
 
 
    Sub Connetti()
 
        With conn
            .Open("driver={SQL Server Native Client 10.0}; server=mkpdatam; uid=access;pwd=accessdb;database=Biglia;")
            .CursorLocation = ADODB.CursorLocationEnum.adUseClient
        End With
 
    End Sub
End Class
 
ho la necessità di fare 2 cose.
 
1 - Popolare una combo con i dati di una tabella di quel database
2 - Selezionato il valore combo, su click di un pulsante deve mandare il dato su un'altra tabella.
 
Ammesso che la richiesta di connessione al db sia corretta, come posso fare?
Per popolare la combo ho provato così ma non va..
 
Dim sql As String
 
        sql = "Select Richiedente from T_Richiedente"
 
        Call Connetti()
        rs.ActiveConnection = conn
        rs.Open(sql, conn)
 
        While Not rs.EOF
            Combo1.Items.Add(rs)
            rs.MoveNext()
        End While
 
Grazie


Dimenticavo... VB 2005 Express


 
 
Meno male che lo hai specificato...
In .NET sarebbe auspicabile usare 
ADO.NET
 e una ricerca su Google ti 
chiarir� le idee su come utilizzarlo per i vari DB
 
Per quanto riguarda il tuo problema dai una vista all'esempio:
http://www.mikesdotnetting.com/Article/42/Binding-data-to-a-DropDownList-with-ADO.NET
 
 
Naturalmente ti consiglio di usare il provider per SQL anzich� quello 
per OleDb se interroghi una base dati SQL Server
 
Ciao, Vincenzo

 Ciao, Vincenzo
 
Ho trovato qualche articolo per ADO.net; per aprire la connessione faccio così:
 
Public Sub ApriDbServer()
 
        Me.SqlConnection1.ConnectionString = "Provider=SQLOLEDB.1;Password=******;Persist Security Info=True;User ID=sa;Initial Catalog=MioDatabase;Data Source=MKPDATAM"
        Me.SqlConnection1.Open()
 
    End Sub
 
utilizzando lo strumento SqlConnection
 
ora come popolo la combo con una delle tabelle del db?
 


P.S. Continua a darmi errore in User ID !! eppure ho copiato la stringa dal file .udl


 
Ma il link che ti ho postato lo hai guardato? Anche se è c# si capisce 
molto bene.
 
Ti faccio un esempio sperando che sia chiaro.
NB.: uso diverse classi perché ho separato gli oggetti e la logica 
dell'applicazione dal presentation layer
 
Namespace 
NomeDitta.NomeProdotto.BO
 
Public Class Persona
         Public Property ID As Integer
         Public Property Nome As String
         Public Property Cognome As String
         Public Property DataNascita As Date
End Class
 
 
Public Class PersonaList
         Inherits List(Of Persona)
 
End Class
End Namespace
 
Namespace NomeDitta.NomeProdotto.BLL
     <DataObjectAttribute()> _
     Public Class PersonaManager
         <DataObjectMethod(DataObjectMethodType.Select, True)> _
         Public Shared Function GetList() As PersonaList
             Return PersonaDB.GetList()
         End Function
     End Class
End Namespace
 
Namespace NomeDitta.NomeProdotto.DAL
Public Class PersonaDB
     Public Shared Function GetList() As PersonaList
	Dim objList As PersonaList = Nothing
 
             Using cn As New 
SqlConnection(ConfigurationManager.ConnectionStrings("DBMain").ConnectionString)
                 cn.Open()
                 Using cm As SqlCommand = cn.CreateCommand
                     cm.CommandType = CommandType.Text
                     cm.CommandText = "SELECT * FROM   dbo.Persone"
 
                     Using dr As SqlDataReader = cm.ExecuteReader
                         objList = New PersonaList
                         Do While dr.Read
                             objList.Add(FillDataRecord(dr))
                         Loop
                     End Using
                 End Using
             End Using
             Return objList
    End Function
End Class
End Namespace
 
Nel load della form metti:
 
DropDownList1.DataSource = PersonaManager.GetList()
DropDownList1.DataValueField = "ID"
DropDownList1.DataTextField = "Cognome"
DropDownList1.DataBind()
 
 
Ciao, Vincenzo


 
http://www.connectionstrings.com/sql-server-2005
 
 
L'utente esiste su SQL Server? Altrimenti usa l'autenticazione di 
windows se hai il db sulla macchina di sviluppo
 
 
Ciao, Vincenzo
 


il link l'ho guardato ma non dice come connettermi.. volevo usare il mio codice ma va in errore (user e password sono corrette infatti il file .udl mi passa il test di connessione)
mi sa che faccio prima a cercare in azienda qualcuno che mi possa insegnare sempre se lo trovo. Il tuo ultimo esempio per me è incomprensibile, mi spiace! 

Il giorno martedì 26 giugno 2012 12:33:11 UTC+2, vincepik@work ha scritto:

Alla fine sono riuscito a popolare la mia combo e a connettermi. Uso il file udl direttamente nell'applicazione
 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
        'Mi connetto tramite file .udl
        Dim cnStr = "File name = DbBiglia.udl"
        Dim cn As OleDb.OleDbConnection = New OleDb.OleDbConnection(cnStr)
 
        'Definisco la Query
        Dim strSQL As String = "Select * from T_Richiedente"
 
        Dim cmd As New OleDb.OleDbCommand(strSQL, cn)
        cn.Open()
 
        Dim rdr As OleDb.OleDbDataReader = cmd.ExecuteReader
 
        'Popolo la ComboBox
        While (rdr.Read())
            Combo1.Items.Add(rdr("Richiedente"))
        End While
 
        rdr.Close() 'Chiudo la lettura dei dati
        cn.Close()  'Chiudo la connessione
 
    End Sub
 


 
Ok. Sono contento che ce l'hai fatta ad ottenere quello che volevi però 
ti consiglio di approfondire l'argomento 
ADO.NET
 e darei anche uno 
sguardo a come organizzare un'applicazione per separare i vari strati 
applicativi.
http://windowsclient.net/articles/writingntierapps.aspx
 
 
Per qualsiasi cosa sono qui...
 
Ciao, Vincenzo


Non sono un programmatore, imparo poco a poco e quando trovo una soluzione di solito me la scrivo e riutilizzo quella. Darò un'occhiata ad 
ADO.NET
 e se ci capisco qualcosa la utilizzo.
 
Ultima cosa..
Ora prendo i dati dalla tabella e li vedo in una combo :
 
'Mi connetto tramite file .udl
        Dim cnStr = "File name = DbBiglia.udl"
        Dim cn As OleDb.OleDbConnection = New OleDb.OleDbConnection(cnStr)
 
        'Definisco la Query
        Dim strSQL As String = "Select * from T_Richiedente"
 
        Dim cmd As New OleDb.OleDbCommand(strSQL, cn)
        cn.Open()
 
        Dim rdr As OleDb.OleDbDataReader = cmd.ExecuteReader
 
        'Popolo la ComboBox
        While (rdr.Read())
            Combo1.Items.Add(rdr("Richiedente"))
        End While
 
        rdr.Close() 'Chiudo la lettura dei dati
        cn.Close()  'Chiudo la connessione
 
Se nella form metto una TextBox ed il suo contenuto deve andare nella tabella come faccio?
 
ora la combo mi rende Val1, Val2, Val3, ecc...
 
nella textbox metto per es. Val4 e questo deve accodarsi agli altri nella combo..


 
Immagino che Val4 deve essere salvato nel DB quindi (adatto il tuo codice):
 
Function AddValore(ByVal TuoValore as String) as Boolean
Dim cnStr = "File name = DbBiglia.udl"
Dim cn As OleDb.OleDbConnection = New OleDb.OleDbConnection(cnStr)
 
'Definisco la Query
Dim strSQL As String = "INSERT INTO T_Richiedente (NomeCampo) VALUES 
(@NomeParametro)"
 
Dim cmd As New OleDb.OleDbCommand(strSQL, cn)
cn.Open()
 
cmd.Parameters.AddWithValue("@NomeParametro",TuoValore)
Try
	cm.ExecuteNonQuery()
	Return True
Catch ex As Exception
	Return False
Finally
	cn.Close()  'Chiudo la connessione
End Try
 
End Function
 
 
 
Sul bottone avrai qualcosa del genere
 
AddValore(txtValore.Text)
LoadCombo ---> funzione che ricarica i valori nella combo
 
Ciao, Vincenzo
 

 > Non sono un programmatore, imparo poco a poco e quando trovo una soluzione di solito me la scrivo e riutilizzo quella. Darò un'occhiata ad 
ADO.NET
 e se ci capisco qualcosa la utilizzo.

Funziona ma se scrivo Val4, anzichè inserirlo, scrive di nuovo Va11, Val2, Val3
in pratica ripete i 3 record già inseriti..
 
ti chiedo però il significato di alcune cose in modo da capire come adattarlo :
 
Dim strSQL As String = "INSERT INTO T_Richiedente (NomeCampo) VALUES 
(@NomeParametro)" 
 
Al posto di NomeCampo ho messo il nome del campo presente in tabella giusto?
@NomeParametro cosa significa?
 
cmd.Parameters.AddWithValue("@NomeParametro",TuoValore) 
@NomeParametro cosa significa?
TuoValore deve rimanere o va sostituito per es con TextBox1.text?
 
Così dovrei riuscire ad adattare il tutto e poi scrivermi i passaggi nel mio manuale..


 
Ciao, Vincenzo
 
 


Allora, su Button3 ho messo AddValore(TextBox1.Text)
non carica però i dati, nella combo non compare ciò che ho scritto nella TextBox
 
TuoValore nella Function va lasciato così da quanto vedo..
 
Function AddValore(ByVal TuoValore As String) As Boolean
 
        'Aggiungo il dato della textbox alla tabella su server
 
        'Mi connetto
        Dim cnStr = "File name = DbBiglia.udl"
        Dim cn As OleDb.OleDbConnection = New OleDb.OleDbConnection(cnStr)
 
        'Definisco la Query 
        Dim strSQL As String = "INSERT INTO T_Richiedente (Richiedente) VALUES(@Richiedente)"
 
        Dim cmd As New OleDb.OleDbCommand(strSQL, cn)
 
        'Apro la connessione
        cn.Open()
 
        cmd.Parameters.AddWithValue("@Richiedente", TuoValore)
 
        Try
            cmd.ExecuteNonQuery()



su button3, che io rinominerei in btnAggiungi o qualcosa del genere per 
rendere il testo più leggibile (visto che ci sei rinomina anche il 
textbox!), modifica il tuo codice così:
 
 
If AddValore(TextBox1.Text) = True Then
	LoadCombo()
Else
	MessageBox.Show("Problemi con l'inserimento nell'archivio 
dati!","Titolo Applicazione", MessageBoxButtons.OK, 
MessageBoxIcon.Exclamation)
End If
 
Se ti restituisce false prova a mettere un punto di interruzione sulla 
riga catch ex as Exception e vedi che tipo di errore ti viene restituito.
 
Ciao
 
 


LoadCombo? è il codice che uso per popolare la combo?
 
sono entrato in remoto, va in errore ma con TeamViewer non posso usare F5 per scorrere il codice passo passo quindi mi sa che fino a domani non posso fare molto..


 
 
LoadCombo, o chiamala come ti pare, sarà un funzione per riempire la tua 
combobox la prima volta sul load della form e poi sui seguinti click sul 
pulsante Aggiungi.
Mettere il codice in una funzione pubblica serve ad evitarti di 
riscrivere sempre tutto il codice duplicandolo in più parti del programma.
 
Che vuol dire sei entrato in remoto? Hai l'ambiente di sviluppo su 
un'altra macchina?!
 
Comunque fai così:
 
Public Sub LoadCombo()
'Mi connetto tramite file .udl
         Dim cnStr = "File name = DbBiglia.udl"
         Dim cn As OleDb.OleDbConnection = New OleDb.OleDbConnection(cnStr)
 
         'Definisco la Query
         Dim strSQL As String = "Select * from T_Richiedente"
 
         Dim cmd As New OleDb.OleDbCommand(strSQL, cn)
         cn.Open()
 
         Dim rdr As OleDb.OleDbDataReader = cmd.ExecuteReader
 
         'Popolo la ComboBox
         While (rdr.Read())
             Combo1.Items.Add(rdr("Richiedente"))
         End While
 
         rdr.Close() 'Chiudo la lettura dei dati
         cn.Close()  'Chiudo la connessione
End Sub
 
 
Private Sub Form_Load(sender As System.Object, e As System.EventArgs) 
Handles Form.Load
	LoadCombo()
End Sub
 
Private Sub btnAggiungi_Click(sender As System.Object, e As 
System.EventArgs) Handles btnAggiungi.Click
	LoadCombo()
End Sub
 
Capito???
 
Dove ti mando la fattura per la consulenza? ;-)
 
PS: Marco fossi in te mi fermerei un attimo cercando di iniziare da 
qualcosa di più facile perchè l'accesso ai dati e tutto quello che ne 
deriva non è proprio semplice.
Ti consiglio:
http://www.pierotofy.it/pages/guide/Guida_al_Visual_Basic_dotNET/
 
http://programmazione.html.it/guide/leggi/42/guida-vbnet/
 
 
 
Ciao, Vincenzo
 


So delle funzioni pubbliche, era solo per sapere se parlavamo della stessa cosa riguardo a LoadCombo.
Sviluppo sul PC del lavoro ed ora sono a casa. mi sono connesso un attimo per provare il codice, continuerò domani..
per ora grazie, ti faccio poi sapere domani mattina.
buona serata
Marco

Il giorno martedì 26 giugno 2012 18:21:50 UTC+2, vincepik@work ha scritto:

Non avevo visto i link, li userò per crearmi un manuale e studiare un po' in attesa di fare un corso serio sul VB
ciao

             Combo1.Items.Add(rdr("Richiedente"))
 
questa riga non dovrebbe essere Combo1.Items.Add(rdr("T_Richiedente")) ?
 
 


Assolutamente no... "Richiedente" ï¿œ il nome del campo da visualizzare 
mentre T_Richiedente ï¿œ la tabella!
 
Ciao, Vincenzo

Il giorno martedì 26 giugno 2012 18:21:50 UTC+2, vincepik@work ha scritto:

Non funziona!
Se io su btnAggiungi_Click metto solo loadCombo, richiama i dati dalla tabella e basta mentre io voglio caricare un nuovo dato.
 
AddValore(TextBox1.Text) non fa nulla, nella Combo ho sempre i soliti 4 dati e non compare quello nuovo scritto in TextBox


 
In debug cosa succede? Hai qualche Exception?
Se AddValore restituisce False allora c'è qualche problema in fase di 
inserimento...
 
Ciao, Vincenzo


Ho provato così:
            If AddValore(TextBox1.Text) = True Then
                PopolaCombo()
            Else
                MsgBox("False")
            End If
 
e mi da il messaggio "False"
 
Se in AddValore al posto di questa query
Dim strSQL As String = "INSERT INTO T_Richiedente (Richiedente) VALUES(@Richiedente)"
 
metto
Dim strSQL As String = "INSERT INTO T_Richiedente (Richiedente) VALUES('Pippo')"
 
poi commento 
cmd.Parameters.AddWithValue("@Richiedente", TuoValore)
 
funziona!
Ovviamente mette Pippo e non il valore di textbox però va...
non posso solamente modificare strSQL in modo da avere lì il valore di textbox?
 
 


Funziona anche così :
al posto di
cmd.Parameters.AddWithValue("@richiedente", TuoValore)
ho messo
cmd.CommandText = "INSERT INTO T_Richiedente (Richiedente) VALUES('" & TextBox1.Text & "');"
 

 TextBox1.Text & "');"
 
e l'utente nella TextBox scrive:
 
bye bye'; drop table T_Richiedente;
 
e la tua tabella va a farsi fottere :-)
 
*Devi* usare i parameters, punto.
 
.m
 
-- 
blog @ //
milestone.topics.it
 
 
 


Ok sono d'accordo ma non riesco a far funzionare il codice!
 
Dim strSQL As String = "INSERT INTO T_Richiedente (Richiedente) VALUES(@Richiedente);"
cmd.Parameters.AddWithValue("@richiedente", TuoValore)
cmd.ExecuteNonQuery()
 
Non aggiunge nulla...
 

 Non aggiunge nulla...
 
*TuoValore* che cosa è?



Mauro hai dato uno sguardo al thread?
E' da ieri sera che sto cercando di fargli fare passo passo questo 
benedetto inserimento.... TuoValore è un parametro della funzione 
AddValore che Marco dovrebbe richiamare al click sul bottone passandogli 
il valore della textbox
 
Ciao, Vincenzo

 dovrebbe richiamare al click sul bottone passandogli il valore della textbox
 
si si quello l'ho visto, ma ho la sensazione che li dentro ci finisca 
tutto tranne il valore della TextBox che lui si aspetta di metterci.
Dalle domande che ti ha fatto sul codice mi sembra che abbia un po' di 
confusione tra le mani più che altro.


 *Devi* usare i parameters, punto.
 
Hi, do you know little Bobby Tables ? ;-)
 
Bye, G. 
 
 

 Bye, G.



TuoValore fa parte della function :
 
Function AddValore(ByVal TuoValore As String) As Boolean
 
        'Aggiungo il dato della textbox alla tabella su server
 
        'Mi connetto
        Dim cnStr = "File name = DbBiglia.udl"
        Dim cn As OleDb.OleDbConnection = New OleDb.OleDbConnection(cnStr)
 
        'Definisco la Query 
        Dim strSQL As String = "INSERT INTO T_Richiedente (Richiedente) VALUES(@Richiedente)"
 
 
        Dim cmd As New OleDb.OleDbCommand(strSQL, cn)
 
        'Apro la connessione
        cn.Open()
 
        cmd.Parameters.AddWithValue("@richiedente", TuoValore)
 
        Try
            cmd.ExecuteNonQuery()
 
            Return True
 
        Catch ex As Exception
            Return False
        Finally
            cn.Close()  'Chiudo la connessione 
 
        End Try
 
    End Function
 
Poi su pulsante
 
        AddValore(TextBox1.Text)
        Combo1.Items.Clear()  >> Pulisce la combo
        Call PopolaCombo()    >> Ricarica i dati


e se metti un breakpoint in esecuzione all'interno della function? 
TuoValore ha il valore che ti aspetti?
Stai usando Sql Server o un altro database?



Dal breakpoint nella function in cmd.Parameters.AddWithValue("@richiedente", TuoValore) risulta che tuoValore assume correttamente il valore della TextBox (per es aaa)
Va in errore dopo il cmd.ExecuteNonQuery(), non va a True ma a False e l'errore è questo :
Must declare the scalar variable "@Richiedente"
 
 
 


"R" maiusola e "r" minuscola, non hai risposto alla domanda sul 
database che usi.



mannaggia a questa malsanissima abitudina di soffocare le eccezioni...



R maiuscola, ho scritto di fretta..
Il database si trova su SQL Server 2005 situato in un server aziendale e non sul mio PC


cercando di usare la tua stessa filosofia
database sql 2008 express
oggetti sulla form
Combo1
txtNewItem
btnAdd
 
funziona tutto !!!!!
 
 
Public Sub LoadCombo()
 
 
        Dim cnStr As String = "Data Source=XXXXX\sqlexpress;Initial
Catalog=autori;Integrated Security=True"
        Dim cn As SqlConnection = New SqlConnection(cnStr)
 
        'Definisco la Query
        Dim strSQL As String = "Select * from Customers"
 
        Dim cmd As New SqlCommand(strSQL, cn)
        cn.Open()
 
        Dim rdr As SqlDataReader = cmd.ExecuteReader
 
        'Popolo la ComboBox
        While (rdr.Read())
            Combo1.Items.Add(rdr("LastName"))
        End While
 
        rdr.Close() 'Chiudo la lettura dei dati
        cn.Close()  'Chiudo la connessione
    End Sub
 
 
 Private Sub btnAdd_Click(sender As System.Object, e As
System.EventArgs) Handles btnAdd.Click
        AddValore(txtNewItem.Text)
        Combo1.Items.Clear()
        Call LoadCombo()
    End Sub
 
 
Function AddValore(ByVal TuoValore As String) As Boolean
 
        'Aggiungo il dato della textbox alla tabella su server
 
        'Mi connetto
        Dim cnStr As String = "Data Source=XXXX\sqlexpress;Initial
Catalog=autori;Integrated Security=True"
        Dim cn As SqlConnection = New SqlConnection(cnStr)
 
        'Definisco la Query 
        Dim strSQL As String = "INSERT INTO Customers (LastName)
VALUES(@LastName)"
 
 
        Dim cmd As New SqlCommand(strSQL, cn)
 
        'Apro la connessione
        cn.Open()
 
        cmd.Parameters.AddWithValue("@LastName", TuoValore)



 
In genere uso rilanciare l'exception tra i vari layer dell'applicazione 
ma visto l'innumerevole serie di domande/risposte del thread ho evitato 
di postare un esempio con la gestione delle eccezioni.... mi sembra di 
aver messo già troppa carne al fuoco con i Parameters! ;-)
 
Ciao, Vincenzo


Mi fa piacere che a te funzioni peccato che non faccia altrettanto sul mio!
continua a darmi "Must declare the scalar variable @Richiedente"!!!
se uso SqlCommand e non OleDbCommand inoltre, non mi legge più il file .udl

 Ciao, Vincenzo



il file "udl" non serve a nulla con una SqlConnection e l'errore che 
ottieni è probabilmente dovuto al provider OleDb che non digerisce i 
named parameters.
Se nella query al posto del @nome-parametro ci metti semplicemente un 
punto di domanda ?
 
Che succede?



Succede che funziona e mi aggiunge il dato inserito nella TextBox!!!
Dim strSQL As String = "INSERT INTO T_Richiedente (Richiedente) VALUES(?)"
 
Ho messo ? anche in cmd.Parameters.AddWithValue("?",TuoValore)
 
 


quello è indifferente. I parametri per OleDd sono posizionali e non 
nominali (il che è un gran seccatura alla lunga).
 
Devi riuscire a farlo funzionare con il driver per Sql server, vedrai 
che sarà molto meglio.



 
Finalmente!!!!!!!!!!!!
 
Adesso prova a sostituire OleDBConnection con SQLConnection, 
OleDbCommand con SQLCommand
 
La stringa di connessione la trovi sul link che ti ho postato ieri.
 
Naturalmente per usare il provider SQLServer devi aggiungere all'inizio 
del tuo codice
 
Imports System.Data.SqlClient
 
 
Abituati ad usare gli strumenti adatti per ogni base dati, OleDb 
lascialo per Access e tutti i DB che non hanno un loro provider!
 
http://www.connectionstrings.com/Providers/sqlconnection
 
 
 
 
Ciao, Vincenzo

 > La stringa di connessione la trovi sul link che ti ho postato ieri.
 
intendi questa?
Me.SqlConnection1.ConnectionString = "Provider=SQLOLEDB.1;Password=******;Persist Security Info=True;User ID=sa;Initial Catalog=MioDatabase;Data Source=MKPDATAM" 
Me.SqlConnection1.Open() 
 
mi va in errore su User ID, non lo riconosce eppure la stringa è copiata dal file .udl! se uso il file funziona ma per usarlo in LoadCombo devo usare oledb e non  sqlconnection!
 

Ciao Marco75,
 
You wrote on 27/06/2012 :

se leggi il link che ti è stato girato noti che non c'è mai la keyword 
"provider".



Anche in AddValore, se uso sqlconnection e non ole va in errore
funzionasse la stringa di connessione forse ci sarei.....


 
Cosa non ti è chiaro di questo link?
http://www.connectionstrings.com/sql-server-2005
 
 
Ciao, Vincenzo


ho provato con Server=myServerName\theInstanceName;Database=myDataBase;Trusted_Connection=True;
 
che adattato è :
 
 Public Sub ApriDbServer()
 
        Try
 
 
Me.SqlConnection1.ConnectionString = "Server=MKPDATAM\MKPDATAM;Database=Biglia;Trusted_Connection=True;"
            Me.SqlConnection1.Open()
            MessageBox.Show("Aperto")
 
        Catch ex As Exception
 
            MessageBox.Show(ex.Message)
 
        End Try
    End Sub
 
Il messaggio è sempre "Opzione di connessione sconosciuta nella stringa di connessione : server"

 connessione : server"
 
riesci a connetterti a quel server con il management studio di Sql o 
con il tool integrato (Servers) di visual studio?
 
Sei sicuro che sia un Sql Server? e che il tuo utente locale (quindi 
l'utente Windows) posso accedere a quel db?



 
 
 
Hai l'autenticazione mista su SQL Server?
 
Prova ad usare questa:
 
dim cn as new SQLConnection("Data Source=MKPDATAM\MKPDATAM;Initial 
Catalog=Biglia;User Id=myUsername;Password=myPassword;")
 
cn.Open()
.....
 
cn.Close()
 
 
 
Ciao, Vincenzo


Sì riesco...
ho aperto SQL Server magement studio express sul mio PC, ho inserito 
Server = mkpdatam
User   = sa
Passw  = *****
 
e vedo tutti i miei db che risiedono sulla macchina server sotto al mio ufficio per cui la connessione in qualche modo c'è almeno tra i 2 SQL Server
 

 Passw  = *****
 
perché qui metti "mkpdatam" mentre nella connection string metti 
"mkpdatam\mkpdatam"?



 
Perchè mi sa tanto che il problema non è solo 
VB.NET
 ...
 
;-)
Vincenzo
 


Ho provato sia con mkpdatam\mkpdatam che solo con mkpdatam
in sql server basta il server e non anche l'istanza

 Il messaggio è sempre "Opzione di connessione sconosciuta nella stringa di connessione : server"
 
Infatti nelle cs di quel tipo non si usa 'Server', si usa 'Data Source'...
 
 
fe...@delenda.net
 
-- 
http://delendanet.blogspot.com