satoshy
-
Total de itens
26 -
Registro em
-
Última visita
Tudo que satoshy postou
-
iceguy, vlw por responder ! desculpa a pergunta ... onde eu coloco o codigo java ? desde já, agradeço.
-
boa tarde a todos segue o codigo abaixo : ... If r.EOF then Response.Write "Usuário e/ou senha inválidos." & "<br>" & "Por favor, volte para pagina anterior." else If request.form("p1") = r("Senha") then Response.Write "<html>" Response.Write "<head>" Response.Write "<title>" & vbcrlf & ":.| Escritorio Prado Assessoria Contábil e Jurídica" & vbcrlf & "</title>" Response.Write "</head>" Response.Write "<body>" Response.Write "<div id=" & "Layer1" & "style=" & "position:absolute; left:40px; top:20px; width:87px; height:101px; z-index:1" & ">" & "<img src=" & "logoprado.gif" & "width=" & "90" & "height=" & "100" & "/>" & "</div>" & "<br>" Response.Write "Bem - vindo" & " " & r("Nome") & " " & "!" If r("Usuario") = 01522428 then response.write "<br>" & "OOI" response.write "</body>" response.write "</html>" end if If r("Usuario") = 02632466 then response.write "<br>" & "agora foi" end if else Response.Write "ainda n" end if end if ... não esta aparecendo o titulo da pagina (a mensagem esta aparecendo, a imagem aparece com um X) alguém pode dar um help ? Agradeço desde já !
-
abrindo pequena pagina ao click do botão
pergunta respondeu ao satoshy de satoshy em Ajax, JavaScript, XML, DOM
<script language="javascript"> window.open("pagina2.html", "Pagina2" , "height = 300 , width = 400"); </script> //Height = Altura, Width = largura. //Abre uma Nova Janela de 300 x 400 e com o título "Pagina2" Leia mais no Oficina da Net: window.open é desse jeito ? tem algum jeito de colocar isso no click do botão ? (é sobre function id... ? se for como ficaria ?) <input type="hidden" name="redirect" value="http.../html/obrigado.html"> ia se encaixar nessa parte do codigo ? <INPUT type=button value= "Enviar Dados" onClick= "window.open('obrigado.html','Obrigado', 'menubar,resizable,width=451,height=306'); "> galera eu fiz desse jeito, esta fazendo do jeito q eu quero, mas queria a opinião de vocês para ter certeza se esta certo o codigo ... -
bom dia a todos eu sou muito novato em javascript(pra começar)... estão me pedindo algo do tipo : quando clicar no botão de confirmar cadastro, abre uma pequena janela com uma imagem (agradecendo a pessoa por fazer o cadastro...) como eu disse no começo, sou mt novo em javascript, peço a compreensão e a paciência de todos desde já, agradeço.
-
dentro do head, certo ? uma pergunta ... todo codigo css é dentro do head ? edit : eu coloquei desse jeito : ... <style type="text/css"> #tudo{width:763px; /*Tamanho da resolucao do seu site*/ height:auto; /*deixar auto para ele se esticar de acordo com conteúdo*/ margin-left:auto; /*aqui é o pulo do gato deixando auto ele centraliza automatico*/ margin-right:auto; /*na direita também*/ } </style> <link rel="stylesheet" href="../html/menucima.css" type="text/css" media="screen" charset="utf-8" /> </head> ... <body bgcolor="#f0f0ff" leftmargin = "1" topmargin = "1" class="textos1"> <div id = "tudo"> ... </div> </body> </html> só tem um menu(por enquanto), mas não ficou centralizado ... eu pensei em mudar a resolução para 763px (tamanho do menu) mas não fez diferença
-
deculpa a todos... foi uma falta de atenção total de minha parte... coloquei agora desse jeito : r.Open "Select * from Tabela1 where Usuario = '"& Request.Form ("p1") &"'",c vt1 = Request.Form("t1") vt2 = Request.Form("t2") vt3 = Request.Form("t3") vt4 = Request.Form("t4") vp1 = Request.Form("p1") vSQL = "Insert Into Tabela1 (Nome, Usuario, Senha, E-mail, Telefone) values ('" & vt1 & "', '" & vt2 & "', '" & vp1 & "', '" & vt4 & "', '" & vt3 & "')" Response.Write(vSQL) Response.End If r.EOF then If Request.Form("p1") = Request.Form("p2") then c.Execute(vSQL) Response.Write "OK" Else Response.Write "Fail" End If Else Response.write "Usuario já existe" End If e apareceu o response.write vSQL:
-
bom dia a todos ! peço a colaboração, e a paciencia de todos para a minha seguinte duvida : meu site já esta pronto, mas tem um problema vai ocorrer resoluções diferentes de cada micro que olhar o site, no meu esta tudo certo, mas quem estiver com outra resolução, o site vai ficar muito grande ou mt pequeno ... queria saber como faço para centralizar a pagina... eu vi no site do maujor, alguns sites e foruns, mas n consigo fazer, ele não esta centralizando, e centraliza junto a parte de texto (pelo q eu entendi, tem um limite, mudei para 998 para colocar uma imagem, só essa imagem funciona, mas com o meu site, n funciona XD) na pagina tem : botões, camadas, tabelas, textos, imagens e 1 menu (<< n sei se isso ajuda muito) desde já, agradeço !
-
tentei por os parenteses mas deu o mesmo erro ... eu tirei : If r.EOF then If Request.Form("p1") = Request.Form("p2") then c.Execute ("Insert Into Tabela1(Nome,Usuario,Senha,E-mail,Telefone) values ('"& Request.Form("t1") &"', '"& Request.Form("t2")&"', '"& Request.Form("p1") &"', '"& Request.Form("t4") &"', '"& Request.Form("t3") &"')") Response.Write "Esta tudo bem" Else Response.Write "Fail" End If Else Response.write "Usuario já existe" End If e coloquei em cima : vt1 = Request.Form("t1") vt2 = Request.Form("t2") vt3 = Request.Form("t3") vt4 = Request.Form("t4") vp1 = Request.Form("p1") c.execute = "Insert Into Tabela1 (Nome, Usuario, Senha, E-mail, Telefone) values ('" & vt1 & "', '" & vt2 & "', '" & vp1 & "', '" & vt4 & "', '" & vt3 & "')" Response.Write(vSQL) Response.End If r.EOF then If Request.Form("p1") = Request.Form("p2") then c.Execute(vSQL) Response.Write "OK" Else Response.Write "Fail" End If Else Response.write "Usuario já existe" End If era desse jeito ?
-
boa tarde fercosmig obrigado por responder ! mas ainda esta dando o erro :
-
boa tarde a todos ! estou fazendo agora a parte de cadastro, e para isso estou usando o Insert Into ... segue o codigo abaixo : If r.EOF then If Request.Form("p1") = Request.Form("p2") then c.Execute "Insert Into Tabela1(Nome,Usuario,Senha,E-mail,Telefone) values ('"& Request.Form("t1") &"', '"& Request.Form("t2")&"', '"& Request.Form("p1") &"', '"& Request.Form("t4") &"', '"& Request.Form("t3") &"'" Response.Write "OK" Else Response.Write "Fail" End If Else Response.write "Usuario já existe" End If e o erro esta nessa linha : c.Execute "Insert Into Tabela1(Nome,Usuario,Senha,E-mail,Telefone) values ('"& Request.Form("t1") &"', '"& Request.Form("t2")&"', '"& Request.Form("p1") &"', '"& Request.Form("t4") &"', '"& Request.Form("t3") &"'" e o erro é : tabela : Database1.accdb Tabela1 Chave primaria : Código = auto num. Nome = texto Usuario = texto Senha = texto E-mail = texto Telefone = texto teste_cadastro.html t1 = text (nome) t2 = text (usuario) t3 = text (telefone) t4 = text (e-mail) p1 = password (senha) p2 = password (confirmar senha) alguém sabe aonde estou errando ?? Att.
-
bareta eu fiz desse jeito e deu certo ... em vez de numero, deixei como texto mesmo, e foi ! achei esse link também q fala dos tipos numericos http://office.microsoft.com/pt-br/access-h...A001229018.aspx se tiver outro jeito de fazer, por favor me avisem ! obrigado a todos ! vou continuar mexendo no site, qualquer coisa farei outro tópico XD (desculpe qualquer coisa) uma pergunta ... como eu faço para q só aceite numeros ? ou não tem como ? por exemplo : vai ter uma text para telefone, como faço para q essa text aceite só numeros ? Att.
-
esta certo, eu criei como numerico (geral) existe um certo tipo para senha ? e onde eu acho essa parte dos tipos numericos no access 2010 ? (isso se estiver dentro dele) Agradeço desde já ! edit : eu fiz um teste aki... eu criei uma coluna (Senha_teste) do tipo texto mudei o p1 para text (estava como password) e funcionou td certo as mensangens ... seria algo para mudar no bd ou no codigo ?
-
Bom dia, tambem sou novo em codigos asp mas poste seu codigo, talvez eu consiga ajudar =x Att.
-
Bom dia a todos no final, consegui me virar com os erros... muitas tentativas no google, e muitos sites em ingles --' podem me ajudar com esse codigo ? <%Dim c,r Set c = Server.CreateObject("ADODB.Connection") Set r = Server.CreateObject("ADODB.RecordSet") c.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source="&Server.Mappath("Database1.accdb")&";" c.Open r.Open "Select * from Tabela1 where Usuario='"&request.form("t1")&"'", c If r.EOF then Response.Write "usuario ou senha invalidos" else If request.form("p1") = r("Senha") then Response.Write "Bem - vindo" & " " & r("Nome") & " " & "!" else Response.Write "ainda n" end if end if r.close c.close set c = nothing set r = nothing %> eu queria q acontecesse algo do tipo ele pega os valores da Tabela1 se o t1 for diferente de Usuario então mostra mensagem1 se for igual mostra mensagem2 se o p1 for diferente de Senha então mostra mensagem1 se for igual mostra mensagem2 no código acima só mostra usuario ou senha invalidos se o login estiver errado, mas se o login estiver certo (e mesmo se a senha estiver errada, em branco, ou certa) mostra "ainda n"
-
Galera, ainda estou tentando aqui ... tentei com esse código : <%Dim c,r Set c = Server.CreateObject("ADODB.Connection") Set r = Server.CreateObject("ADODB.RecordSet") c.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='"&Server.Mappath("Database1.mdb")&"';" c.Open r.Open "Select * from Tabela1 where Usuario=" & request.form("t1") & ";" If r.EOF then Response.Write "usuario ou senha invalidos" else If Request.Form ("p1") = r("Senha") then Response.Write "Bem - vindo" + r("Nome") + "!" else Response.Write "usuario ou senha invalidos" end if end if r.close c.close set c = nothing set r = nothing %> mas ainda não estou conseguindo o IE mostra a mesmo msg : Microsoft JET Database Engine error '80004005' Unrecognized database format 'D:\Webs\login\pagina_asp\Database1.mdb'. /pagina_asp/registros.asp, line 14 eu não sei o que fazer :( alguém pode dar um help ?? ninguém ?! :( Agradeço desde já !
-
bom dia a todos obrigado a galera ae q estão me ajudando ^_^ Mario, eu coloquei o código que me passou, e o IE mostrou esssa mensagem : tentei tambem com usuario e senha já gravados no bd, mas deu a mesma mensagem.abaixo o código atual (editando: mudei o codigo, deixei como antigo, tentei sem e com aspas na parte do Data source, e deu na mesma): <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>Documento sem título</title> </head> <body> <%Dim c,r Set c = Server.CreateObject("ADODB.Connection") Set r = Server.CreateObject("ADODB.RecordSet") c.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="http://www.escritorioprado.com.br/pagina_asp/Database1.mdb";" c.Open r.Open "Select * from Tabela1 where Usuario=" & request.form("t1") & ";" If r.EOF then Response.Write "usuario ou senha invalidos" else If Request.Form ("p1") = r("Senha") then Response.Write "Bem - vindo" + r("Nome") + "!" else Response.Write "usuario ou senha invalidos" end if end if r.close c.close set c = nothing set r = nothing %> </body> </html> e este o código que estava usando : <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>Documento sem título</title> </head> <body> <%Dim c,r set c = Server.CreateObject("ADODB.connection") set r = Server.CreateObject("ADODB.recordset") c.ConnectionString = "Provider = Microsoft.jet.OLEDB.4.0;Data Source = "http://www.escritorioprado.com.br/pagina_asp/Database1.mdb"",c c.Open r.Open "Select * from Tabela1 where Usuario="& request.form("t1")&"",c If r.EOF then Response.Write "usuario ou senha invalidos" else If Request.Form ("p1") = r("Senha") then Response.Write "Bem - vindo" + r("Nome") + "!" else Response.Write "usuario ou senha invalidos" end if end if r.close c.close set c = nothing set r = nothing %> </body> </html> na parte do Data Source, tentei como ftp://www.escritorioprado.com.br/pagina_asp/Database1.mdb, tentei tambem como pagina_asp/Database1.mdb, maas continua na mesma ... Alberto, consegui fazer essa parte de colocar Todos, mas continua a mesma coisa ... Agradeço desde já !
-
Valeus ae bareta desculpa não entender muito do assunto mas ... eu tentei mudar o mdb para accdb, mudando também o Microsoft.jet.OLEDB.4.0 para Microsoft.ACE.OLEDB.12.0 mas não funcionou... não sei se tem algo a mais no sites que você me indicou, vou continuar pesquisando nos sites... agradeço desde já !
-
Valeus ae Alberto cliquei em adicionar, e apareceu: apertei OK e apareceu isso não sei se fiz certo, mas ao clicar na parte de Segurança aparece selecionado como Permitir : Controle total Modificar Ler & executar Leitura Gravar agradeço desde já ! desculpa alea não entendi muito bem XD como assim pedir pro servidor de hospedagem o caminho ?? no ftp eu criei uma pasta só para testar, tem 2 paginas (uma html, e outra em asp) e o banco de dados... para conseguir acessar a essa pasta, eu entro no IE, e digito http://pasta/pagina.html não sei se é isso q você quis dizer... (OBS: no ftp tem a pasta wwwroot, e dentro dela tem o index do site, criei uma pasta dentro desse wwwroot) agradeço desde já !
-
valeus ae Alea mas como faço isso com ftp ? o banco de dados esta dentro de um ftp coloca como http:// ou coloca como ftp:// ? e no codigo que você passou é nessa ordem mesmo, ou pode ser na q eu fiz ? (a ordem da conexao, e de abrir ela) set c = Server.CreateObject("ADODB.connection") set r = Server.CreateObject("ADODB.recordset") c.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "& Server.MapPath("Database1.mdb")&";",c esqueci de falar algo... o Data Source = "ftp://...Databse1.mdb" ou "http://...Database1.mdb" é preciso por as aspas ou não precisa ? (verifiquei no codigo que você passou não tinha aspas) agradeço desde já !
-
bom dia a todos ! faz um tempo que não mexo com asp, e não lembro direito dos códigos... estou tentando fazer uma conexão com o banco de dados onde : a pagina verifica se o usuario/senha existem no banco de dados, se existir aparece uma mensagem, se não existir aparece outra segue abaixo a mensagem que o IE mostra : Microsoft VBScript compilation error '800a0401' Expected end of statement /pagina_asp/registros.asp, line 12 c.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "& Server.MapPath("Database1.mdb")&";",c tentei de varias formas, mas não axo o erro, estou mudando toda hora o Data Source, mas nenhum esta dando certo... segue abaixo os códigos em asp <%Dim c,r set c = Server.CreateObject("ADODB.connection") set r = Server.CreateObject("ADODB.recordset") c.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = "& Server.MapPath("Database1.mdb")&";",c c.Open r.Open "Select * from Tabela1 where Usuario="& request.form("t1")&"",c If r.EOF then Response.Write "usuario ou senha invalidos" else If Request.Form ("p1") = r("Senha") then Response.Write "Bem - vindo" + r("Nome") + "!" else Response.Write "usuario ou senha invalidos" end if end if r.close c.close set c = nothing set r = nothing %> agradeço desde já !
-
bom dia galera ! é possivel fazer dois menus(um na vertical e outra na horizontal) na mesma pagina html ? eu tentei por os 2, mas se eu mexo em um(aumento a largura), o outro também muda(também aumenta !)... sou novo em css, não sei muita coisa, tentei mudar o li e o ul, mas não funcionou ... (alguém sabe porque ?) só adicionando algo (não sei se ajuda muito) os dois menus tem submenus ! agradeço desde já !
-
ooo Alea vlws mesmo ! uma pergunta ... quando o tópico termina coloca algo ? (como resolvido ou algo do tipo ?)
-
bom dia galera ! a pergunta seria a seguinte : uso o marquee, e como faço quando o mouse passa em cima da frase, ele para, e quando o mouse sai, ele volta a mexer ... (pergunta simples pra vocês :unsure: ) obrigado !
-
Duvidas Sobre Iis Pergunta E Eu Dou Uma Mão
pergunta respondeu ao franciscobiscaino de satoshy em Microsoft Windows
bom dia galera ! eu instalei o iis com o cd windows xp sp3 (ocorreram alguns erros, como não achar alguns componentes, mas deu tudo certo) só que, ao abrir o http://localhost ele pede login e senha, eu coloco como anonimo, e ao acessar novamente, ele não mostra a pagina ... e tambem não consigo ver paginas asp... ele mostra o código do asp (<%...%>) alguém da um help ai ! =/ -
Duvidas Sobre Iis Pergunta E Eu Dou Uma Mão
pergunta respondeu ao franciscobiscaino de satoshy em Microsoft Windows
raphael não axei na microsoft, joguei no google e apareceu varios sites e foruns que falam sobre isso, mas não sei se é uma boa ideia... só é possivel instalar o IIS pelo cd do windows ? (o meu é o XP) só acrescentando ... eu baixei o arquivo zip, ele contem arquivos do IIS, mas não tem todos, alguns sites disponibilizam mais que os outros, ou menos arquivos, mas até agora não axei nenhum que tenha todos... Att.