Ir para conteúdo
Fórum Script Brasil
  • 0

+[ursolouco]+

ursolouco

Perguntado por ursolouco,

 Share

Pergunta

ursolouco

ursolouco

Postado
Postado

Salve Programadores!!!

Dúvida de Natal do tio [urso] à vc´s!!

Nunca fui e acho que não vou ser forte em Arrays() dry.gif , já me disseram pra usar GetRows, GetString, Abrir outro RecordSet, Cookies, Session um monte de coisa, e bla, bla, bla, bla.

Quero saber o seguinte.....

Dá pra pegar o retorno de uma consulta ao banco de dados e separa-la em um Array de acordo com redimensionamento ?

Mais ou menos assim:

 dados_Bancario_Cliente(Id, Ag, Conta, Nome, SobreNome, Saldo) = "01","1234","5675-9","urso","Louco","-850")

Me falaram pra usar Split()

Até tentei mas não deu certo.... unsure.gif

Eu estou empacando na hora de separar os dados.... dry.gif

alguém ai sabe se é possivel fazer isto com Array ? huh.gif

Abraços & Feliz Natal à todos!!!!!

[ursão]

OBS: Quero ver todo mundo muito louco neste natal

Link para o comentário
Compartilhar em outros sites

12 respostass a esta questão

Posts Recomendados

  • 0
§uiciDa£

§uiciDa£

Postado
Postado

tipo assim cara uma vez eu tve q fazer um por causa do emu primo q ele qria ver todos os cadastradso dele então usei isto ó

--

<!-- #Include File="Conecta.asp" -->

<HTML>

<HEAD>

<TITLE>Categorias</TITLE>

</HEAD>

<body background="imagens/fundodetela.jpg" bgproperties="fixed" text="#000000" alink="#000000" vlink="#000000" link="#000000" leftmargin="0" topmargin="0">

<CENTER><TABLE BORDER=1 WIDTH=780 bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">

<TR ALIGN=Center>

<TD COLSPAN=2 bordercolor="#808080" bgcolor="#3399FF"><FONT FACE=Verdana SIZE=2><b>Clientes</B></FONT></TD>

</TR>

<TR>

<td width="18" bordercolor="#000000"><b><font size="2">ID</font></b></td>

<td width="158" bordercolor="#000000"><b><font size="2">Nome</b></font></td>

<td width="191" bordercolor="#000000"><b><font size="2">Cidade</b></font></td>

<td width="215" bordercolor="#000000"><b><font size="2">Endereço</b></font></td>

<td width="36" bordercolor="#000000"><b><font size="2">Idade</b></font></td>

<td width="103" bordercolor="#000000"><b><font size="2">Telefone</font></b></td>

<%

Dim ComandoSQL, rsCategorias

Abreconexao

ComandoSQL = "SELECT MemberID, Nome, Cidade, Endereco, Idade, Telefone FROM Members"

Set rsMembers = conexao.execute(ComandoSQL)

While not rsMembers.eof

%>

<TR>

<TD bordercolor="#3399FF">

<b><FONT FACE=Verdana SIZE=1 COLOR=RED>

<%=rsMembers("MemberID")%> </b>

</FONT>

</TD>

<TD bordercolor="#3399FF">

<FONT FACE=Verdana SIZE=1>

<%=rsMembers("Nome")%>

</FONT>

</TD>

<TD bordercolor="#3399FF">

<FONT FACE=Verdana SIZE=1>

<%=rsMembers("Cidade")%>

</FONT>

</TD>

<TD bordercolor="#3399FF">

<FONT FACE=Verdana SIZE=1>

<%=rsMembers("Endereco")%>

</FONT>

</TD>

<TD bordercolor="#3399FF">

<FONT FACE=Verdana SIZE=1>

<%=rsMembers("Idade")%>

</FONT>

</TD>

<TD bordercolor="#3399FF">

<FONT FACE=Verdana SIZE=1>

