Il y a actuellement 671 visiteurs
Vendredi 22 Novembre 2024
accueilactualitésdossierscomparer les prixtélécharger gratuitement vos logicielsoffres d'emploiforum informatique
Connexion
Créer un compte

[Résolu]Pb vbscript

Besoin d'aide pour configurer un serveur ? Vous souhaitez obtenir des conseils pour référencer votre site ? Un petit souci pour accéder à votre FTP ? Des soucis de programmation en PHP / ASP / HTML / XHTML / XML / XSLT / CSS / ReactJS / AngularJS / VueJS / CGI / PERL / C / MySQL / PostgreSQL ??? Nous avons peut-être la solution dans ce forum ...

[Résolu]Pb vbscript

Message le 21 Déc 2006 15:22

Salut !

Je débute en asp/vbscript et j'essaye en vain de créer un formulaire où l'utilisateur puisse copier/coller 2 colonnes de Excel dans une textarea, puis que les valeurs soient rentrées dans un tableau associatif.

Par exemple l'utilisateur colle dans la textarea :
---------------
F001 12
F003 100
F012 3
---------------

Puis on obtient après traitement du formulaire, un tableau tab avec
tab("F001") = 12

Déjà, 1er probleme, je n'arrive pas à remplacer la "tabulation" (est-ce que c'en est vraiment une d'ailleurs ?) par 1 autre caractère.
Les replace(liste,"Vbtab;",";") ou replace(liste," ",";") ou replace(liste," ",";") ne fonctionnent pas...
Ensuite, je ne sais pas comment créer un tableau associatif en vbscript ...

Est-ce que vous pourriez m'aider ? paske là je deviens fou, et je ne trouve pas d'aide vraiment intéressante sur google...
Avatar de l'utilisateur
gael49
Expert(e)
Expert(e)
 
Messages: 1935
Inscription: 07 Sep 2004 20:11
Localisation: Les Mauges
 


Message le 21 Déc 2006 15:44

Bon j'ai 1 peu avancé tout seul, j'arrive, en partant de cette liste :

F001;12
F002;8
F003;102
F005;20
F006;10


à associer les références aux quantités:

ligne n°0 : F001 = 12
ligne n°1 : F002 = 8
ligne n°2 : F003 = 102
ligne n°3 : F005 = 20
ligne n°4 : F006 = 10


Le code pour l'instant :
<%
Dim dict,ref,qtestock,liste,i,j,size
Set dict=createObject("Scripting.Dictionary")
liste = request.form("liste")
liste = replace(liste,Vbcrlf,";")
tabliste = Split(liste,";")
size = Ubound(tabliste) -1

For i=0 to size
j=i+1
dict.Add tabliste(i), tabliste(j)
i=j
Next

ref=dict.Keys
qtestock=dict.Items

For i=0 to dict.Count-1
Response.Write "ligne n°" & i & " : " & ref(i) & " = " & qtestock(i) & "<br />"
Next



Mais la pseudo-tabulation qui se met quand on copie/colle depuis Excel, je ne sais pas comment la remplacer par des ";".



EDIT : Finalement après de nombreux essais je me suis rendu compte qu'un simple remplacement des espaces (replace(chaine," ",";") fonctionne :) J'avais déjà testé mais peut-être qu'un autre bug m'avais empeché de m'en rendre compte...
Avatar de l'utilisateur
gael49
Expert(e)
Expert(e)
 
Messages: 1935
Inscription: 07 Sep 2004 20:11
Localisation: Les Mauges
 

Message le 22 Déc 2006 17:47

Bonjour,

Ca me fait peur, je suis censé savoir tout ça et je ne sais RIEN. Je le sens mal le diplôme ...
ASP, c'est pas le truc que je suis censé faire pour les Tracedebug, et qui marche sur Windows Server 2003 ? J'ai pas encore installé le SE en fait :-?.
Avatar de l'utilisateur
blankoworld
PC-Infopraticien
PC-Infopraticien
 
Messages: 5993
Inscription: 21 Juin 2004 09:41
Localisation: Pala
 



Sujets similaires

Message [résolu] Appels indésirables
Bonsoir? J'ai besoin d'aide, je n'en peux plus, mon portable est sur liste rouge, j'ai plusieurs appels par jour, d'un cabinet de santé, "santénéa", ils demandent à parler à ma femme, qui est décédée en octobre 2022, je ne comprends pas le lien entre mon numéro de portable et ma femme. ? J ...
Réponses: 27

Message [Résolu] Récupération du dual boot
Bonjour,Pourriez-vous m'aider à remettre le dual boot" sur un pc portable HP modèle G7 1235 SF" qui a Windows 10 et Ubuntu 24.04 que j'ai installé dans " l'espace libre" du disque dur mais au démarrage c'est Ubuntu qui est démarre directement, comment faire ?J'aurai voulu garder ...
Réponses: 13

Message [résolu] Inscris à l'insu de mon plein gré
Bonjour J'ai un souci, qui m'énerve vraiment, ma fille m'a réglé une smart TV, pour que le Chromecast intégré fonctionne elle m'a créé un compte sur google. Presque sur chaque site, j'ai ceci :Sur le site TV loisir, je n'ai pas fait exprès, j'ai cliqué sur ok, au lieu de la croix, ça m'a créé un com ...
Réponses: 3

Message Partition inutilisée [Résolu]
Bonjour à tous !J'ai encore des lacunes (normal vu mon âge....):Après avoir fait du ménage sur mon disque SSD, il y reste Win 8 et Ubuntu 22.04 plus une partition de 6 Go que je voudrais utiliser pour y stocker des sauvegardes non critiques.Elle est nommée "Lost+found"Je ne peux pas avoir ...
Réponses: 3

Message [résolu] C'est le bazar sur mon bureau
Bonjour Quand je veux héberger une image ou autre chose de mon bureau, j'ai ça, maisquescequecestdoncquetoutcestmachins? Merci
Réponses: 8

Message [RÉSOLU] Vidéos invisibles avec Firefox dans un forum
Bonjour à tous.Je ne sais pas si je suis au bon endroit pour poser ma question; ce sous répertoire me semblait le plus approprié.Je fréquente un forum depuis de nombreuses années et je constate que les vidéos postées dans les messages ne s'affichent plus avec Firefox. Quand je regarde le détail des ...
Réponses: 5


Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 4 invités


.: Nous contacter :: Flux RSS :: Données personnelles :.