OVH Cloud OVH Cloud

VBS dans Access ?

8 réponses
Avatar
Denis
Salut à tous !

J'ais une DB Access dans laquelle se trouve entre autre, toute les machines
de mon parc représentées par leur nom Netbios et leur IP ....

Je souhaiterais pouvoir, par l'intermédiaire d'un bouton, lancer un bout de
code VBscript qui me permettrait de renseigner un champs supplémentaire (et
la table correspondante ...) contenant l'@ Mac ...

Est-ce possible ? (j'ais déjà le bout de code qui me fait la résolution @
IP -> @ Mac ...)

Si oui, auriez vous des exemples qui me permettraient de mettre en oeuvre
ceci ?

Par avance, merci !
Cordialement,
DNI.

8 réponses

Avatar
Guy
bojour,
dans ta form access tu fait un bouton (command1)
ensuite dans le code de ta page Access :
'------------------Access Code------------------'
Private Sub Command1_click()

Dim oSH As Object
Dim ScriptTorun As String
Set oSH = CreateObject("Wscript.Shell")
ScriptTorun = "c:temptest.vbs"
oSH.Run (ScriptTorun)

End Sub
'------------------Access Code------------------'

'-------------------VBSFile-----------------------'
msgbox("test reussi !!!")
'-------------------VBSFile-----------------------'



Salut à tous !

J'ais une DB Access dans laquelle se trouve entre autre, toute les machines
de mon parc représentées par leur nom Netbios et leur IP ....

Je souhaiterais pouvoir, par l'intermédiaire d'un bouton, lancer un bout de
code VBscript qui me permettrait de renseigner un champs supplémentaire (et
la table correspondante ...) contenant l'@ Mac ...

Est-ce possible ? (j'ais déjà le bout de code qui me fait la résolution @
IP -> @ Mac ...)

Si oui, auriez vous des exemples qui me permettraient de mettre en oeuvre
ceci ?

Par avance, merci !
Cordialement,
DNI.





Avatar
Denis
Ben alors ? C'est si évident que ça que personne ne réponds ?


"Denis" a écrit dans le message de news:
4173f781$0$30559$
Salut à tous !

J'ais une DB Access dans laquelle se trouve entre autre, toute les
machines de mon parc représentées par leur nom Netbios et leur IP ....

Je souhaiterais pouvoir, par l'intermédiaire d'un bouton, lancer un bout
de code VBscript qui me permettrait de renseigner un champs supplémentaire
(et la table correspondante ...) contenant l'@ Mac ...

Est-ce possible ? (j'ais déjà le bout de code qui me fait la résolution @
IP -> @ Mac ...)

Si oui, auriez vous des exemples qui me permettraient de mettre en oeuvre
ceci ?

Par avance, merci !
Cordialement,
DNI.



Avatar
Georges MAUREL
Bonjour Denis,
Pour faire cela tu dois utiliser ADO

Voici une piste :
'Déclaration de la chaine de connexion au fichier
data_source = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = fichier.mdb"

'Création de l'objet ADO
Set connexion = Server.CreateObject("ADODB.Connection")

'Connexion à la source
connexion.Open data_source

'Définition et exécution de la commande sql
commande_sql = "UPDATE latable SET emac= '" & variable & "' WHERE ip='" & ip
& "'"
connexion.Execute commande_sql

'Fermeture de la connexion
connexion.Close
Set connexion = nothing

Si cela ne marche pas fait quelques recherches sur ADO...

Cordialement
Georges


"Denis" a écrit dans le message de
news:41755936$0$20574$
Ben alors ? C'est si évident que ça que personne ne réponds ?


"Denis" a écrit dans le message de news:
4173f781$0$30559$
Salut à tous !

J'ais une DB Access dans laquelle se trouve entre autre, toute les
machines de mon parc représentées par leur nom Netbios et leur IP ....

Je souhaiterais pouvoir, par l'intermédiaire d'un bouton, lancer un bout
de code VBscript qui me permettrait de renseigner un champs
supplémentaire


