fertel

Olá amigos. O código abaixo estaria correto? $msserver="localhost"; //put your server alias here $usrname="root"; //put your MySQL username here $passwrd="root"; //put your MySQL password here $database="base"; $querylistaplayer="SELECT char_name,x,y,race,z,level,accesslevel FROM characters WHERE online = '1' ORDER BY char_name ASC"; $conn=mysql_connect($msserver,$usrname,$passwrd); mysql_select_db($database, $conn); Pois está apresentando o seguinte erro: Que seria essa linha aqui: $conn=mysql_connect($msserver,$usrname,$passwrd); Ajudem-me...

Bom galera é o seguinte: Sou programador em ASP + Access, portanto não tenho muuuita experiência com MySql e PHP, mas caiu um pepino na minha mão e tenho que resolver... Tenho uma base de dados aqui em localhost. Utilizando o programa "Navicat", eu consigo conectar ao banco sem problemas com: Host ou IP: localhost Usuário: root Senha: root Nome bd: bd Vejam bem... Pelo Navicat em localhost ele conecta sem problemas... Aí quando tento no lugar do "localhost" colocar o IP de minha máquina, que consequentemente dá acesso ao servidor (o que daria na mesma em teoria), o bicho não funciona porque não consegue se conectar. Bom, aí pensei: Deve ser o firewall do XP. Fui lá e autorizei a porta. Ainda assim não conectava. Só para exclarecer. Tenho um servidor em minha máquina (precisa estar em minha máquina). E na web tenho um site que acessa esse DB a partir do IP de minha máquina. Mas o MySql recusa-se a conectar ao banco se não for pelo localhost. Repito que usuário e senha estão corretos, pois pelo localhost conecta. Poderiam me ajudar? Abraços

Por favor, não entendo muito de JS, tentei montar o seguinte código mas não funciona, poderiam me ajudar? Grato <script> function OPTION1(){ valor1 = parseFloat(0,08); valor2 = parseFloat(30); jurosmensal = parseFloat(valor1 * valor2); Alert(jurosmensal); } </script>

Tentou colocar isso tudo lá na coluna?: Set c = cd.XYChart(600, 250) 'Add a title to the chart using Arial Bold Italic font Call c.addTitle("Análise Regional Gráfica", "arialbi.ttf") 'Set the plotarea at (100, 30) and of size 400 x 200 pixels. Set the plotarea 'border, background and grid lines to Transparent Call c.setPlotArea(100, 30, 400, 200, cd.Transparent, cd.Transparent, _ cd.Transparent, cd.Transparent, cd.Transparent) 'Add a bar chart layer using the given data. Use a gradient color for the bars, 'where the gradient is from dark green (0x008000) to white (0xffffff) Set layer = c.addBarLayer(dataa, c.gradientColor(100, 0, 500, 0, &H8000, _ &Hffffff)) 'Swap the axis so that the bars are drawn horizontally Call c.swapXY(True) 'Set the bar gap to 10% Call layer.setBarGap(0.1) 'Use the format "US$ xxx millions" as the bar label Call layer.setAggregateLabelFormat("{value} máterias") 'Set the bar label font to 10 pts Times Bold Italic/dark red (0x663300) Call layer.setAggregateLabelStyle("timesbi.ttf", 10, &H663300) 'Set the labels on the x axis Set textbox = c.xAxis().setLabels(labelss) 'Set the x axis label font to 10pt Arial Bold Italic Call textbox.setFontStyle("arialbi.ttf") Call textbox.setFontSize(10) 'Set the x axis to Transparent, with labels in dark red (0x663300) Call c.xAxis().setColors(cd.Transparent, &H663300) 'Set the y axis and labels to Transparent Call c.yAxis().setColors(cd.Transparent, cd.Transparent) 'output the chart Response.ContentType = "image/png" Response.BinaryWrite c.makeChart2(cd.PNG) Set c = nothing Set cd = nothing Response.End Ou ainda definir largura e altura daquela coluna que deseja que apareça o gráfico, ok? Pode ser que resolva. Senão, voltamos à estaca zero, e tentamos outra solução...

Desculpe, mas não entendi qual o objetivo de eu ler este tópico.

Alguém por favor me ajuda, porque é para meu trabalho e deveria ter entregue ontem. Só preciso saber como utilizar esta função duas vezes na mesma página sem que interfira em seu funcionamento e não saco muito de JS. Obrigado.

Agradeço a ajuda, mas eu tentei fazer isso tb, mas não deu em nada. Simplesmente o segundo não funciona. Será que alguém poderia postar o exemplo de como ficaria para que os dois funcionassem simultâneamente? Obrigado

