Integration vbscript ds html

cs_jem27 Messages postés 4 Date d'inscription lundi 13 juin 2005 Statut Membre Dernière intervention 13 juin 2007 - 12 juin 2007 à 16:39
cs_jem27 Messages postés 4 Date d'inscription lundi 13 juin 2005 Statut Membre Dernière intervention 13 juin 2007 - 13 juin 2007 à 13:35
Bonjour


voila mon soucis je veux mettre la valeur contenu dans une variable dans un champ texte d'un formulaire mais ca ne marche pas ya surement quelque chose qui va pas mais quoi je vous le demande lol
voici le code que j'ai fait


<html>
<head>
<script language="vbscript">
'déclaration file system object
Dim fso


'instanciation
Set FSO = CreateObject("Scripting.FileSystemObject")


'on instance le fichier texte 
Set Ftxt = FSO.OpenTextFile("c:/ca.txt")


'on parcours chaque ligne du fichier texte
Do While Not Ftxt.AtEndOfStream
      MaVariable = Ftxt.Readline


      windows.document.form.test.value=MaVariable
Loop


Ftxt.Close
</script>


</head>

<form name="form">

</form>

</html>



ps : si j'execute juste le code vbscript ca marche

9 réponses

drikce06 Messages postés 2236 Date d'inscription lundi 29 mai 2006 Statut Membre Dernière intervention 29 mai 2008 10
12 juin 2007 à 16:42
Salut, pas besoin de poster 3 fois de suite en deux minutes.

 Drikce 06 (Nouveau !!! Forum Exclusivement Office Et VBA By Mortalino)
0
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
12 juin 2007 à 16:44
lecture séquentielle, ca te cause ?

au moment ou le script est executé, je pense que
document.form.test.value n'existe pas....

("c:/ca.txt" pas légal, ça, si ?)

Renfield
Admin CodeS-SourceS- MVP Visual Basic
0
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
12 juin 2007 à 16:45
Ah, et, Dricke06 a raison, pas besoin de poster trois fois le même message....

Renfield
Admin CodeS-SourceS- MVP Visual Basic
0
cs_jem27 Messages postés 4 Date d'inscription lundi 13 juin 2005 Statut Membre Dernière intervention 13 juin 2007
12 juin 2007 à 16:48
c pas voulu si j'ai poster trois fois j'ai galerer pour trouver le bon theme
en quoi c:/ca n'est pas légal j'ai pas trop compris ?
lecture sequentielle si j'ai la bonne definition c'est lecture ligne par ligne donc il faudrait que je declare mon formulaire avant le code vbscript?


merci de vos reponses
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
mortalino Messages postés 6786 Date d'inscription vendredi 16 décembre 2005 Statut Membre Dernière intervention 21 décembre 2011 18
12 juin 2007 à 18:46
Pas tout lu mais :
Set Ftxt = FSO.OpenTextFile<strike>("c:/ca.txt")</strike>
Set Ftxt = FSO.OpenTextFile("c: \ ca.txt")

@++

<hr size ="2" width="100%" />( Nouveau forum : Exclusivement Office & VBA
0
cs_JMO Messages postés 1854 Date d'inscription jeudi 23 mai 2002 Statut Membre Dernière intervention 24 juin 2018 27
12 juin 2007 à 20:08
 Bonsoir à tous

Salut Mortalino,
Les synthaxes "", "\", "/" et "//" sont valables.
Essaie:
Dim Fso, ObjTextStream
Set Fso = CreateObject("Scripting.FileSystemObject")
Set ObjTextStream = Fso.CreateTextFile("d://fichierTEST1.txt", True)
Set ObjTextStream = Fso.CreateTextFile("d:/fichierTEST2.txt", True)
Set ObjTextStream = Fso.CreateTextFile("d:\fichierTEST3.txt", True)
Set ObjTextStream = Fso.CreateTextFile("d:\\fichierTEST4.txt", True)
Set ObjTextStream = Nothing

Quant à la question de " [auteurdetail.aspx?ID=532882 jem27]", j'espère (débutant en vbs/formulaires html) ne pas
dire une trop grosse bourde. Il me semble que "windows.document.form" soit du javascript.
Le résultat de la recherche, sur Google, de cette expression n'est, c'est un euphémisme, pas
très significative !

Bonne continuation.

jean-marc
0
cs_jem27 Messages postés 4 Date d'inscription lundi 13 juin 2005 Statut Membre Dernière intervention 13 juin 2007
13 juin 2007 à 09:10
je suis debutant dans le vbs je connais un peu plus le javascript
sinon en fait ce que je veux faire c'est de recuperer une valeur dans un fichier texte et de l'afficher dans une page html
est ce que mon code est assez bien pour faire ceci?
ou alors avez vous une autre methode ?
est ce possible de le faire en javascript??

merci d'avance et bonne journee
jeremy
0
cs_JMO Messages postés 1854 Date d'inscription jeudi 23 mai 2002 Statut Membre Dernière intervention 24 juin 2018 27
13 juin 2007 à 12:57
 Bonjour à tous

Bonjour "jem27,

Pour la partie javascript, il faudrait aller sur http://www.javascriptfr.com/Default.aspx

Pour la partie vbs, inutile d'utiliser une boucle Do While ... Loop.
De plus, dans ton exemple, la variable "Variable" contiendra, finalement, la dernière ligne de ton fichier,
et donc, peut-être, une ligne vide.

La combinaison .ReadLine et .Skip(0) permet d'obtenir le contenu de la 1ère ligne, à partir du 1er caractère (0), et d'ignorer les éventuelles autres lignes de ton fichier.
Le .Close n'est pas obligatoire, mais conseillé pour la lisibilité.
Idem pour supprimer les instances, ne pas oublier les "Set xxxx = Nothing" de tous
les objets instanciés.

Const ForReading = 1
Dim objFso, objTxt
Set objFso = CreateObject("Scripting.FileSystemObject")
Set objTxt = objFso.OpenTextFile("d:/test.txt",ForReading)
objTxt.Skip(0)
MaVariable = objTxt.Readline
msgbox MaVariable

'''windows.document.form.test.value=MaVariable
objTxt.Close
Set objFso = Nothing
Set objTxt = Nothing

jean-marc
0
cs_jem27 Messages postés 4 Date d'inscription lundi 13 juin 2005 Statut Membre Dernière intervention 13 juin 2007
13 juin 2007 à 13:35
merci je vais tester tout ceci
0
Rejoignez-nous