(et la table correspondante ...) contenant l'@ Mac ...

Est-ce possible ? (j'ais déjà le bout de code qui me fait la résolution
@


IP -> @ Mac ...)

Si oui, auriez vous des exemples qui me permettraient de mettre en
oeuvre


ceci ?

Par avance, merci !
Cordialement,
DNI.







Avatar
Denis
Merci pour ta réponse Georges.
Cependant, je pense m'etre mal exprimé: ce que je souhaiterais, c'est
intégrer le code directement dans la base, sans avoir de fichier vbs à
droite et à gauche... j'ai essayé de taper directement du VBS avec le
générateur de code (donc dans la fenetre de Visual Basic ...), mais Access
m'insulte ;-)

Par avance merci si t'as des infos supplémentaires !
DNI.


"Georges MAUREL" <georges.maurel_at_free.fr> a écrit dans le message de
news:
Bonjour Denis,
Pour faire cela tu dois utiliser ADO

Voici une piste :
'Déclaration de la chaine de connexion au fichier
data_source = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =
fichier.mdb"

'Création de l'objet ADO
Set connexion = Server.CreateObject("ADODB.Connection")

'Connexion à la source
connexion.Open data_source

'Définition et exécution de la commande sql
commande_sql = "UPDATE latable SET emac= '" & variable & "' WHERE ip='" &
ip
& "'"
connexion.Execute commande_sql

'Fermeture de la connexion
connexion.Close
Set connexion = nothing

Si cela ne marche pas fait quelques recherches sur ADO...

Cordialement
Georges


"Denis" a écrit dans le message de
news:41755936$0$20574$
Ben alors ? C'est si évident que ça que personne ne réponds ?


"Denis" a écrit dans le message de news:
4173f781$0$30559$
Salut à tous !

J'ais une DB Access dans laquelle se trouve entre autre, toute les
machines de mon parc représentées par leur nom Netbios et leur IP ....

Je souhaiterais pouvoir, par l'intermédiaire d'un bouton, lancer un
bout
de code VBscript qui me permettrait de renseigner un champs
supplémentaire


(et la table correspondante ...) contenant l'@ Mac ...

Est-ce possible ? (j'ais déjà le bout de code qui me fait la résolution
@


IP -> @ Mac ...)

Si oui, auriez vous des exemples qui me permettraient de mettre en
oeuvre


ceci ?

Par avance, merci !
Cordialement,
DNI.











Avatar
Georges MAUREL
Bonjour Denis,
je ne connais pas suffisament Access pour t'aider plus mais la réponse de
Guy (c'est à dire mettre un bouton sur ton formulaire qui lance le script
vbs) ne fonctionne-t-elle pas ?

Cordialement
Georges



"Denis" a écrit dans le message de
news:4177f76d$0$29528$
Merci pour ta réponse Georges.
Cependant, je pense m'etre mal exprimé: ce que je souhaiterais, c'est
intégrer le code directement dans la base, sans avoir de fichier vbs à
droite et à gauche... j'ai essayé de taper directement du VBS avec le
générateur de code (donc dans la fenetre de Visual Basic ...), mais Access
m'insulte ;-)

Par avance merci si t'as des infos supplémentaires !
DNI.


"Georges MAUREL" <georges.maurel_at_free.fr> a écrit dans le message de
news:
Bonjour Denis,
Pour faire cela tu dois utiliser ADO

Voici une piste :
'Déclaration de la chaine de connexion au fichier
data_source = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source > > fichier.mdb"

'Création de l'objet ADO
Set connexion = Server.CreateObject("ADODB.Connection")

'Connexion à la source
connexion.Open data_source

'Définition et exécution de la commande sql
commande_sql = "UPDATE latable SET emac= '" & variable & "' WHERE ip='"
&


ip
& "'"
connexion.Execute commande_sql

'Fermeture de la connexion
connexion.Close
Set connexion = nothing

Si cela ne marche pas fait quelques recherches sur ADO...