Galera estou usando o seguinte código para selecionar num menu e aparecer outras opções no outro objeto combo box: Antes da tag </head>: <head> <script language=javascript> function opcao(codopcao) { GRAMATURA=document.form_orc.GRAMATURA; for (m = GRAMATURA.options.length-1; m > 0; m--) GRAMATURA.options[m]= new Option(" ","0") GRAMATURA.options.length=PAPEL[codopcao].length; for (i=0; i < PAPEL[codopcao].length;i++) { GRAMATURA.options[i]=PAPEL[codopcao][i]; } GRAMATURA.options[0].selected=true; } var PAPEL = new Array() function criar() { len=document.form_orc.PAPEL.options.length for (i=1; i<len; i++) { PAPEL[i]=new Array(); } PAPEL[1][0] = new Option("56gr","56gr"); PAPEL[1][1] = new Option("180gr","180gr"); PAPEL[1][2] = new Option("240gr","240gr"); PAPEL[2][0] = new Option("90gr","90gr"); PAPEL[2][1] = new Option("180gr","180gr"); PAPEL[2][2] = new Option("240gr","240gr"); PAPEL[3][0] = new Option("90gr","90gr"); PAPEL[3][1] = new Option("180gr","180gr"); PAPEL[3][2] = new Option("240gr","240gr"); PAPEL[4][0] = new Option("250gr","250gr"); PAPEL[4][1] = new Option("300gr","300gr"); PAPEL[4][2] = new Option("350gr","350gr"); PAPEL[5][0] = new Option("Sem gramatura disponível",""); PAPEL[6][0] = new Option("75gr","75gr"); PAPEL[6][1] = new Option("180gr","180gr"); PAPEL[7][0] = new Option("Sem gramatura disponível",""); } </script> </head> Na tag body: <body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onLoad="form_orc.reset();criar()"> Os objetos na página: <select name=PAPEL class="campo" id="PAPEL" onChange="if (this.selectedIndex > 0) opcao(this.options[selectedIndex].value)"> <option value=0 selected>Selecione</option> <option value=1>Offset</option> <option value=2>Couche fosco</option> <option value=3>Couche brilho</option> <option value=4>Triplex</option> <option value=5>Duo design</option> <option value=6>Vergê</option> <option value=7>Outro</option> </select> <select name=GRAMATURA class="campo" id="GRAMATURA" onChange="GRAMATURA.value=this.options[selectedIndex].value"> <option value=0 selected>Selecione</option> </select> Ou seja, escolhemos um tipo de papel no primeiro menu e aparecem suas respectivas gramaturas no segundo. Tudo funciona perfeitamente. Porém estou precisando colocar na mesma página mais dois objetos destes com a mesma função, pois estou considerando um livro onde temos tipo de papel e gramatura da capa e tb do miolo. Bom, tentei criar a mesma função mudando apenas seu nome assim: function opcao2(codopcao) Mas desta forma não funcionou, deu erro. Alguém pode me ajudar, não tenho muito conhecimento em JS não. Obrigado

Bom, é bem simples, mas não sei..rs Como obter variáveis dentro do VB de uma página em ASP que esteja aberta dentro do WebBrowser. Melhor explicando: No WEBBROWSER dentro da minha aplicação, aparece página X.ASP Dentro desse X.ASP tenho uma variável definida assim: VARIAVEL = Date() (é só um exemplo) Como pegar o valor de VARIAVEL para ser utilizado em minha aplicação no VB? Obrigado pela ajuda.

Opa... Consegui mudando a seguinte linha: bd.CursorType = 1 vlw... Se alguém pelo menos puder postar a causa disso pra gente entender seria legal. Obrigado.

Bom analisando o código abaixo que atualiza dois campos (data/hora) no bd na tabela ENTRADA: ID = Request.QueryString("ID") ComandoSQL = "SELECT * FROM ENTRADA WHERE ((ENTRADA.ID)=" & ID & ")" Set bd = Server.CreateObject("ADODB.Recordset") bd.CursorLocation = 2 bd.CursorType = 0 bd.LockType = 3 bd.Open ComandoSQL, conexao,,, &H0001 bd("DATA_SAIDA") = Date() bd("HORA_SAIDA") = Time() bd.UpdateBatch bd.Requery Session("CODIGO") = CODIGO Response.Redirect "default.asp?OK=1" Só que parece que o banco não localiza a linha que deve alterar. A mensagem de erro é: Já verifiquei a variável "ID" e a mesma está correta retornando "10" que é exatamente a linha que desejo alterar. Alguém pode me ajudar? Obrigado.

