Il y a actuellement 169 visiteurs
Mercredi 08 Mai 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] comment utiliser opera
Bonjour J'ai installé opera, je n'arrive pas à le mettre en français ? Il y a aussi la page d'accueil qui me gêne, pleine de petites fenêtres qui ne m'intéressèrent pas. Merci
Réponses: 17

Message [Résolu] Impossible lancer Windows défender hors ligne WIN10
Salut à vous j'ai voulu lancer Windows Defender hors ligne et malgré plusieurs tentatives et démarrages, il ne se passe rien je suis allé sur mon disque dur C où est installé Windows Defender et puis sur offline j'ai cliqué sur en administrateur : OfflineScannerShellet voici le message Je précis ...
Réponses: 64

Message mot de pass [Résolu]
bonjour quand j'allume le pc il demande un mot de passe et option de connexion ..comment je peu supprimé ça pour que l'ordi s'allume sans cet option ...si y a moyen ça sera bien ps: installation Windows car j'ai remplacé mon DD par un SSD ce week-endmerci
Réponses: 23

Message [Résolu]Paramètrage de mon profil
Bonjour, Lorsque je veux ajouter une signature dans mon profil ==> Modifier la signature, la visualisation de celle-ci se fait bien mais lorsque je valide, rien apparait sous mes messages. Il y a t-il un temps de délai pour voir apparaitre ma signature en bas de mes messages (normalement cela do ...
Réponses: 4

Message [Résolu] Le fameux soucis du "voile blanc" sur un écran.
Bonjour/Bonsoir, je viens à vous aujourd'hui car j'ai acheter un écran LG 24M47VQ-P ( Je crois qu'il s'âgit la de la réph mais je ne suis pas sur ) et lorsque je le branche il fonctionne parfaitement cependant il y a une chose qui me dérange fortement c'est un voile blanc qui viens se mettre sur l'é ...
Réponses: 15

Message [résolu] (tout seul) traducteur google intrusif
Bonjour Dès que je navigue sur un site étranger, j'ai la traduction de google, je n'en veux pas, il y a moyen de s'en débarrasser ? Merciici :J'éditeOui déjà Je n'avais pas assez cherché, normalement, j'ai réussi :Comment désactiver le traducteur ?Activer ou désactiver la traductionSur votre ordin ...
Réponses: 5


Qui est en ligne

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


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