Requête de creation de table...
noisy
-
18 juil. 2001 à 14:44
angeredil Messages postés 1 Date d'inscription mardi 19 avril 2005 Statut Membre Dernière intervention 10 juin 2005 - 10 juin 2005 à 12:27
angeredil Messages postés 1 Date d'inscription mardi 19 avril 2005 Statut Membre Dernière intervention 10 juin 2005 - 10 juin 2005 à 12:27
5 réponses
J'ai piqué ça dans l'aide de Vb, comme quoi faut chercher
et on trouve.
J'espere que c'est assez clair, si t'as des questions,
poses les.
The following code example shows how to create a new table using SQL statements.
Dim rs, i, sql(12), sqlcmd
Set rs = CreateObject("adoce.recordset")
sql(0) = "create table allfields ("
sql(1) = "f1 varchar ," 'adVarWChar
sql(2) = "f2 varchar(30)," 'adVarWChar
sql(3) = "f3 text ," 'adLongVarWChar
sql(4) = "f4 varbinary ," 'adVarBinary
sql(5) = "f5 varbinary (30) ," 'adVarBinary
sql(6) = "f6 long varbinary ," 'adLongVarBinary
sql(7) = "f7 int ," 'adInteger
sql(8) = "f8 smallint ," 'adSmallInt
sql(9) = "f9 float ," 'adDouble
sql(10) = "f10 datetime ," 'adDate
sql(11) = "f11 bit" 'adBoolean
sql(12) = ")"
For i = 0 To 12
sqlcmd = sqlcmd & sql(i)
Next
rs.Open sqlcmd
rs.Open "allfields"
MsgBox rs.Fields.Count, , "Fields"
rs.Close
Set rs = Nothing
et on trouve.
J'espere que c'est assez clair, si t'as des questions,
poses les.
The following code example shows how to create a new table using SQL statements.
Dim rs, i, sql(12), sqlcmd
Set rs = CreateObject("adoce.recordset")
sql(0) = "create table allfields ("
sql(1) = "f1 varchar ," 'adVarWChar
sql(2) = "f2 varchar(30)," 'adVarWChar
sql(3) = "f3 text ," 'adLongVarWChar
sql(4) = "f4 varbinary ," 'adVarBinary
sql(5) = "f5 varbinary (30) ," 'adVarBinary
sql(6) = "f6 long varbinary ," 'adLongVarBinary
sql(7) = "f7 int ," 'adInteger
sql(8) = "f8 smallint ," 'adSmallInt
sql(9) = "f9 float ," 'adDouble
sql(10) = "f10 datetime ," 'adDate
sql(11) = "f11 bit" 'adBoolean
sql(12) = ")"
For i = 0 To 12
sqlcmd = sqlcmd & sql(i)
Next
rs.Open sqlcmd
rs.Open "allfields"
MsgBox rs.Fields.Count, , "Fields"
rs.Close
Set rs = Nothing
Déjà, ton code ressemble vachement à du ASP... même complètement...
Ensuite, j'ai déjà ma requête de création stockée dans Access...
C'est juste pour l'executer que je veux savoir
(en passant, comme je suis à mon taff, j'ai pas l'aide de VB... manque de place : pas d'installation de la biblio MSN
Ensuite, j'ai déjà ma requête de création stockée dans Access...
C'est juste pour l'executer que je veux savoir
(en passant, comme je suis à mon taff, j'ai pas l'aide de VB... manque de place : pas d'installation de la biblio MSN
d'une macro vbacces dans acces on fait comme çà, j'éspére que çà pourra t'aider....
Dim dbMyDB As Database
Set dbMyDB = CurrentDb()
Dim sql As String
sql="....;"
dbMyDB.Execute sql
pour info sql peut aussi être le nom d'une requetet enfin je crois........
nath
Dim dbMyDB As Database
Set dbMyDB = CurrentDb()
Dim sql As String
sql="....;"
dbMyDB.Execute sql
pour info sql peut aussi être le nom d'une requetet enfin je crois........
nath
Ce serait sous Access je pourrais t'aider mais là, je
connais moins.
Sous Access, il suffirait de parcourir les requetes de la
base (la liste est stockée dans Mabase.Queries ou
Mabase.QueryDefs je sais plus), de trouver la requete qui
porte le bon nom puis de la lancer avec Open.
Je pense que dans ton cas faut faire le même chose mais
je connais pas les commandes (elles sont surement tres
proches de celle de vba Access).
Voila, c'est tout ce que je peux faire pour toi, désolé
PS : une remarque sur l'asp, j'en ai fait une fois (on
peut pas dire que j'ai une grosse experience) mais on
peut dire que l'asp c'est quand même vachement du visual
basic appliqué à HTML. Personnellement, je suis sur que
le code en dessous fonctionne sous vb, enfin bon...
connais moins.
Sous Access, il suffirait de parcourir les requetes de la
base (la liste est stockée dans Mabase.Queries ou
Mabase.QueryDefs je sais plus), de trouver la requete qui
porte le bon nom puis de la lancer avec Open.
Je pense que dans ton cas faut faire le même chose mais
je connais pas les commandes (elles sont surement tres
proches de celle de vba Access).
Voila, c'est tout ce que je peux faire pour toi, désolé
PS : une remarque sur l'asp, j'en ai fait une fois (on
peut pas dire que j'ai une grosse experience) mais on
peut dire que l'asp c'est quand même vachement du visual
basic appliqué à HTML. Personnellement, je suis sur que
le code en dessous fonctionne sous vb, enfin bon...
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
angeredil
Messages postés
1
Date d'inscription
mardi 19 avril 2005
Statut
Membre
Dernière intervention
10 juin 2005
10 juin 2005 à 12:27
10 juin 2005 à 12:27
Bonjour,
j'ai créer une appli Vb .NET avec Vs .NET 2003 et la base de donnée Access.
Je souhaiterais savoir quel code utiliser pour que mon utilisateur se créer un compte (Nom, Mot de passe) et que dans un même temps, sa lui crée sa propre table puisqu'il s'agit d'une application carnet d'adresse (access stock une table = nom, prénom, adresse, code postale, téléphone).
Je ne veux pas que tout le monde accède à la même table puisque les contacts sont personnels.
Dans un 2nd temps, leur permettre de supprimer leur compte (avec la table, bien sûr).
Dans un 3rd temps, je souhaite leur permettre la modification de mot de passe.
Si vous avez une solution à me proposer de préférence en mettant les codes dans un zip contenant les forms avec.
@++
angeredil
j'ai créer une appli Vb .NET avec Vs .NET 2003 et la base de donnée Access.
Je souhaiterais savoir quel code utiliser pour que mon utilisateur se créer un compte (Nom, Mot de passe) et que dans un même temps, sa lui crée sa propre table puisqu'il s'agit d'une application carnet d'adresse (access stock une table = nom, prénom, adresse, code postale, téléphone).
Je ne veux pas que tout le monde accède à la même table puisque les contacts sont personnels.
Dans un 2nd temps, leur permettre de supprimer leur compte (avec la table, bien sûr).
Dans un 3rd temps, je souhaite leur permettre la modification de mot de passe.
Si vous avez une solution à me proposer de préférence en mettant les codes dans un zip contenant les forms avec.
@++
angeredil