Também pensei em fazer assim, mas tem um pequeno problema: Se a hora for: 13:05:02 Ele mostra: 13:5:2 Entende?

Deu certo não... Deu na mesma. consegui assim: Response.Write Hour(Time())-1 Mas só retorna a hora...

Gostaria de saber como somar ou subtrair 1 hora a mais a uma hora já existente. Por exemplo: Time() - 1 Só que isso não funcionou. Retornou muitas horas a menos. Obrigado.

sim, entendi, obrigado.

Bom, fiz um sistema, que será usado apenas teclado numérico. Para submeter não tem botão, o usuário pressiona ENTER e pronto. Mas... como validar um campo deste formulário para não deixá-lo vazio nesse caso? Agradeço uma possível ajuda.

Gênio!!! Consegui, CyberAlex. Só um detalhe... Aqui no meu caso (trabalho) tanto windows quanto Access estão em inglês. Mas tudo bem, valeu por ter funcionado. Obrigado pelo esforço de todos

Fiz assim: ComandoSQL = "SELECT * FROM OS WHERE DATA BETWEEN " & Request.Form("DATA1") & " AND " & Request.Form("DATA2") & " ORDER BY DATA ASC" Set bd = Conexao.Execute(ComandoSQL) Mas não retornou nenhum resultado. sendo que há um registro na data de hoje (16/06/2005). Obrigado pela ajuda desde já

O seguinte código: ComandoSQL = "SELECT * FROM OS WHERE DATA > " & Cdate(Request.Form("DATA1")) & " AND DATA < " & Cdate(Request.Form("DATA2")) & " AND ESPECIE LIKE '%" + Replace(Request.Form("ESPECIE"), "'", "''") + "%' ORDER BY DATA ASC" Set bd = Conexao.Execute(ComandoSQL) Dá o seguinte erro: Por favor me ajudem...

Não no meu caso, seriam arquivos de MP3, ou pederiam ser ASF, o formato eu dou um jeito, mas gostaria que fosse transmitido pelo site através do media player. Alguém têm o código aí? Já vi aqui no fórum, mas não estou achando.

Olha que erro mais esquisito... Acabo de gravar no BD alguns dados, logo depois tento recuperar este mesmo registro para obter algumas variáveis e nessa página dá o seguinte erro: Bom, para este nº de linha o erro é: ComandoSQL = "SELECT * FROM ORCAMENTO ORDER BY ID DESC" Set bd = Conexao.Execute(ComandoSQL) If NOT bd.EOF Then Session("ID_PRODUTO") = bd("ID") Session("VALOR") = FormatCurrency(bd("VALOR_ORCADO")) '** ESTA É A LINHA COM ERRO >>> Session("ID_USUARIO") = bd("ID_USUARIO") End If Então, o que tem haver isso tudo com "ENDERECO"? ENDERECO é sim um dos campos do BD... Mas não entendi o porque do erro.

estava com este problema esta semana... Mudei as permissões do servidor e da pasta onde se encontra o script e resolveu o problema.

Falou!!!! Era exatamente isso... Desculpem o trabalho que dei a vocês, mas é que estou num PC do trabalho novo que estou há apenas uma semana. Normalmente utilizo Windows XP, mas o daqui é 2000 server, e estava com acesso restrito ao diretório. Valeu mesmo pela ajuda companheiros.

Fiz conforme seu exemplo tb não obtive sucesso: titulo = CStr(Request.Form("TITULO")) box2 = CStr(Request.Form("box2")) autor = CStr(Request.Form("AUTOR")) isql = "INSERT INTO COMUNICADOS SET TITULO = '"& titulo &"', COMUNICADO = '"& box2 &"', AUTOR= '"&autor&"'" Response.Redirect "adm_default.asp" Mesma coisa... Não dá erro nem inclui... muito estranho... As permissões do servidor estão ok... do diretório tb... como disse tenho outro script para cadastro que funciona perfeitamente...

aff, tinha um Error resume next... ao retirar apareceu este erro: Error Type: Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable query. admin/comunicados_novo_submit.asp, line 10, que está em negrito abaixo: ComandoSQL = "INSERT INTO COMUNICADOS (TITULO, COMUNICADO, AUTOR)" ComandoSQL = ComandoSQL & " VALUES (" ComandoSQL = ComandoSQL & "'" & Request.FORM("TITULO") & "'," ComandoSQL = ComandoSQL & "'" & Request.FORM("box2") & "'," ComandoSQL = ComandoSQL & "'" & Request.FORM("AUTOR") & "')" Set bd = Conexao.Execute(ComandoSQL)