<%=rsMembers("Telefone")%>

</FONT>

</TD>

</TR>

<%

rsMembers.MoveNext

WEnd

rsMembers.close

FechaConexao

Set rsMembers = Nothing

%>

<!-- #Include File="navegacao.asp" -->

</BODY>

</HTML>

--

num sei se isso ajuda, amis em td caso

Link para o comentário
Compartilhar em outros sites
  • 0
ursolouco

ursolouco

Postado
  • Autor
Postado

Suicida!!

Até entendi Brother!!

Assim é o padrão, tipo básico.

Mas neste caso, há necessidade de se separar os valores na array pois vai haver muita manipulação de dados e não se pode ficar ultilizando conexão com banco de dados para não sobrecarrega-lo, por isso foi pedido um array de controle para se alterar informações...

Mesmo assim valeu...

Link para o comentário
Compartilhar em outros sites
  • 0
ursolouco

ursolouco

Postado
  • Autor
Postado

Voce sabe trabalhar com classes?

Salve Nobre Nelson!!!

Brother!!

Só trabalhei com classe uma vez na minha vida de Asper!! E ainda estava tudo pronto, só manipulava parametros que eu passava às funções..

Mas diga lá, o que você pode me dizer sobre este pequenino problema...

Abraços & Feliz Natal!!

[urso]

Link para o comentário
Compartilhar em outros sites
  • 0
ursolouco

ursolouco

Postado
  • Autor
Postado

Se liga só!!!

<!--#include file="adovbs.inc" -->
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%
	Dim Conn, strConn, cBanco, Rs, objCmd	
	cBanco  =  Server.MapPath("SysCorr.mdb")
	Set Conn = Server.CreateObject("adodb.connection")
	Set Rs =  Server.CreateObject("adodb.recordset")
	Set objCmd = Server.CreateObject("adodb.command")
	strConn = "Provider = Microsoft.jet.oledb.4.0; Data Source = "& cBanco &";"
	Conn.Open(strConn)
	With objCmd
  .activeConnection = Conn
  .commandType =  adCmdStoredProc
  .commandText = "cst_Servico"
	End With
	Set Rs = objCmd.Execute
	Dados = Rs.GetRows
	Rs.Close

	For I = 0 To 99
  Coluna = Dados(1,I)
'  Response.Write(coluna & "<br>")
  Result = Split(Coluna,",")
  For Z = LBound(Result) to UBound(Result)
  	Response.Write(Result(Z) & "<br>")
  Next
	Next

	Set Rs = Nothing
	Conn.Close
	Set Conn = Nothing	
%>
</body>
</html>

Tá escrevendo normalmente e posicionado na Array. Agora é só acerta na tabela brother!! Por enquanto, só usando dois campos... mais pra frente, só adicionar novos dados. wink.gif

Mas diga lá, se houver uma outra forma, mas viavel de se usar na Array só dizer...

Por enquanto foi só retorno, quero ver na hora de comparar valores de Array para depois inserir no banco de dados.... aí o xicote vai estralar...

Abraços!!

[urso]

Link para o comentário
Compartilhar em outros sites
  • 0
ursolouco

ursolouco

Postado
  • Autor
Postado

Poutz Grilaz!!!

Galera, achei um artigo, muito bom para resolver problemas sobre esse, mas antes de passar o endereço queria agradecer ao 'pgmador' que deu a idéia de trabalhar com Class() que agiliza e ajuda muito nesses probleminhas que surgem durante a programação.

Bom, agradecimento já realizado vamos ao que interessa....

Artigo - > Usando Classes - AspBrasil!!!

Excelente... Muito Bom!!!!

Se encaixou quase, que uma luva, no meu problema!!

Abraços & Feliz Natal a Todos!!!

OBS: Não deixem de ver meu voto de Boas Festas na assinatura deste tópico!!

Felicidades à todos!!

[ursão]

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...