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

If, Session, Banco, Logica E Js

DackAle

Perguntado por DackAle,

 Share

Pergunta

DackAle

DackAle

Postado
Postado

E ae galera =P

Bom to com algumas duvidas =P

1 - Como saber se é o ultimo registro em um looping ?

Por exemplo "Se não for o ultimo registro, então apareça isso", ou seja quando for o ultimo não vai aparecer uma certa imagem...

2 - Por exemplo estou desenvolvendo um sistema e tem o banco de dados, no caso a ideia da equipe é, hospedamos as paginas ASPs no servidor do cliente e o banco de dados fica no nosso servidor, tantpo por manutenção, segurança e total controle.

Existe como fazer ? Na hora de fazer a conexão colocar endereço do banco de dados em outro servidor ?

3 - Isso vou perguntar de novo hahahahah por exemplo, tenho uma session que tem o nick do usuario

session("usuario") = "DackAle"

por exemplo, tem como saber se a session("usuario") com valor DackAle ainda esta ativa ?

4 - Queria saber a LOGICA para na paginação, ficar sempre 3 links antes e 3 dpeois do atual, igual nos foruns, exemplo

5 6 7 [8] 9 10 11

Desenvolver a paginação, eu desenvolvi sem problemas, as não consegui pensar na lgoica para pegar 3 antes e 3 dpeois apenas, ou seja o 1 2 3 e 4 não aparecem por exemplo...

5 - Em uma pagina de cadastro, tem cadastro de codigo e categoria, o cliente quer algo dinamico para saber se existem o codigo e a categoria juntos, por exemplo, o cliente vai inserir no cadastro o cod 000 e a categoria casas, ele quer que se já existir esta combinação aparece um alert, para ele não preencher todos os campos e dai gerar o erro e ele ter que voltar e cadastrar outro imóvel, com certeza isso é com javascript já que é algo dinamico no cliente e no servidor (já que vai ter que ser feita uma consulta dinamica no servidor e retornar o erro pro cliente)

alguém tem ideia como faço a parte de javascript ?

Chega de abusar de vocês =P

Abraços e Valeuuu

Link para o comentário
Compartilhar em outros sites

8 respostass a esta questão

Posts Recomendados

  • 0
cyberalexxx

cyberalexxx

Postado
Postado

Resposta 1:

pegue o total de registros através da propriedade RecordCount, depois crie um contador dentro do loop e faça a comparação entre a variavel contador e o total de registros.

Resposta 3:

Acho que só com session não tem jeito, tenta alguma coisa com Application.

Resposta 4:

já fiz isso para um membro aki do forum, da uma olhada se você entende a lógica

<%

' Definindo o caminho do banco de dados

caminho = server.mappath("vendas.mdb")

' Fazendo a conexão com o banco de dados (paginacao.mdb)

set objconn = Server.CreateObject("ADODB.Connection")

DSN = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & caminho

objconn.Open DSN

' String SQL para consulta

SQL = "select * from vendas"

' Abrindo o registro

SET objRS = Server.CreateObject("ADODB.Recordset")

objRS.Open SQL,objconn,3

' Se não encontrar nada escreve a mensagem

' Senão lista os registros

If objRS.EOF Then

Response.Write("Nenhum registro foi encontrado")

Else

' Definindo o número de registros por página

objRS.PageSize = 1

' Recupera o valor da variável pagina

pagina = Request.QueryString("pagina")

' Se a variável pagina for vazio, indica que a página sera a primeira

' Senão a variável pagina recebe o valor da página corrente, definida acima

If pagina = "" Then

objRS.AbsolutePage = 1

pagina = 1

Else

objRS.AbsolutePage = pagina

End If

%>

<%

' Imprime o número de registros, o total de páginas e a página atual

Response.Write("<table><tr><td><FONT FACE=Verdana SIZE=1 COLOR=#000000><B>Foram encontrados" & objRS.RecordCount & " registros" & vbcrlf )

Response.Write("<br>Mostrando página <b>" & pagina & "</b> de <b>" & objRS.PageCount & "" & vbcrlf )

Response.Write("<br><FONT FACE=Verdana SIZE=1 COLOR=#000000><B>Busca Avançada <a href='#' onClick=javascript:window.open('../busca_avc.asp','','width=200,height=50,scrollbars=no, resizable=no,left=00,top=0');>aqui</a></B></FONT></td></tr></table>")

' Criando a barra de navegação

' Se a variável pagina for maior que 1 então imprime o botão Anterior com link

' Senão imprime sem link

If Cint(pagina) > 1 Then

Response.Write("<center><FONT FACE=Verdana SIZE=1 COLOR=#000000><B><a href='" & Request.ServerVariables("SCRIPT_NAME") & "?pagina=" & pagina-1 & "'>Anterior</a> ")

Else

Response.Write("<center><FONT FACE=Verdana SIZE=1 COLOR=#000000><B>Anterior")

End If

' Lista todas as páginas encontradas

inicio=Cint(pagina)-3

fim=Cint(pagina) + 3

for i = inicio to fim

  if i <> CInt(pagina) and i > 0 and i <= ObjRs.PageCount then

    response.write("<a href='" & Request.ServerVariables("SCRIPT_NAME") & "?pagina=" & i & "'>" & i & "</a> ")

  elseif i=Cint(pagina) then

    response.write " " & pagina & " "

  end if

next

' Se a variável pagina for menor que o total de páginas então imprime o botão Próxima com link

' Senão imprime sem link

If Cint(pagina) < objRS.PageCount Then

Response.Write("<a href='" & Request.ServerVariables("SCRIPT_NAME") & "?pagina=" & pagina+1 & "'>Próxima</a></B></FONT></center>")

Else

Response.Write("Próxima</B></FONT></center>")

End If

End If

'mostrando os dados

While Not objRS.EOF AND cont < objRS.PageSize

  response.write objRS.fields("data") & "<br>"

  response.write objRS.fields("nome") & "<br>"

  cont = cont + 1

  objRS.MoveNext

Wend

%>

Resposta 5:

melhor criar um tópico na sessão de JS

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

ViniciusJau

Postado
Postado

eu montei esse codigo para fazer consulta

<%

Set conn = createobject("adodb.connection")

Conn.open "provider=microsoft.jet.oledb.4.0; data source=" & server.mappath("../amarconsultoria.mdb")

set rs = conn.Execute("Select * from gerentes order by codigo")

while not rs.EOF

response.write rs("gerentes") & " - " & rs("codigo") & " - " & rs("senha") & "<br>"

rs.movenext

wend

Else

  Response.Write("O banco de dados ainda está sem registros.")

End if

%>

eu tentei fazer uma resposta pra qunado o banco não tiver nenhum registro..... mais deu erro...

Erro de compilação do Microsoft VBScript error '800a03ea' 

Erro de sintaxe 

/sistema_novo/aprendendo_asp/consulta_simples.asp, line 14 

Else

tenho que criar alguma função ??

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

dark0

Postado
Postado
eu tentei fazer uma resposta pra qunado o banco não tiver nenhum registro..... mais deu erro...

Erro de compilação do Microsoft VBScript error '800a03ea' 

Erro de sintaxe 

/sistema_novo/aprendendo_asp/consulta_simples.asp, line 14 

Else

tenho que criar alguma função ??

Amigo, para usar o ELSE e o END IF, você precisa do IF tb..

<%

Set conn = createobject("adodb.connection")

Conn.open "provider=microsoft.jet.oledb.4.0; data source=" & server.mappath("../amarconsultoria.mdb")

set rs = conn.Execute("Select * from gerentes order by codigo")

if not rs.eof then

while not rs.EOF

response.write rs("gerentes") & " - " & rs("codigo") & " - " & rs("senha") & "<br>"

rs.movenext

wend

Else

  Response.Write("O banco de dados ainda está sem registros.")

End if

%>

Vê em vermelho ..

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

felipefrancesco

Postado
Postado

Resposta da 3- É só você verificar se session("usuario") = "", se for siginifica q esla não está "carregada". Fiz isso esses dias e funcionou legal.

Resposta da 5-Antes de inserir você faz uma consulta no banco e verifica se os valores são repetidos. Se forem você volta pra o form e carrega uma variável com uma mensagem e exibe no onLoad do body, usando iif (acho q tem essa função no tópico de funções) assim:

<body <%iif(strErro<>"","onLoad=alert('"&strErro&"')" ,"")%>>

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

dark0

Postado
Postado
valeu dark !! funfou certimnho

beleza brother..

se precisar de ajuda, estamos aí

abraços

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...