Bonjour à tous et à toutes
J'ai le problème suivant je fait une petite application qui doit ecrire dans un fichier excel.
Cependant je ne peut pas utiliser interop car la machine n'a pas le pack office
Donc du coup les données je pensais les transférer via OleDB.
Mais j'ai soit une erreur soit Rien.

Je mets le code suivant

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Public Sub EnregistrementPiece()
        Dim feuille As String = "Feuil1"
        Dim StrSQL As String
        Using Conn As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Chemin & ";Extended Properties=""Excel 8.0;HDR=NO;IMEX=1""")
 
            StrSQL = "UPDATE [" & feuille & "]  SET F25=" & CStr(Now) & " WHERE F2 = ' " & MainRMP.CBpiece.SelectedItem.ToString & "'"
            Conn.Open()
            Dim command As New OleDbCommand(StrSQL)
            command.executeqwery()
 
            command.CommandTimeout = 20
 
 
 
            Conn.Close()
 
        End Using
 
    End Sub
J'ai péché ca un peu partout mais je pense ne pas faire correctement la commande. il faut savoir que le fichier excel n'est pas franchement structuré comme une base de donnée j'ai des colonnes avec un nom en première ligne et d'autres non. Il se peut qua cela soit ma requete qui soit pourrie egalement ??

Merci pour ceux qui ont l'habitude sur OleDB de me filer un coup de pouce.