SQL et VBNET?

Bonjour!

J'ai une appli VBNET basée sur une base de données MDB (Access) qui est stockée dans le repertoire de l'install, les users modifient, rajoutent et suppriment des entrées dans leur base en local sans problème.

Je souhaiterais maintenant (et c'est la le problème) que tous les users puissent se connecter à une seconde base (qui sera donc commune à tout le monde), qui sera en SQL stockée sur le serveur de mon site, et y rajouter des données, pour que ces données puissent ensuite etre téléchargées par tout le monde à partir de l'application, et inserées dans la base MDB de l'user qui l'a téléchargé.

Cela pose donc deux problèmes :

1. Comment faire pour connecter VBNET au SQL et inserer des données dans la base SQL à partir du MDB?

2. Comment faire pour afficher les résultats de la base SQL avec possibilité de télécharger certaines valeur dans la base mdb?

Pour l'instant je laisse un peu de coté le second problème, chaque chose en son temps. Pour commencer, je voudrais donc savoir comment connecter VBNET à une SQL sur un serveur distant?

Merci d'avance pour vos réponses ;)

salut,

voici un petit code qui sert a se connecter a Sql via Vb.net :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28

'À chaque fois que vous manipulez du sql, que se soit l'objet connexion ou une requête, faites les IMPORTS suivants Imports System.Data Imports System.Data.SqlClient   'Dans un module à part Public nom_connexion As New SqlConnection   'À l'ouverture de la première fenêtre du projet nom_connexion.ConnectionString = "Persist Security Info=False;Integrated Security=SSPI;database=nom_base;server=nom_serv" nom_connexion.Open()   'Exécution d'une requête SELECT Dim myCommand As New SqlCommand(texe_requete, nom_connexion) Dim myReader As SqlDataReader = myCommand.ExecuteReader()   myReader.Read() 'Traitement   myReader.Close()   'Réutiliser le reader pour une autre requête myCommand.ComandText = nouveau_texte_requete myReader = myCommand.ExecuteReader()   'Récupérer les valeurs du SELECT 'Les numéros de colonnes du SELECT commence à 0 et non à 1 variable_texte = myReader.GetString(num_colonne) variable_numérique = myReader.GetValue(num_colonne)

---

Bonne chance ;)

Merci More, je vais tester ca ;)

J'ai mis donc ce code (en ayant bien fait les imports requis) :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

connection.ConnectionString = "Persist Security Info=False;Integrated Security=SSPI;database='nom_de_ma_base';server='http://www.monsite.com'" connection.Open()   Dim Command_count_albums_gbu As New SqlCommand("SELECT COUNT(*) FROM ALBUMS", connection) Dim myReader As SqlDataReader = Command_count_albums_gbu.ExecuteReader()   myReader.Read() 'Traitement   myReader.Close()   'Récupérer les valeurs du SELECT 'Les numéros de colonnes du SELECT commence à 0 et non à 1   Dim text As String text = myReader.GetString(1) Dim num As Decimal num = myReader.GetValue(2)

---

Et j'obtient cela :

Une erreur s'est produite lors de l'établissement d'une connexion au serveur. Lors de la connexion à SQL Server 2005, cet échec peut être dû au fait que les paramètres par défaut de SQL Server n'autorisent pas les connexions à distance. (provider: Fournisseur de canaux nommés, error: 40 - Impossible d'ouvrir une connexion à SQL Server)

Je précise que ma base requiert un login et un password, or, je n'ai pas vu d'endroit ou les placer dans le code donc je ne les ai pas mis, c'est peut etre pour ca? Sinon, j'ai mis le nom de la base et l'adresse entre guillemets, je ne sais pas s'il fallait? Quant au serveur je ne sais pas sous quelle forme il faut l'indiquer alors je l'ai mis en http://.. mais je ne sais pas si c'est ce qu'il fallait faire...

Merci pour vos réponses ;)

Comment ca se fait que ca sujet se retrouve ici? 8O

Je l'avais placé dans Vb .NET! 8O 8O

Je trouverai jamais de solution à mon problème s'il reste ici, puisque ma question concerne le Vb NET! :? ???

Etrange...