cs_Jielde
Messages postés226Date d'inscriptionmardi 17 octobre 2000StatutMembreDernière intervention 1 décembre 2010
-
21 mai 2003 à 15:39
surfzoid
Messages postés463Date d'inscriptionvendredi 15 août 2003StatutMembreDernière intervention21 avril 2010
-
26 juil. 2005 à 12:23
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
surfzoid
Messages postés463Date d'inscriptionvendredi 15 août 2003StatutMembreDernière intervention21 avril 2010 26 juil. 2005 à 12:23
tbbuim1 :
Tu rempli sql avec quoi ,pour ma part j ai été obligé de le remplacer par "USE mysql"; et je ne peut toujours pas modifier directement dans une cellule du datagrid.
Je parle de ma source a l' adresse suivante :
http://www.vbfrance.com/code.aspx?id=30750
cs_sispeo
Messages postés9Date d'inscriptionmardi 21 janvier 2003StatutMembreDernière intervention16 septembre 2008 20 juil. 2005 à 23:28
pour connaitre le nom des colones d'une table en SQL :
describe MATABLE
tbbuim1
Messages postés940Date d'inscriptionjeudi 20 février 2003StatutMembreDernière intervention 3 février 20119 19 juil. 2005 à 16:38
Beh moi j'arrive à modifier mon datagrid et autre comme sous access... :p J'ai mis rs.Open sql, conn, adOpenDynamic, adLockOptimistic
J'ai exporter ma base access sous MySQL par MyODBC
Et surtout j'ai rajouté une clé primaire à ma base, sans la clé primaire, il ne voulait rien modifier!
tbbuim1
Messages postés940Date d'inscriptionjeudi 20 février 2003StatutMembreDernière intervention 3 février 20119 19 juil. 2005 à 09:11
Merci, c'est impeccable!
BruNews
Messages postés21040Date d'inscriptionjeudi 23 janvier 2003StatutModérateurDernière intervention21 août 2019 18 juil. 2005 à 18:01
tbbuim1
Messages postés940Date d'inscriptionjeudi 20 février 2003StatutMembreDernière intervention 3 février 20119 18 juil. 2005 à 17:57
Je ne trouve pas les drivers pour MyODBC sur le site de microsoft!
Serait-il possible d'avoir un lien où je pourrais les télécharger stp?
surfzoid
Messages postés463Date d'inscriptionvendredi 15 août 2003StatutMembreDernière intervention21 avril 2010 21 avril 2005 à 20:26
sinon quel qu un sait pouquoi ont ne peut editer les cellules directement comme dans access par exemple ,alors que aprés un clic droit sur le datagrid (en mode edition) et proprieté j ai coché toute les cases y compris allowupdate .......
surfzoid
Messages postés463Date d'inscriptionvendredi 15 août 2003StatutMembreDernière intervention21 avril 2010 19 avril 2005 à 20:44
sydaze :
si ta question de l entete tiens tjrs voici la reponse en suposant que ton datagrid s appel datgrdata :
Private Sub datgrdData_HeadClick(ByVal ColIndex As Integer)
dim choixidxtri as strings
choixidxtri = datgrdData.Columns(ColIndex).Caption
MsgBox choixidxtri
End Sub
manbust :
si c est mysql sur un linux box :
Private Sub Exporter_Click()
Dim reponse As VbMsgBoxResult
On Error GoTo erreur
reponse = MsgBox("Ceci ne marche que si vous êtes connecté au réseau local du serveur linux", vbOKCancel)
If reponse = vbCancel Then Exit Sub
If Dir("T:" & user & "\result_" & user & ".xls") <> "" Then Kill "T:" & user & "\result_" & user & ".xls"
cmd.CommandText = "SELECT * INTO OUTFILE '/stock100Gig/tmp/" & user & "/result_" & user & ".xls'FROM " & user & ";"
cmd.Execute sql
reponse = MsgBox("Fichier enregistrer dans T:" & user & "\result_" & user & ".xls ,faut il l'ouvrir avec Excels ?", vbYesNo)
If reponse = vbYes Then ShellExecute Me.hWnd, vbNullString, "T:" & user & "\result_" & user & ".xls", vbNullString, "", 1
erreur:
If Err.Description = "" Then
Else
MsgBox Err.Description
End If
End Sub
Private Sub Restaurer_Click()
On Error GoTo erreur
MsgBox "Le fichier qui permet de restaurer est celui que vous avez tout d'abord exporté ,donc si Excels à ouvert ce fichier il en as l'exclusivité,la restauration sera un échec.", vbInformation
cmd.CommandText = "LOAD DATA INFILE '/stock100Gig/tmp/" & user & "/result_" & user & ".xls' REPLACE INTO TABLE " & user & ";"
cmd.Execute sql
rafraichir
erreur:
If Err.Description = "" Then
Else
MsgBox Err.Description
End If
End Sub
manubust
Messages postés4Date d'inscriptionmercredi 9 mars 2005StatutMembreDernière intervention19 avril 2005 19 avril 2005 à 10:19
il aurai etait cool que ce script premette de faire un dump des db de son choix
j'ai pas trouver comment faire perso ..
SyDaze
Messages postés71Date d'inscriptionjeudi 6 mars 2003StatutMembreDernière intervention 8 juin 2007 13 juin 2003 à 08:46
ben en fait c tout simple il suffit de faire : recordset.fields.name
SyDaze
Messages postés71Date d'inscriptionjeudi 6 mars 2003StatutMembreDernière intervention 8 juin 2007 28 mai 2003 à 08:26
Merci , mais en fait je voulais dire la selection non pas des enregistrements d'une colonne mais du titre de cette colonne
cs_sispeo
Messages postés9Date d'inscriptionmardi 21 janvier 2003StatutMembreDernière intervention16 septembre 2008 27 mai 2003 à 23:35
pour ta question SQL, il suffit de faire un "select * from tatable where tonchamp like 'chainecherchée'", attention en fonction du type de champ (text ou chiffre) il vaut mieux remplacer like par =
je vais regarder ton source a l'occase, si ta des questions pas de probleme
SyDaze
Messages postés71Date d'inscriptionjeudi 6 mars 2003StatutMembreDernière intervention 8 juin 2007 21 mai 2003 à 16:49
y'a aussi la possibilité d'utiliser le vbscript sur des pages ASP
SyDaze
Messages postés71Date d'inscriptionjeudi 6 mars 2003StatutMembreDernière intervention 8 juin 2007 21 mai 2003 à 16:22
bon ben c pareil, je n'ai jamais utiliser vb pour les pages web dynamiques mais je crois qu'il faut utiliser l'objet WebClass qui fera le lien avec tes pages html et l'application vb qui se trouve du le serveur
cs_Jielde
Messages postés226Date d'inscriptionmardi 17 octobre 2000StatutMembreDernière intervention 1 décembre 2010 21 mai 2003 à 16:04
et en vb ?
SyDaze
Messages postés71Date d'inscriptionjeudi 6 mars 2003StatutMembreDernière intervention 8 juin 2007 21 mai 2003 à 16:00
tu as eu cette erreur parceque tu n'a pas installé les pilotes MyODBC necessaires à ta connection avec la base de donnée.
sinon oui tu peu te connecter à une DB sur un site en utilisant de préference du PHP
cs_Jielde
Messages postés226Date d'inscriptionmardi 17 octobre 2000StatutMembreDernière intervention 1 décembre 2010 21 mai 2003 à 15:39
Slut, il y a une erreur.
[Microsoft][Gestionnaire de pilotes ODBC] Source de données introuvable et nom de pilote non spécifié
Sinon je ne m'y connais pas trop en DB mais on peux ce connecté a un DB sur un site ?
26 juil. 2005 à 12:23
Tu rempli sql avec quoi ,pour ma part j ai été obligé de le remplacer par "USE mysql"; et je ne peut toujours pas modifier directement dans une cellule du datagrid.
Je parle de ma source a l' adresse suivante :
http://www.vbfrance.com/code.aspx?id=30750
20 juil. 2005 à 23:28
describe MATABLE
19 juil. 2005 à 16:38
J'ai exporter ma base access sous MySQL par MyODBC
Et surtout j'ai rajouté une clé primaire à ma base, sans la clé primaire, il ne voulait rien modifier!
19 juil. 2005 à 09:11
18 juil. 2005 à 18:01
Va voir ici: http://www.mysql.com/downloads/api-myodbc.html
18 juil. 2005 à 17:57
Serait-il possible d'avoir un lien où je pourrais les télécharger stp?
21 avril 2005 à 20:26
19 avril 2005 à 20:44
si ta question de l entete tiens tjrs voici la reponse en suposant que ton datagrid s appel datgrdata :
Private Sub datgrdData_HeadClick(ByVal ColIndex As Integer)
dim choixidxtri as strings
choixidxtri = datgrdData.Columns(ColIndex).Caption
MsgBox choixidxtri
End Sub
manbust :
si c est mysql sur un linux box :
Private Sub Exporter_Click()
Dim reponse As VbMsgBoxResult
On Error GoTo erreur
reponse = MsgBox("Ceci ne marche que si vous êtes connecté au réseau local du serveur linux", vbOKCancel)
If reponse = vbCancel Then Exit Sub
If Dir("T:" & user & "\result_" & user & ".xls") <> "" Then Kill "T:" & user & "\result_" & user & ".xls"
cmd.CommandText = "SELECT * INTO OUTFILE '/stock100Gig/tmp/" & user & "/result_" & user & ".xls'FROM " & user & ";"
cmd.Execute sql
reponse = MsgBox("Fichier enregistrer dans T:" & user & "\result_" & user & ".xls ,faut il l'ouvrir avec Excels ?", vbYesNo)
If reponse = vbYes Then ShellExecute Me.hWnd, vbNullString, "T:" & user & "\result_" & user & ".xls", vbNullString, "", 1
erreur:
If Err.Description = "" Then
Else
MsgBox Err.Description
End If
End Sub
Private Sub Restaurer_Click()
On Error GoTo erreur
MsgBox "Le fichier qui permet de restaurer est celui que vous avez tout d'abord exporté ,donc si Excels à ouvert ce fichier il en as l'exclusivité,la restauration sera un échec.", vbInformation
cmd.CommandText = "LOAD DATA INFILE '/stock100Gig/tmp/" & user & "/result_" & user & ".xls' REPLACE INTO TABLE " & user & ";"
cmd.Execute sql
rafraichir
erreur:
If Err.Description = "" Then
Else
MsgBox Err.Description
End If
End Sub
19 avril 2005 à 10:19
j'ai pas trouver comment faire perso ..
13 juin 2003 à 08:46
28 mai 2003 à 08:26
27 mai 2003 à 23:35
je vais regarder ton source a l'occase, si ta des questions pas de probleme
21 mai 2003 à 16:49
21 mai 2003 à 16:22
21 mai 2003 à 16:04
21 mai 2003 à 16:00
sinon oui tu peu te connecter à une DB sur un site en utilisant de préference du PHP
21 mai 2003 à 15:39
[Microsoft][Gestionnaire de pilotes ODBC] Source de données introuvable et nom de pilote non spécifié
Sinon je ne m'y connais pas trop en DB mais on peux ce connecté a un DB sur un site ?
Merci