Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Alexsandro

asp

Recommended Posts

Pessoal preciso fazer uma comparação de uma campo exemplo txt_campo com o campo RA_MAT q existe na minha base SQL 2000, onde se o usuario digitou a RA_MAT correta abra a pagina inicio.asp.Alguem pode me ajudar.Grato,Alexsandro.

Compartilhar este post


Link para o post
Compartilhar em outros sites

como esta o codigo??

Compartilhar este post


Link para o post
Compartilhar em outros sites

SELECT * FROM TABELA WHERE CAMPO = '"&Request("campo_txt")&"' ??????/falows

Compartilhar este post


Link para o post
Compartilhar em outros sites

Olá, meu codigo está conforme abaixo preciso alterar da forma q t falei.Porque ja existe uma pagina pronta e preciso trabalhar em cima dessa.Mas nao sei como.Aguardo seu retorno,Alexsandro.<%@ Language=VBScript %><HTML><HEAD><META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"></HEAD><BODY><% Set AdoCon = Server.CreateObject("Adodb.connection") set ADOREC = server.CreateObject("adodb.recordset") 'ADOCON.Open "dsn=postgresql", Session("Uid"),Session("Pwd") ADOCON.Open "dsn=postgresql", "sa","DUMPUPDOWN" Sql="Select * from ""SA3010"" where ""A3_COD"" = '" & Request.QueryString("Uid") & "' and ""A3_SENHA"" = '" & Request.QueryString("Pwd") & "'" ADOREC.Open Sql, ADOCON if adorec.EOF then %> <script language = "Vbscript"> msgbox "Acesso negado!" </script><% else set ADOREC2 = server.CreateObject("adodb.recordset") Sql= "select * from ""SA1010"" a, ""SA3010"" b where a.""A1_VEND"" = b.""A3_COD"" and a.""A1_VEND"" = '" & Request.QueryString("Uid") & "' and a.""A1_CGC"" = '" & Request.QueryString("Cgc") & "'" ADOREC2.Open Sql, ADOCON if adorec2.EOF then %> <script language = "Vbscript"> msgbox "CGC Inexistente" </script> <% else Session("CC") = adorec("A3_COD") Session("CF") = Request.QueryString("Cgc") Session("EMAIL") = adorec("A3_EMAIL") %> <script language ="vbscript"> 'msgbox "<%=adorec("A3_EMAIL")%>" </script> <%%> <script language = "Vbscript"> window.parent.location.replace "inicio.asp" </script><% end if Dim objEstrutura Dim objEstruturaNI 'Cria RecordSet com os dados da Estrutura set objEstruturaNI = Server.CreateObject("ADODB.RecordSet") objEstruturaNI.Fields.Append "EpdItem",5,, adFldIsNullable objEstruturaNI.Fields.Append "EpdProCod",200,80 , adFldIsNullable objEstruturaNI.Fields.Append "EpdQtd",200,60, adFldIsNullable objEstruturaNI.Fields.Append "EpdDes",200,60 , adFldIsNullable objEstruturaNI.Fields.Append "Produto",200,80 , adFldIsNullable objEstruturaNI.Fields.Append "Pu",200,80 , adFldIsNullable objEstruturaNI.Fields.Append "Ipi",200,80 , adFldIsNullable objEstruturaNI.Fields.Append "St",200,80 , adFldIsNullable objEstruturaNI.Fields.Append "Pt",5,, adFldIsNullable objEstruturaNI.Open objEstruturaNI.Sort = "EpdItem Asc" set Session("objEstruturaNIs") = objEstruturaNI end IF%><P> </P></BODY></HTML>

Compartilhar este post


Link para o post
Compartilhar em outros sites

MudaSql="Select * from ""SA3010"" where ""A3_COD"" = '" & Request.QueryString("Uid") & "' and ""A3_SENHA"" = '" & Request.QueryString("Pwd") & "'" ParaSql="Select * from SA3010 where A3_COD = '" & Request.QueryString("Uid") & "' and A3_SENHA = '" & Request.QueryString("Pwd") & "'" ESql= "select * from ""SA1010"" a, ""SA3010"" b where a.""A1_VEND"" = b.""A3_COD"" and a.""A1_VEND"" = '" & Request.QueryString("Uid") & "' and a.""A1_CGC"" = '" & Request.QueryString("Cgc") & "'" ParaSql= "select * from SA1010 a, SA3010 b where a.A1_VEND = b.A3_COD and a.A1_VEND = '" & Request.QueryString("Uid") & "' and a.A1_CGC = '" & Request.QueryString("Cgc") & "'"Bem neste segundo select como está a estrutura do banco, pois talvez fosse melhor usar INNER JOIN

Compartilhar este post


Link para o post
Compartilhar em outros sites

Ola, Então estou usando a base de dados Sql 2000.Nome da tabela:SRA010 e nome do campo na tabela: RA_MAT.Preciso apenas comparar esse campo com a campo onde o usuario vai digitar o RA_MAT. Se o campo digitado estiver correto entao abrir a pagina de nome inicia.asp.Aguardo seu retorno.Alexsandro.

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.