[Resolvido] Valor de Array (VBScript) em Query SQL

[Pedro Ferreira 0]

Boa Tarde,

 

Tenho o seguinte problema, preciso que os valores dado pelo um Array me retorne para dentro de uma variavel.

Em seguida essa variavel irá servir de argumento para um query. Mas o resultado não está sendo o melhor, visto que só me apresenta o ultimo campo da array inves de colocar todos os valores desejados.

 

Alguem me pode ajudar?

Resp = request.form("utilizador")
		MyArray = Split(Resp, ",", -1, 1)
		UtilResp = ubound(MyArray)
		
For i = 0 to UtilResp

strTeste = srtTeste & " or (utilizador like " & MyArray(i) & ")"

next

Set rsCheckClinfo = Server.CreateObject("ADODB.Recordset")
		strSQLClinfo = "SELECT id, data_inicio_processo, titulo, prioridade, data_limite, data_ult_act, estado FROM igf WHERE (( " & strTeste& ") and data_inicio_processo <> '01-01-1900 0:00:00' ORDER BY [" & pOrderF & "] " & pOrderD 
	'response.redirect ("debug.asp?debug=" & strSQLClinfo)
		rsCheckClinfo.Open strSQLClinfo, adoCon

Fazendo um teste o resultado que dá é o seguinte:

 

Para strTeste dentro do For ... next:

or (utilizador like Pedro Ferreira) or (utilizador like José Tosco) or (utilizador like Manuel Pito) or (utilizador like Jackes Vasq.) or (utilizador like Toni Lupo) or (utilizador like Humberto Jorge) or (utilizador like Sérgio F.)

 

Fora do For ... Next:

or (utilizador like Sérgio F.)

[ultra 0]

Simples... olha no seu código esta linha:

 

strTeste = srtTeste & " or (utilizador like " & MyArray(i) & ")"

 

substitua para

 

strTeste = strTeste & " or (utilizador like " & MyArray(i) & ")"

 

se você reparar bem, tem um pequeno erro de digitação depois do igual =]

[Pedro Ferreira 0]

ultra,

 

antes de mais obrigado pela ajuda... mas não tou vendo qualquer diferença nas duas linhas :S

 

será voce se enganou a digitar?

 

Onde está mesmo o erro???

[hargon 64]

ultra,

 

antes de mais obrigado pela ajuda... mas não tou vendo qualquer diferença nas duas linhas :S

 

será voce se enganou a digitar?

 

Onde está mesmo o erro???

Conforme disse o ultra...

 

strTeste = srtTeste & " or (utilizador like " & MyArray(i) & ")"

 

strTeste = strTeste & " or (utilizador like " & MyArray(i) & ")"

[Pedro Ferreira 0]

:wacko: oh meu Deus,

 

é do cansaço... desculpem... e mais uma vez muito obrigado...

 

:wacko: oh meu Deus,

 

é do cansaço... desculpem... e mais uma vez muito obrigado...

[hargon 64]

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif