Ir para conteúdo
Fórum CódigoFonte.net
Entre para seguir isso  
Ted k'

Função para gerar SQL dinamicamente

Recommended Posts

Cansado de fazer tanto SQL no site?

Tentou usar uma função pra isso?

Criei uma função para você selecionar um campo de uma tabela, mais com um pouco de estudo e antenção você pode adaptar elea para receber várias informações.

Nesse Script você coloca o nome da tabela, o campo que quer fazer o loop e uma mensagem de erro caso não tenha nada no banco, caso você tenha muitos SQL’s no seu site e tem dificuldades de administrar, uma boa solução é essa!

<%
Function AllSelect(Tabela, Campo, Mensagem)
    Dim Rs
    Set Rs = Conexao.Execute("Select "&Campo&" From "&Tabela&"")
        If Rs.Eof Then
            Response.Write(""&Mensagem&"")
        Else
            While Not Rs.Eof
                Response.Write(Rs(""&Campo&"")&"<br><br>")
            Rs.MoveNext : Wend
        End If
    Set Rs = Nothing
End Function
%>
Aqui você coloca onde quer que apareça o conteúdo:
<% Response.Write(AllSelect("Nome_Tabela", "Campo_de_Amostra", "Mensagem_de_Erro")) %>

Qualquer dúvida, é só postar!!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Visitante
Responder

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Processando...
Entre para seguir isso  

×
×
  • Criar Novo...