Cordialement
Georges


"Denis" a écrit dans le message de
news:41755936$0$20574$
Ben alors ? C'est si évident que ça que personne ne réponds ?


"Denis" a écrit dans le message de news:
4173f781$0$30559$
Salut à tous !

J'ais une DB Access dans laquelle se trouve entre autre, toute les
machines de mon parc représentées par leur nom Netbios et leur IP
....





Je souhaiterais pouvoir, par l'intermédiaire d'un bouton, lancer un
bout
de code VBscript qui me permettrait de renseigner un champs
supplémentaire


(et la table correspondante ...) contenant l'@ Mac ...

Est-ce possible ? (j'ais déjà le bout de code qui me fait la
résolution




@
IP -> @ Mac ...)

Si oui, auriez vous des exemples qui me permettraient de mettre en
oeuvre


ceci ?

Par avance, merci !
Cordialement,
DNI.















Avatar
Denis
Si, très certainement, cela fonctionne ... j'ai déjà mis en oeuvre ce genre
d'architecture et tout va très bien ....
Cependant, j'aurais été intéressé par l'expérience de réaliser un produit
(la DB en l'occurence) "tout en un", évitant ainsi les fichier orphelins
.VBS .

Merci ;-)
Si d'autres ont des idées ... je suis toujours preneur !!!!!
Bon WE à tous !

DNI.

"Georges MAUREL" <georges.maurel_at_free.fr> a écrit dans le message de
news:
Bonjour Denis,
je ne connais pas suffisament Access pour t'aider plus mais la réponse de
Guy (c'est à dire mettre un bouton sur ton formulaire qui lance le script
vbs) ne fonctionne-t-elle pas ?

Cordialement
Georges


Avatar
Georges MAUREL
Bonjour Denis,
Dans ce cas tu devrais essayer de trouver un newsgroup dédié à acces.

Cordialement
Georges


"Denis" a écrit dans le message de
news:417a4192$0$29519$
Si, très certainement, cela fonctionne ... j'ai déjà mis en oeuvre ce
genre

d'architecture et tout va très bien ....
Cependant, j'aurais été intéressé par l'expérience de réaliser un produit
(la DB en l'occurence) "tout en un", évitant ainsi les fichier orphelins
.VBS .

Merci ;-)
Si d'autres ont des idées ... je suis toujours preneur !!!!!
Bon WE à tous !

DNI.

"Georges MAUREL" <georges.maurel_at_free.fr> a écrit dans le message de
news:
Bonjour Denis,
je ne connais pas suffisament Access pour t'aider plus mais la réponse
de


Guy (c'est à dire mettre un bouton sur ton formulaire qui lance le
script


vbs) ne fonctionne-t-elle pas ?

Cordialement
Georges






Avatar
Denis
En v'là une remarque qui est pas bête ;-)

Merci ;-)
DNI.

"Georges MAUREL" <georges.maurel_at_free.fr> a écrit dans le message de
news: %
Bonjour Denis,
Dans ce cas tu devrais essayer de trouver un newsgroup dédié à acces.

Cordialement
Georges


"Denis" a écrit dans le message de
news:417a4192$0$29519$
Si, très certainement, cela fonctionne ... j'ai déjà mis en oeuvre ce
genre

d'architecture et tout va très bien ....
Cependant, j'aurais été intéressé par l'expérience de réaliser un produit
(la DB en l'occurence) "tout en un", évitant ainsi les fichier orphelins
.VBS .

Merci ;-)
Si d'autres ont des idées ... je suis toujours preneur !!!!!
Bon WE à tous !

DNI.

"Georges MAUREL" <georges.maurel_at_free.fr> a écrit dans le message de
news:
Bonjour Denis,
je ne connais pas suffisament Access pour t'aider plus mais la réponse
de


Guy (c'est à dire mettre un bouton sur ton formulaire qui lance le
script


vbs) ne fonctionne-t-elle pas ?

Cordialement
Georges