begin process at 2012 02 14 00:40:20
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Visual Basic 6

 > 

Base de données

 > 

SQL

 > 

importation des donnees


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

importation des donnees

mardi 28 octobre 2008 à 15:38:56 | importation des donnees

nada2008

bonjour a tous,
SVP je veux importer des donnees excel vers une base mysql en vb6
merciiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii
mardi 28 octobre 2008 à 16:25:21 | Re : importation des donnees

lillith212

Membre Club
Bonjour,

Je vais te faire une fleur... Je vais reformuler afin qu'on ne prenne pas la mouche:
"je souhaite importer des données excel dans une base mysql par codage en vb6. Je suis perdu. Peut on m'aider s'il vous plait Merci"
C'est mieux que "Je veux"
http://www.vbfrance.com/codes/EXPORTER-DONNEES-BASE-DONNEE-MYSQL-VERS-EXCEL_7345.aspx
ca te donne déjà une premiere approche pour ton problème
http://www.vbfrance.com/codes/UTILISER-VB-MYSQL_8100.aspx
ca c'est pour le lien vb et mysql


S.L.B.


-- Le règlement tu liras -- Des recherches tu feras -- Le style SMS tu banniras --
-- De la validation pertinente tu feras -- Du respect tu auras --
<

mardi 28 octobre 2008 à 17:07:31 | Re : importation des donnees

nada2008

j'ai dis bonjour , SVP ,et merciiiiii
je pense que c un forum pour les questions et pas pour les compliments
merci pour les liens

mardi 28 octobre 2008 à 17:54:41 | Re : importation des donnees

PCPT

Administrateur CodeS-SourceS
salut,

la politesse y est mais en réalité...., pas la question :)

"je veux importer excel vers mysql", c'est un export çà, non?

et quelle est la difficulté que tu rencontres? lire excel? récupérer les données? connexion à mysql? créer une base mysql?
quel est ton code actuel?

y'a pas de question, tu dis ce que tu veux....

ok : do it

Prenez un instant pour répondre à ce sondage svp 
mardi 28 octobre 2008 à 22:07:47 | Re : importation des donnees

nada2008

ok dsl pour le retard ,
le probleme ke j'ai c'est d'importer les champs d'un fichier excel dans ma base mysql ,j'ai deja fais connexion avec la base mysql et ca marche

SVP aidez moi
mardi 28 octobre 2008 à 23:39:05 | Re : importation des donnees

PCPT

Administrateur CodeS-SourceS
le reste se trouve ici alors :

'    CONNEXION À UNE BASE DE DONNÉES MYSQL
'    http://www.codyx.org/snippet_connexion-base-donnees-mysql_108.aspx#1899
'    Posté par [ PCPT ] le 23/06/2008


'   COPIEZ LE CODE CI-DESSOUS DANS UN MODULE DE CLASS, VOUS AVEZ ACCES AUX OBJETS DB ET RS
Option Explicit
' msado25.tlb (Microsoft ActiveX Data Objects 2.5 Library)
' msadox.dll (Microsoft ADO Ext. 2.7 for DLL and Security)
Public  DB  As  New ADODB.Connection
Public  RS  As  New Recordset
    
'   CONNEXION
Public Function DBConnect(ByVal sDBName As String, Optional ByVal sHost As String = "127.0.0.1"Optional ByVal sUser As String "root"Optional ByVal sPassword As String = vbNullString) As Boolean
    Me.DBClose
    With DB
        .ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=" & sHost & ";DATABASE=" & sDBName & ";UID=" & sUser & ";PWD=" & sPassword & ";OPTION=" 32 2048 16384 ";"
        .CursorLocation = adUseClient
        .ConnectionTimeout = 1
        .CommandTimeout = 1
        On Error GoTo Err_Handler
        .Open
        DBConnect = True
        Exit Function
    End With
Err_Handler:
    Debug.Print "[DBConnect] " & Err.Number & " : " & Err.Description
End Function
'   FERMETURE DB
Public Sub DBClose()
    Me.DB.Cancel
    If Me.DBConnected Then Me.DB.Close
End Sub
'   BASE CONNECTéE ?
Public Function DBConnected() As Boolean
    DBConnected = Not (Me.DB.State = adStateClosed)
End Function
'   REQUÊTE
Public Function RSExecute(ByVal sSql As String) As Boolean
    If Me.DBConnected Then
        Call RSClose
        Me.RS.CursorLocation = adUseClient
        On Local Error GoTo Err_Handler
        Me.RS.Open sSql, Me.DB, adOpenDynamic, adLockOptimistic, -1
        RSExecute = True
    End If
    Exit Function
Err_Handler:
    Debug.Print "[RSExecute] " & Err.Number & " : " & Err.Description
End Function
'   FERMETURE RS
Private Sub RSClose()
    Me.RS.Cancel
    If Not (Me.RS.State = adStateClosed) Then Me.RS.Close
End Sub
'   DESTRUCTION CLASS
Private Sub Class_Terminate()
    Call RSClose:   Set Me.RS = Nothing
    Me.DBClose:     Set Me.DB = Nothing
End Sub


ps : merci d'éviter les messages SMS !


Cette discussion est classée dans : donnees, importation


Répondre à ce message

Sujets en rapport avec ce message

importation exportation donnees access [ par momoito ] Bonjour,Je voudrai savoir les differents moyens d'importer/exporter des donnes venant d'un fichier access vers une autre application (excel, microsoft IMPORTATION BASE COPIE DONNEES [ par boaconsaxor ] Bonjour a tous et merci davance pour vos reponse.je suis actuellment en stage. et je dois importer ,vers ma base de donnee, une table I d'une autre ba importation des donnees excel vers access [ par wfidad ] je veux importer des données sous excel vers access par vb6 pour faire des testes en vb6merci de bien me repondre le plus tôt possible importation [ par LUNE76 ] comment faire pour importer un fichier excel dans une base de donnees accesses qu'on doit creer une table servant à la reception de ces donnees ? importation des donnees d'une feuille excel vers ma base acces en utilisant l'interface vb [ par tlemsani_amine ] bonjour svp j'ai un probleme qui est l'importation des donnees d'une feuille excel vers ma base acces en utilisant l'interface vb COMMENT INTEGER LES DONNEES D'UNE TABLE ACCESS [ par DHN93160 ] COMMENT INTEGRER DANS UN COMBOBOX OU DANS UN LISTBOX LES DONNEES D'UN CHAMP PRECIS D'UNE TABLE ACCESS. MERCI ET URGENT TRIER LES DONNEES [ par DHN93160 ] J'AI UN FORMULAIRE AVEC UN TEXTBOX QUI AFFICHE LES DONNEES D'UNE BASE DE DONNEE. DANS CE CHAMP,IL Y A DES DONNEES QUI COMMENCENT PAR 321XXXX,721XXXX,1 commet transferer ou copier des informations contenues dans un fichier texte vers une base de donnees? [ par kaxx ] salut a tousJe dois exploiter les fichiers binaires convertis en fichiers textes par un serveur. A la reconnaissance des champs et valeurs contenus da Requette Http - Winsock [ par hhhp2004 ] hhhp2004salut,wns.Connect site, port For a = 0 To 500000 DoEventsNext a If wns.State = sckConnected Then wns.SendData "GET http://" & site & " HTTP/1. empecher l'enregistrement des donnees par un formulaire access [ par teuteu_ ] Bonjour à tous   j'ai un petit souci sur leaquel je bloque depuis pas mal de temps étant donné mon niveau sur Access. j'ai réalisé un petite appli s


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 2,668 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales