[réglé]Visual Basic Express 2005 et Bases de données

[gael49]

bonjour,

J'ai besoin de créer une appli sous Visual Basic ayant accès à une base de données Access, je précise que je suis complètement novice en VB
Donc j'ai essayé de créer ma base sous Access avec notamment la pseudo-table "Article" qui est en fait un fichier texte attaché et d'autres tables classiques. Mais lorsque je crée le Dataset dans VB, j'ai le message suivant :



Et il n'ajoute pas la table "Article"...
Je n'ai pas trouvé comment utiliser un fichier texte comme source de données, et je ne peux pas transformer la table Article en une "vraie" table Access car c'est un fichier texte qui est mis à jour très régulièrement.

Donc finalement pour résumer, ma question est : comment ajouter dans VB un fichier CSV ou TXT en source de données ?

[blankoworld]

Bonjour,

Ce me semble qu'actuellement c'est avec du XML que ça bosse DotNet ...
De plus je crois voir que tu as la version Express, gratuite je pense, et du coup certaines fonctionnalités ne sont pas comprises dans ce programme. Pour cela il faudrait la version Pro (je ne sais pas combien cela coûte, mais c'est MSDN Library qui me l'a fourni).

[gael49]

Je sens que ça va être une galère cette histoire ...

J'ai trouvé ce tuto sur Internet pour accèder à un fichier csv et y faire des requetes, mais je ne comprends pas grand chose
A quel endroit je dois mettre le chemin et le nom de mon fichier là dedans ?

Private Sub cmdLoad_Click()
Dim Cn1 As ADODB.Connection
Dim Rs1 As ADODB.Recordset
Dim iSQLStr As String
Dim field_num As Integer

Set Cn1 = New ADODB.Connection
Cn1.ConnectionString = _
"Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
"DefaultDir=" & txtDir.Text
Cn1.Open

lstResults.Visible = False
DoEvents

iSQLStr = "Select * FROM " & txtFile.Text & _
" ORDER BY " & txtField.Text
field_num = CInt(txtField.Text) - 1
Set Rs1 = Cn1.Execute(iSQLStr)
lstResults.Clear
While Not Rs1.EOF
If IsNull(Rs1.Fields(field_num).Value) Then
lstResults.AddItem "<null>"
Else
lstResults.AddItem Rs1.Fields(field_num).Value
End If
Rs1.MoveNext
Wend

lstResults.Visible = True
End Sub

[gael49]

En fait le type ADODB.Connection n'est pas défini dans VB 2005 apparemment et ADODB.Recordset n'est pas reconnu, donc j'imagine qu'il faut s'y prendre différemment...

[gael49]

Est-ce que vous connaissez un bon tutorial sur VB 2005 Express ? Plus je cherche et moins je comprends Dataset, TableAdapter,etc... comment ça marche ??

[blankoworld]

Quand tu dis non reconnu, c'est à dire ? Tu tappes et il n'auto complémente pas ?
Sûrement que tu as oublié d'importer les classes appropriées.

Un tutoriel ? Oui pourquoi pas, voici ce avec quoi j'ai commencé : Tutoriel par Philippe Laserre.

Pour le code, je le relis et je vais voir s'il y a matière à donner le nom du fichier CVS.

Edit : txtDir.Text est le texte contenu dans un formulaire (on nomme ça Label, ou plus communément, Etiquette). Il indique le répertoire où se trouve le fichier.
Pour le fichier, c'est pareil, c'est txtFile.Text, qui est le texte contenu dans une Etiquette nommé txtFile.

Voilà .

[gael49]

Quand tu dis non reconnu, c'est à dire ? Tu tappes et il n'auto complémente pas ?

Non en fait "ADODB.Connection" est souligné avec un point d'exclamation à coté, et quand je clique sur ce point d'exclamation, il me dit que ADODB.Connection n'est pas défini.
Je n'arrive pas à trouver de bons tutos pour VB2005 qui à l'air assez différent de VB6.

[blankoworld]

Celui que j'ai donné n'est pas bon ?

Et comme je l'ai dit, tu dois IMPORTER les bibliothèques appropriées afin que cela fonctionne.
Tout en haut de ton code, la toute première ligne, tu dois tapper :

Code: Tout sélectionner

Import System.NomLibrairie.Module.Fonction

(c'est un exemple, mais il te propose automatiquement les fonctions ou autres).
N'ayant pas de Windows sous la main et je n'ai pas encore installé Mono sur cette machine, je ne peux donc pas te donner la solution exacte.

[gael49]

Merci Blanko, pour ce projet je vais finalement changer de langage, j'ai pas le temps d'apprendre le VB maintenant, je réessayerai plus tard. En attendant j'ai commencé à faire ça en PHP et ça à l'air de bien fonctionner, je lancerai l'importation du csv qui dure environ 1 minute par un cron la nuit, le reste est quasi-instantané.