Marianne
-
Total de itens
139 -
Registro em
-
Última visita
Tudo que Marianne postou
-
Tenho BD access e uma tabela que tenho todos meus usuarios cadastrados nela. quando o usuario se loga crio uma session "x".. igual para todos. Ao ponto.. como posso listar todos usuarios logados naquele momento? Deixei uma barra lateral que irá colocar o nome cadastrado no BD um a um( os que estao online. não sei se vou usar o global.asa, mas este é o meu.. tks mais uma vez!!!! <script LANGUAGE=VBScript RUNAT=Server> Sub Application_OnStart Application("visits") Application("Active") = 0 End Sub Sub Application_OnEnd End Sub Sub Session_OnStart Session.Timeout = 30 Session("Start") = Now Application.Lock Application("visits") = Application("visits") + 1 intTotal_visitors = Application("visits") Application.Unlock Session("VisitorID") = intTotal_visitors Application.Lock Application("Active") = Application("Active") + 1 Application.Unlock End Sub Sub Session_OnEnd Application.Lock Application("Active") = Application("Active") - 1 Application.Unlock End Sub </SCRIPT> bdcadastro.mdb Tabela( nome, senha, depto)
-
Bicicleta, deu o erro: Tipo de erro: Microsoft JET Database Engine (0x80040E21) Você tentou executar uma consulta que não inclui a expressão 'categoria' especificada como parte de uma função agregada. relatorio.asp, line 74
-
Guto, deu o erro: Tipo de erro: Microsoft VBScript compilation (0x800A0409) Unterminated string constant relatorio.asp, line 74, column 76 sql="SELECT SUM(valor) AS ValorTotalDaCategoria FROM tabela WHERE categoria=1"
-
Desisti de esperar alguém aqui ajudar.. Resolvi de um modo estranho porque ainda fica mostrando as barras de navegacao e os scrolls.... mas deu certo! Se algume souber como tirar por favor postem.. obrigada. Redimencionei a janela no onload <script> function maximizar() { window.moveTo (-4,-4); window.resizeTo (screen.availWidth - 770, screen.availHeight - 400); } </script> <body bgcolor="#FFFFFF" onLoad="maximizar()"> "A galera aqui não gosta muito de ajudar as pessoas novatas " Mary Obrigado "Pilantra", seu codigo me ajudou muito na pag anterior!
-
TEnho uma tabela que tem nome,categoria,valor e gostaria de somar cada categoria o campo valor.. exemplo.. um relatorio categoria | valor 1 | 230 2 | 200 3 | 222 Somando todos de uma categoria Uso este Sql <%sql="select * from tabela where categoria='"&vategoria&"'" set rs=conn.Execute(sql) Obrigada novamente! Mary
-
Oi.. funcionou direitinho.. mas.. abre na mesma janela, preciso que abra num pop-up com tamanho definido como 300x300px.. Obrigada.. Mary
-
Como posso enviar meu formulario teclando enter e não clicando em um botao.. Ahh e tem como ele abrir em uma outra janela 300x300 sem barras de rolagem?.. desculpe, mas tem como? <form name="f-distr" action="cadastrar.asp" method="get"> <input type=text name="fdev" size=23 maxlength="23"> </form> Obrigada
-
Desculpe, mas não achei pra onde este post foi redirecionado.
-
Muito obrigada por toda ajuda.. vou tentando! tks
-
Entendi.. mas.. TEnho que liberar o banco de dados pra "autorizar" o usuario entrar.. posso fazer via browser este ativamento? tentei jogar dentro de uma pagina asp este codigo: GRANT ALL PRIVILEGES ON Bd1.* TO mary IDENTIFIED BY 'mary2' WITH GRANT OPTION; Mas deu erro.. com certeza não é assim.. ;( Tks
-
então.. preenchi minha conexão assim..: <% Dim ConectaMysql set ConectaMysql = Server.CreateObject("ADODB.Connection") ConectaMysql.ConnectionString = "DRIVER=MySQL;SERVER=XXX.XXX.XXX.XXX;UID=USUARIO;PASSWORD=SENHA;DATABASE=Bd1" ConectaMysql.open %> <% Set rscom = Server.CreateObject("ADODB.Recordset") rscom.ActiveConnection = ConectaMysql rscom.Source = "SELECT * FROM Bd1.Bd1" rscom.CursorType = 0 rscom.CursorLocation = 2 rscom.LockType = 1 rscom.Open() rscom_numRows = 0 %> Localmente funciona beleza, mas no servidor da o erro: ADODB.Connection.1 error '80004005' SQLState: S1000 Native Error Code: 1045 [TCX][MyODBC]Access denied for user: 'mary@host.meusite.com' (Using password: YES) Obrigada e desculpe! Mary /mysql/comunidadeSQL.asp, line 7 O que será? Ps.: Meu banco de dados eu exportei como Bd1.SQL pelo programa "Navicat" e joguei na raiz Obs.. Mudei o HOST/Usuario e senha por serem provavelmente Reais, e não é bom ter estes dados em Dominio pubico.. desculpe por ter feito isto.. mas é por segurança, sua mesmo, Abraços
-
Consegui! Meu BD esta rodando em MySQL, mas só localmente, porque depois que jogo no servidor não funciona não.. Como posso saber configurar tudo que funcione localmente e no servidor.. Meu banco de dados esta na pasta junto com os arquivos, errado? Desculpe.. mas.. COM ESTA FEITA PELO Drenweaver-MX FUNCIONOU LOCALMENTE somente <% ' FileName="Connection_odbc_conn_dsn.htm" ' Type="ADO" ' DesigntimeType="ADO" ' HTTP="false" ' Catalog="" ' Schema="" Dim MM_Conn_STRING MM_Conn_STRING = "dsn=Geral;uid=root;" %> <% Dim rscom Dim rscom_numRows Set rscom = Server.CreateObject("ADODB.Recordset") rscom.ActiveConnection = MM_Conn_STRING rscom.Source = "SELECT * FROM Geral.geral" rscom.CursorType = 0 rscom.CursorLocation = 2 rscom.LockType = 1 rscom.Open() rscom_numRows = 0 %> COM ESTA abaixo não FUNCIONA NEM LOCAL SEM NO SERVIDOR <% Dim ConectaMysql set ConectaMysql = Server.CreateObject("ADODB.Connection") ConectaMysql.ConnectionString = "DRIVER=MySQL;SERVER=127.0.0.1;UID=usuario;PASSWORD=senha;DATABASE=cliente" ConectaMysql.open %> Este SERVER é minha url? Tks de novo!
-
Muito muito obrigada a todos.. vou começar já a tentar e continuar postando duvidas.. Bjos e valeu mesmo Mary
-
Hj faço programação com ASP e BD ACCESS, sei que é vulneravel etc, mas agora estou ferrada.. vou ter que passar tudo pra MySql e não tenho ideia como fazer.. já peguei tutoriais, o livro aprenda em 21 dias.. mas todos me deixam louca.. Sei os comandos, mas nenhum me ensina do principio.. como se passa isso pro servidor, como fazer direto no servidos.. ele ficam dando varios comandos e ensinar mesmo não achei nenhuma boa.. alguém pode me dar dicas e onde achar os livros(SP) ou apoestilas? Muito grata!!!! MAry