
jow
Membros-
Total de itens
546 -
Registro em
-
Última visita
Tudo que jow postou
-
você tem q ter apenas um htm, body ... e apenas um head pra funcionar .... a estrutura do html deverá ser apenas um ... ou seja você não pode ter duas vez <html><head></head><body></body></html> na mesma página ..... Talves tenha a mesma estrutura ou algo parecido na sua página e no seu include ... verifica isso ... caso não seja isso também poste a página q recebe o include ... abraçosss
-
você está testando dentro da pasta WWWROOT "localhost" correto ??? ... posta como tá o seu código agora ....
-
Olá conforme o Rafael Spilki citou vamos por partes OK ??? Vamos lá, op's o seu script está em PHP, este subforúm é para dúvidas em asp dúvidas em php deverão ser postadas no subforúm de php, pois lá acredito q você irá encontrar a melhor resposta para o seu script ....
-
Abaixo um script, onde é possivel controlar as págnias q os usuários podem acessar :: config/conexao.asp <% dim cnn sub abre_conectar set cnn=server.CreateObject("adodb.connection") 'Abrimos uma conexão com o banco de dados - [IMPORTANTE] altere os dados abaixo com as informações de sua base de dados cnn.Open("DRIVER={MySQL ODBC 3.51 Driver};SERVER=ACRIAR;PORT=3306;DATABASE=ACRIAR;USER=ACRIAR;PASSW ORD=ACRIAR;OPTION=3;") end sub sub fecha_conectar cnn.close Set cnn = nothing end sub %> ACRIAR = a suas configurações de acesso includes/verifica.asp // está página apenas verifica se o usuário se logou ou não ... <% if session("login") <> true then response.redirect "default.asp" end if %> default.asp <form name="login" method="post" action="login.asp"> <table width="250" border="0" align="center" cellpadding="4" cellspacing="2"> <tr> <td width="33%"><div align="right">Usuário:</div></td> <td width="67%"><input name="login" type="text" size="20" maxlength="20"></td> </tr> <tr> <td><div align="right">Senha:</div></td> <td><input name="senha" type="password" size="11" maxlength="15"> </td> </tr> <tr> <td colspan="2"><center><input name="enviar" type="submit" value="Enviar" border="0"> </center> </tr> </table> </form> login.asp <!--#include file="config/conexao.asp"--> <% call abre_conectar login=Request.Form("login") senha=Request.Form("senha") sql = "SELECT * FROM users WHERE login='"&login&"' AND senha='"&senha&"' " set tab = cnn.execute(sql) ' Caso os dados não estiverem corretos o usuário é enviado para a entrar.htm if tab.eof then response.write "Login ou Senha inválidos" else Session("nivel")= tab("nivel") Session("login")=TRUE Response.Redirect"pagina.asp" end if call fecha_conectar set tab = nothing %> membros.asp <form action="inserir_membro.asp" method="post" name="form" onSubmit="return valida_campo()"> <table width="100%" border="0" cellpadding="0" cellspacing="6"> <tr> <td width="12%" class="titulo1">Nome</td> <td width="88%"><input name="nome" type="text" class="formulario"></td> </tr> <tr> <td class="titulo1">Email</td> <td><input name="email" type="text" class="formulario" onBlur="confere()"></td> </tr> <tr> <td class="titulo1">Celular</td> <td><input name="celular" type="text" class="formulario"></td> </tr> <tr> <td class="titulo1">Login</td> <td class="titulo1"><input name="login" type="text" class="formulario"> <span class="style1">*</span></td> </tr> <tr> <td class="titulo1">Senha</td> <td class="titulo1"><input name="senha" type="password" class="formulario"> <span class="style1">*</span></td> </tr> <tr> <td class="titulo1">Nivel</td> <td class="titulo1"><input name="nivel" type="text" class="formulario"> <span class="style1">*</span></td> </tr> <tr> <td><input type="submit" class="formulario" value="Salvar"></td> </tr> </table> </form></div> inserir_membro.asp <!--#include file="../includes/verifica.asp"--> <% if session("login") <> true then response.redirect "../default.asp" end if %> <!--#include file="../config/conexao.asp"--> <% call abre_conectar nome=request.Form("nome") celular=request.Form("celular") email=request.Form("email") login=request.Form("login") senha=request.Form("senha") nivel=request.Form("nivel") sql = "insert into users (nome, celular, email, login, senha, nivel)" sql = sql & " values ('"&nome&"', '"&celular&"', '"&email&"', '"&login&"', '"&senha&"', '"&nivel&"')" set tab = cnn.execute(sql) call fecha_conectar set tab = nothing response.write "Cadastro realizado com sucesso" %> <a href="membros.asp">Voltar</a> OBS: Nas páginas onde o conteúdo é restrito ... basta usar um if no topo dá página, ou em algum conteúdo restrito... if session("nivel") = 1 'este numero é o mesmo número q foi gravado na tabela como a permissão do usuário, 'ou seja pode ser alterado de acordo com o usuário q você queira restringir response.write "Aki você insere o conteúdo dá página" else response.write "Acesso Restrito" end if Bom galera espero ter ajudado ... Abraçossss
-
Com sessions ou cookies você consegue fazer isso, mas também tem como fazer isso apenas como o banco de dados ... ao cadastrar o login e senha do usuário, você também deve cadatrar o nome dele, ao fazer o login você compara se o login e a senha cadatrada no banco é igual ao q foi digitado ...
-
É como foi dito acima Dá uma olhada se os valores do banco de dados e do formulário conferem, você está mandando como valor vnoticia, onde você está pegando este valor ... Se você não conseguir resolver faça isso, mas depois de mandar executar o seu insert response.write strINS response.end()
-
Bom cara tenta com Split str=request.form("valor") valor=split( str , "," ) 'No caso coloquei virgula, pois o separador este, caso seja outro basta mudar para o desejado. for i = 0 to UBound(valor) If len(valor(i)) > 0 then strQuery = "INSERT INTO contvendas (valor) VALUES ('"&valor(i)&"')" <%else end if%> next
-
Cara tenta esse código ... Funciona perfeitamente para o q você quer ... <form action="pagina.asp" method="get"> <% sql = "Select * from projetos tabela " set tab = cnn.execute(sql) if not tab.eof then%> <table width="100%"> <tr> <td>Registro para deletar</center></td> <td><input name="Submit" type="submit" value="Excluir"></center></td> </tr> <td>Registro para deletar</td> <td><input name="checkbox" type="checkbox" value="<%=tab("campo")%>"></td> </tr> Pagina deletar 'Dim objConn, stringSQL, strConnection, array_campo, i, sql_campo, campo,strDBPath campo = Request.QueryString("checkbox") 'Caso ocorra algum erro os precessos não são interrompidos 'e é passado para a próxima linha de comando On error Resume Next if err = 0 and campo <> "" then array_campo = split(campo,",") For i=0 to ubound(array_campo) sql_campo = sql_campo & "tabela.campo = " & Trim(array_campo(i)) & " OR " 'campo texto, então" & Trim(array_campo(i)) & " OR " 'caso numerico '" & Trim(array_campo(i)) & "' OR " Next sql_campo = left(sql_campo,(len(sql_campo)-4)) sql = "DELETE FROM tabela WHERE "&sql_campo&"" set rs = cnn.execute(sql) %> Seus dados foram excluídos com sucesso! <%else%> Ocorreu algum erro. Nenhum dado foi excluido.<br> <br> <a href="java script:history.back(-1)" >Voltar</a> <%End if%>
-
Bom dia; Alguém pode me indicar algum script ou tutorial q ensine a fazer com q dentro de um formulário tenha uma opção para inserir mais campos ... exemplo tenho um campo no formulário contato, e q tenha uma opção para o usuário inserir mais contatos. contato: ________________ mais um contato -- Ao clikar no link abre outro contato
-
<%response.write("'FlashVars','moviez=" & request.querystring("video") & "',") %> response.write: imprime uma valor na tela &: faz a concatenação resquest.querystring: recebe um valor do método GET, caso o método seja POST atere para resquest.form e sempre com ("valorDoFormulário")
-
Bom dia cara legal ... então na minha opnião seria melhor desenvolver com uma linguagem web ... bom como você disse q tem mais experiência com linguagem Desktop, e não tem o mesmo conhecimento com web, isso seria mais um motivo para o desenvolvemento web, pois assim você iria acrescentar mais conhecimento e iria desenvolver uma coisa bacana superando as suas dificuldades ... eu estou desenvolvendo um sistema na web e encontrei umas dificuldades, pois se fosse com linguagem desktop talvez eu não teria tanta dificuldade, mas consegui fazer uma coisa muito legal, e o mais importante foi o conhecimento adquirido, eu particulamente coloquei no meu sistema uma segurança bem legal, criptografia no banco de dados, niveis de acesso por usuário e sempre obrigar ao usuário se logar ... Qt a linguagem de desenvolvimento ... bom isso depende de você ... pois pra mim não é a linguagem de programação o q realmealmente importa, e sim uma boa lógica. Se você tiver experiência com a plataforma Microsoft, o melhor é fazer em asp caso o contrário o melhor é fazer em php. Existem outras linguagens, mas só estou te indicando as linguagens q tenho conhecimento ... Abraçossss
-
Perfeito Como são recebidos os dados na página admin_main.asp ? mais ou nenos assim: addpass1 = Request.Querystring("addpass")
-
O q você quer fazer com este código ??
-
Olá então eu também tive o mesmo problema q você e consegui resolver e postei aki como resolvi ... olha o script q eu deixei ... http://scriptbrasil.com.br/forum/index.php?showtopic=120378
-
Eae Notax beleza ... Cara eu usei este mesmo script e fiz algumas modificações, inclusive a minha idéia inicial era fazer o upload de mais de um arquivo, mas isso não foi possivel pois o upload é sem componentes, ou seja para um determinado tamanho ele dá erro ... Abraçossss
-
Cara pelo q sei não tem como, pois a cada página seria como se ele atualizasse a nova página ... também estava com a mesma dificuldade q você ... masi ai eu desencanei ... abraçossss
-
Posta como está a página q está o erro ... e mensagem de erro também abraçoss ...
-
tenta assim: <input name="Submit2" type="submit" onClick="MM_goToURL('parent','novo_chamado.php?id=<? echo $variavel['idp']; ?>."');return document.MM_returnValue" value="<<<<<">
-
Legal meio caminho andado hauhuahua .... echo no ASP só no PHP kkkk ... response.write(SQL) response.end... Posta como está sua página que deleta os registro ai
-
Ná Página onde você altera os dados altere por este script !! <% 'Força o programador a declarar todas as variáveis, evitando erro de digitação no uso das variéveis Option Explicit 'Não deixa informações no Cache Response.Expires = 0 'Declaração das variáveis Dim objConn, strQuery, sql_query, RsQuery, campo, sql, autonum, strDBPath Dim Associado,devedor,datainclusao,documento,valor,serasa,datacordo,valoracordo,valo rpagamento,Andamento,quitacao,ObjRs 'Atrubuição dos valores as respectivas variáveis Associado= Request.Form("Associado") devedor= Request.Form("devedor") datainclusao= Request.Form("datainclusao") documento= Request.Form("documento") valor= Request.Form("valor") serasa= Request.Form("serasa") datacordo= Request.Form("datacordo") valoracordo= Request.Form("valoracordo") valorpagamento= Request.Form("valorpagamento") Andamento= Request.Form("Andamento") quitacao= Request.Form("quitacao") autonum = Request.Form("autonum") autonum = Request.QueryString("radio") 'Cria o objeto RecordSet e atribui a variável Set objConn = Server.CreateObject("ADODB.Connection") 'Abre a conexão com o banco de dados utilizando o Drive {Microsoft Access... '(para utilizar outro, ex: Paradox é só substituir o Drive pelo do Paradox) '(*.mdb) indica que o arquivo utiliza extensão mdb 'objConn.Open "DBQ=" & Server.MapPath("contato.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}","username","password" strDBPath = Server.MapPath("contato.mdb") objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & ";" 'não vou permitir a alteração da foto senão você já viu néw strQuery = "UPDATE Juridico SET Associado= '"&Associado&"',devedor= '"&devedor&"',datainclusao= '"&datainclusao&"' ,documento= '"&documento&"',valor= '"&valor&"',serasa= '"&serasa&"',datacordo= '"&datacordo&"',valoracordo= '"&valoracordo&"' ,valorpagamento= '"&valorpagamento&"' ,Andamento= '"&Andamento&"' ,quitacao= '"&quitacao&"' WHERE autonum ="&autonum 'Caso ocorra um erro esta função de erro será chamada On error Resume Next 'Executaa inserção no Banco de Dados Set ObjRs = objConn.Execute(strQuery) 'Fecha o Objeto de Conexão objConn.close '"APAGA" qualquer instancia que possa ter no objeto objRs e objConn Set objRs = Nothing Set objConn = Nothing if err = 0 Then end if %><p align="center"> <font face="Verdana" size="3" color="#FFFFFF"> </font> <!-- depois de enviado o email... --> <script language="JavaScript">alert('Cadastro efetuado com sucesso!'); location.href='todas_inclusoes.asp';</script> </font> </body> Obs: isso funciona este script está OK, mas do jeito q você quer fazer não vai alterar nada, porque ao escolher você já está mandando fazer o update então vai alterar para q já está, o certo seria ao selecionar o radio ir para um formulário de alteração e como ação esse formulário envia para a página de update dos dados .... Qualquer coisa posta ae Abraçossss
-
Bom dia, como q você está passando o seu id posta ae ... a página onde você passa o valor do id !!!
-
estranho, isso ... está testando na sua máquina ???
-
você está passando o id ??
-
Cara dá uma olhada nesse link e vê se isso te ajuda.. http://www.oficinadanet.com.br/artigo/353/..._em_asp_simples
-
Hum isso está ocorrendo possivelmente por causa do tamanho do thumb q você está gerando ....