Jump to content


Photo

For Each Em Variavel Como Faço?


  • Faça o login para participar
8 replies to this topic

#1 Worm

Worm

    Veterano

  • Ex-Admins
  • 1343 posts
  • Sexo:Masculino
  • Localidade:São Paulo - SP
  • Interesses:Obter o maximo conhecimento.

Posted 17/12/2004, 14:29

Galera...

tenho 30 variaveis tipo assim.

var = "1"
var = "2"
var = "3"
var = "4"
var = "5"

ai tava querendo dar um for each para pegar uma a uma (variavel ) para gravar no banco.

tipo

for each var to var
sql = "insert into...
next

Como posso fazer isso?

Valew.

Edição feita por: Worm, 17/12/2004, 14:44.


#2 Tx.NET

Tx.NET

    || ||||||| ||| ||||||||

  • Banidos
  • PipPipPipPipPipPipPip
  • 619 posts
  • Sexo:Não informado

Posted 17/12/2004, 15:03

cara, num entendi... vc quer montar um FOR de uma array com n elementos?!

flws... (y)
> ls -la
-rwxr-xr-- 1 fmaynnard user 9666 nov 28 00:00 hell

> shutdown -h now

#3 Worm

Worm

    Veterano

  • Ex-Admins
  • 1343 posts
  • Sexo:Masculino
  • Localidade:São Paulo - SP
  • Interesses:Obter o maximo conhecimento.

Posted 17/12/2004, 15:12

é mais ou menos isso.

é que tenho os dados e preciso gravar no banco, só que são muitos dados e não quero digitar um a um dai pensei em fazer for each e grava, pois para eu por um nome na frente (variavel) é bem mais facil.

#4 mcoelho80

mcoelho80

    Novato no fórum

  • Usuários
  • 13 posts
  • Sexo:Não informado

Posted 17/12/2004, 15:21

Talvez o objeto Scripting.Dictionary lhe ajude.
Com ele é possível atribuir o valor a um hash de nomes. E recuperá-los em um For Each.

Procure na documentação do VBScript por este objeto, você encontrará bastante informação e exemplos na web.
Marcelo Coelho
marcelo@mco2.com.br

______________________________

MCO2 - Hospedagem de Sites
http://www.mco2.com.br

** Transfira seu domínio e ganhe 60 dias de hospedagem gratuita **
________________________________

#5 Worm

Worm

    Veterano

  • Ex-Admins
  • 1343 posts
  • Sexo:Masculino
  • Localidade:São Paulo - SP
  • Interesses:Obter o maximo conhecimento.

Posted 17/12/2004, 16:23

Cara até achei, mas nada que desse pra me ajudar.


Valew pela força.

#6 Prog

Prog

    ...

  • Ex-Admins
  • 3761 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro/RJ
  • Interesses:TI, Software Livre, Design Digital e Rock'n'Roll.

Posted 17/12/2004, 16:48

Epa... Ve se da pra fazer oq desejas:

for id = 1 to UBound(var)-1
   ... var(id) ...
next

ps.: não me recordo se os vetores em VBScript iniciam de 1 ou de 0, veja aí... se iniciar de 1, o UBound não precisa ter o -1, se iniciar de 0, precisa do -1.
------
Mero mortal!

#7 Worm

Worm

    Veterano

  • Ex-Admins
  • 1343 posts
  • Sexo:Masculino
  • Localidade:São Paulo - SP
  • Interesses:Obter o maximo conhecimento.

Posted 17/12/2004, 16:58

deu erro.

Tipos incompatíveis: 'UBound'
linha 10


a = "w"
a = "a"
a = "r"

for a = 1 to UBound(var)-1'linha 10
response.Write(var(id))
next


#8 Prog

Prog

    ...

  • Ex-Admins
  • 3761 posts
  • Sexo:Masculino
  • Localidade:Rio de Janeiro/RJ
  • Interesses:TI, Software Livre, Design Digital e Rock'n'Roll.

Posted 17/12/2004, 17:06

Tente assim:

<%
a = array("w","a","r")

for id = 0 to UBound(a)
  response.Write(a(id))
next
%>

------
Mero mortal!

#9 Worm

Worm

    Veterano

  • Ex-Admins
  • 1343 posts
  • Sexo:Masculino
  • Localidade:São Paulo - SP
  • Interesses:Obter o maximo conhecimento.

Posted 17/12/2004, 17:09

Deu certo.


Valew pela imensa ajuda Prog.


:D




0 user(s) are reading this topic

0 membro(s), 0 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq