Soyez le premier à donner votre avis sur cette source.
Snippet vu 17 431 fois - Téléchargée 37 fois
dim aaaa dim var1 lig1 = 2 set aaaa = createObject("Excel.Application") aaaa.workbooks.add set di = createobject("ADODB.connection") 'allez voir dans les sources ODBC' di.open "Windows DSN Name","User","Passeword" set rs= createobject("ADODB.recordset") sql = "select NOM CHAMPS from NOM TABLE" rs.open sql,di do while not rs.eof var1 = rs.fields("Nom champ").value aaaa.range("A" & lig1).select aaaa.Activecell.formulaR1C1 = var1 lig1 = lig1 + 1 rs.movenext loop rs.close aaaa.columns("A").columnwidth = 25 aaaa.range("A1").select aaaa.Activecell.formulaR1C1 = "GNAGNAGNA" aaaa.activeworkbook.saveas "c:\nom fichier Excel.xls" aaaa.quit
je veux déloyer mon app connect a mysql
et lord d'installaion je veux installer tous les principes de ce app
ex : connector , serveur mysql
svp si qq un connu la reponnd repond
et de toute façon merci a tous
Merci beaucoup !!
voila je cherche un script permettant d'exporter les données mysql vers un fichier excel sous forme de tableau. voila
merci
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.