Ir para conteúdo
Fórum Script Brasil

MagoDanger

Membros
  • Total de itens

    118
  • Registro em

  • Última visita

Tudo que MagoDanger postou

  1. Então, eu já tinha visto esse tutorial fuçando na net, porém deopis dessa tela não vai pra outra ali que mostra o botão "Install Now", aqui pra mim aparece uma outra falando que eu tenho que indicar um drive... mas já tentei indicar os drives de todos os hardwares do meu pc, já atualizeia BIOS, e nada de funcionar. =//
  2. pessoal... alguém pode me ajudar nisso?? obrigado.
  3. olá amigo... ainda estou com problemas... A data de vencimento estava sendo calculada em relação a data de hoje independente do valor que fosse inserido no campo VENCIMENTO. Fiz umas alterações, e ficou asim: var valor : real; venc : double; parcelas, i : integer; begin valor := StrToFloat(Edit1.text); Venc := StrToFloat (Edit2.text); parcelas := StrToInt(Edit3.text); memo1.Clear; Query1.Active := false; ClientDataSet1.Active := false; Query1.Active := true; ClientDataSet1.Active := true; for i := 1 to parcelas do begin ClientDataSet1.Last; // ultimo registro ClientDataSet1.Append; // adicionar novo registro ClientDataSet1.Edit; // editar registro // Atribuir os valores das variaveis aos campos do registro na tabela ClientDataSet1parcelas.Value := inttostr(i) +'/'+inttostr(parcelas); // campo String ClientDataSet1Valor.Value := valor; // campo Float ClientDataSet1Vencimento.Value := venc+date+(-30+30*i); // campo Data ClientDataSet1.Post; // salvar o registro ClientDataSet1.ApplyUpdates(-1);// atualizar o registro Query1.Active := false; ClientDataSet1.Active := false; Query1.Active := true; ClientDataSet1.Active := true; end; end; Agora está quase certo, ao não ser a data que vai diminuindo sempre 1 dia!! Ou seja, hoje é dia 29 porém eu posso fazer um cadastro de um cliente cujo vencimento vai ser todo dia 10. Então no campo VENCIMENTO eu colocaria 10, e todos os vencimento seriam dia 10. ASSIM: 10/06/2011 10/07/2011 10/08/2011 PORÉM... com essa programação se eu colocar o vencimento dia 10 (e vamos supor que forem 5 parcelas), fica assim: 08/06/2011 08/07/2011 07/08/2011 06/09/2011 06/10/2011 como posso alterar a programação pra fazer isso? Obrigado.
  4. então.. mas no access só tem pra escolher o campo Data/Hora.... e agora?
  5. amigo deu certoo!!!! :rolleyes: :rolleyes: :rolleyes: :rolleyes: agora tem 2 probleminhas.... 1) eu clico no botão é como se não tivesse aconteceido nada... não aparece na DBGrid os dados e tal... dai eu coloquei um outro datasource ligado com o query1... mas dai só aparece se eu fechar e abrir novamente o sistema... 2) no campo vencimento está saindo além da tada... a hora também.. como faço pra não sair a hora e sim só a data? obrigado!!!
  6. ixi... não estou conseguindo.. agora aparece o erro: Para conectar oa banco de dados fiz da seguinte forma: - ADOConection (liguei ele com o BD Access) - ADOQuery1 (liguei ele com no conection com o ADOConection e liguei ele com a tabela no SQL: select * from pagamentos) - DataSetProvider1 (no DataSet linkei com a Query1) - ClientDataSet1 (no MasterSource liguei com o DataSetProvider1 dei 2 cliques nele e criei os 3 campos com as mesmas caracteristicas que criei no banco de dados e depois cliquei com o botão direito sobre ele e fui em creat dataset) - DataSource (liguei com a Query1) O que tem de errado agora nisso que eu fiz?? =//// obrigado novamente!
  7. olá amigo... antes de tentar fazer diretamente no meu sistema... fiz um outro para teste, e ficou dessa forma: var valor : real; venc, parcelas, i : integer; s : string; begin valor := 180; Venc := 21; parcelas := 10; memo1.Clear; Query1.Active := false; ClientDataSet1.Active := false; Query1.Active := true; ClientDataSet1.Active := true; for i := 1 to parcelas do begin Query1.Last; // ultimo registro Query1.Append; // adicionar novo registro Query1.Edit; // editar registro {s := 'Parcela: '+ inttostr(i) +'/'+inttostr(Qtde_parc)+ ' - Valor: R$ '+ formatfloat('0.00',valor) + ' - Vencimento: ' + inttostr(venc) + copy(datetostr(now+(30*i)),3,8); memo1.Lines.Append(s);} // Atribuir os valores das variaveis aos campos do registro na tabela Query1parcelas.Value := inttostr(i) +'/'+inttostr(parcelas); // campo String Query1Valor.Value := valor; // campo Float Query1Vencimento.Value := now+(30*i); // campo Data Query1.Post; // salvar o registro Query1.UpdateRecord; // atualizar o registro end; end; PORÉM.... quando aperto F9 roda normal, só que quando clico no botão aparece o seguinte erro: Porque está ocorrendo esse erro? Obrigado pela força que está dando. abração
  8. olá amigo.... tentei aqui e não consigo de jeito nenhum.. porque a idéia é gerar todos esses pagamentos e já gravar diretamente no banco de dados. você poderia fazer isso pra mim como serviço? eu pago... mas preciso muito disso.... obrigado.
  9. pessoal, bom dia! estou cmo um problema aqui que não consigo solucionar na instalação do Windows 7 64 coloco ele pra instalar, ele carrega, dai pede pra selecionar a linguagem, colo portugês dou avançar... porém na tela seguinte aparece uma informação pedidndo pra que eu selecione um drive (fala que pode remover o CD do windows que não tem problema)... porém nunca consego passar dessa tela de instalação. Gostaria de saber o que fazer, pois já testei em 2 PCs esse CD e sempre aparece essa informação. tenteio aqui no meu colocar o Cd dos drivers da placa mãe, mas não adiantou em nada... o que seria esse erro? valewww....
  10. MagoDanger

    Problema na página

    mas como eu faço isso?
  11. MagoDanger

    Problema na página

    então amigo, deu certo a acentuação do php começou a aparecer, mas agora o meu que puxa um stilo css dá pau, fica dessa forma a plavra "matérias" por exemplo: Matérias ai se eu volto como era antes: <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> Ai a palavra MATÉRIAS aparece certo mas volta o problema com o php... 0o'' tem como resolver isso? obrigado
  12. PEssoal, bom dia! Estou com um pequeno probleminha aqui nas páginas minha em PHP. Tudo o que tem acentuação aparece dese jeito: Pr�xima Porque aparece esse quadradinho ai? e como resolver esse problema? Obrigado.
  13. MagoDanger

    Remover Data

    Pessoal, peguei um script de upload de imagens com painel ADM na internet bem legal.. fiz as alterações que precisava... porém tem uma coisa que não consegui remover: - A data na hora da exibição na página Vamos lá: - Quando é feito o cadastro de uma categoria fica marcada a data/hora. No painel de controle é muito úitil pra mim isso, porém na exibição para os usuário é ruim. Veja abaixo nas fotos: *** Essa data/hora que eu queria remover de exibição... Tentei remover, mas não consigui. A página "index", a qual exibe essas categorias com as fotos possui a seguinte programação: <? require("class.php"); $Gal = new Galeria; $path = str_replace("/index.php","",$_SERVER["SCRIPT_FILENAME"]); $T = new Template($path."/templates/index.htm"); $T->Replace("DIM", $dim); $T->Replace("Titulo", $titulo); ///////////////////////////////// if(isset($_GET['cat'])){ $inc= "Fotos"; }else{ $inc= "Galerias"; } $Include = new Template( $path."/templates/".$inc.".htm" ); require($inc.".php"); ///////////////////////////////// echo $T->Show(); ?> a página "class.php" <? require('config.php'); function Alerta($msg){ echo "<CENTER><br><B><font color=red>$msg</font></B><br>&nbsp;</CENTER>"; } class Galeria { function Verifica(){ @session_start(); if($_SESSION['log']!="ok"){ @session_unset(); @session_destroy(); header('location: login.php'); } } function Imagem($img,$logo){ $this -> Img = getimagesize($img); $type = $this -> Img[2]; if( $type==1 ){ $this -> Copia = imagecreatefromgif( $img ); }elseif( $type==3 ){ $this -> Copia = imagecreatefrompng( $img ); }elseif( $type==2 ){ $this -> Copia = imagecreatefromjpeg( $img ); } $this -> X = imagesx($this -> Copia); $this -> Y = imagesy($this -> Copia); $this -> Logo = imagecreatefromjpeg("imagens/$logo"); imagecopymerge($this->Copia , $this -> Logo , $this -> X - (imagesx($this -> Logo) + 5) , $this -> Y - ( imagesy($this -> Logo) + 5 ) , 0 , 0 , imagesx($this -> Logo) , imagesy($this -> Logo) , 100); header ("Content-type: image/jpeg"); imagepng($this -> Copia); @imagedestroy( $this->Copia ); @imagedestroy( $this->Logo ); } function Thumb($img,$dim){ $this -> Img = getimagesize($img); $type = $this -> Img[2]; if( $type==1 ){ $this -> Copia = imagecreatefromgif( $img ); }elseif( $type==3 ){ $this -> Copia = imagecreatefrompng( $img ); }elseif( $type==2 ){ $this -> Copia = imagecreatefromjpeg( $img ); } $this -> X = imagesx($this -> Copia); $this -> Y = imagesy($this -> Copia); if($this -> X > $this -> Y){ $this -> T_X = $dim; $this -> T_Y = floor( ($this -> Y * $dim) / $this -> X ); }elseif( $this -> Y > $this -> X ){ $this -> T_Y = $dim; $this -> T_X = floor( ($this -> X * $dim) / $this -> Y ); }else{ $this -> T_X = $dim; $this -> T_Y = $dim; } $this -> Thumb = imagecreatetruecolor( $this -> T_X , $this -> T_Y ); imagecopyresampled( $this -> Thumb , $this -> Copia, 0,0,0,0, $this -> T_X ,$this -> T_Y , $this -> X, $this -> Y ); header ("Content-type: image/jpeg"); imagejpeg($this -> Thumb); @imagedestroy( $this->Thumb ); @imagedestroy( $this->Copia ); } } class Template{ var $Template; var $Tabela, $Num, $Loop; function Template($arquivo){ $open_o = fopen($arquivo,"r"); $this -> Template = fread( $open_o , filesize($arquivo) ); } function Show(){ return $this-> Template; } function Replace($var, $conteudo){ $this->Template = str_replace("[".$var."]",$conteudo, $this->Template); } function Loop( $lugar, $valores ){ $this->Loop = $lugar; if( strstr($this->Template,"[-$lugar-]") ){ $this->Template = str_replace( "[-$lugar-]" , $this->Tabela."[-$lugar-]" , $this->Template ); }else{ $partes = explode("<!--".$lugar."-->",$this->Template); $partes2 = explode( "<!--/".$lugar."-->" , $partes[1] ); $this->Tabela = $partes2[0]; $this->Template = str_replace( "<!--$lugar-->".$this->Tabela."<!--/$lugar-->" , $this->Tabela."[-$lugar-]" , $this->Template); } foreach($valores as $chave=>$valor){ $this->Template = str_replace("[$chave]",$valor,$this->Template); } } function CloseLoop(){ $this->Template = str_replace( "[-".$this->Loop."-]", "", $this->Template); } } ?> Na página "template" não tem nada... depois tem a página "galerias.php": <? @session_start(); @session_unset(); @session_destroy(); $cats = mysql_query("select * from cats"); if(mysql_num_rows($cats)>0){ $i = 1; $arr=array(); while($d = mysql_fetch_array($cats)){ foreach($d as $chave=>$valor){ $arr[$chave] = $valor; } $arr['n'] = $i; $Include->Loop('Galerias', $arr ); $i=$i+1; } $Include->CloseLoop('Galerias'); $T->Replace("INCLUDE", $Include->Show() ); }else{ $T->Replace("INCLUDE","<b>Nenhuma categoria encontrada!</b>"); } ?> a página "img.php" <? require("class.php"); $Gal = new Galeria; $d = explode("?",$_GET['id']); $cat = $d[0]; $img = $d[1]; $path = str_replace("/img.php","",$_SERVER["SCRIPT_FILENAME"]."/imgs/$cat/$img"); if(file_exists( $path )){ $Gal->Imagem( $path , $logo); }else{ header ("Content-type: image/jpeg"); $im = imagecreatefromjpeg("imagens/not_found.jpg"); imagejpeg($im); imagedestroy($im); } ?> e a página "fotos.php" <? $cat = addslashes($_GET['cat']); $busca = mysql_query("select * from cats where id='$cat'"); $d = mysql_fetch_array($busca); @session_start(); $Include->Replace("gal",$d['nome']); $Include->Replace("data",$d['data']); $imgs = array(); $abre = opendir("$path/imgs/$cat"); if(!isset($_SESSION['gal_'.$cat])){ while (false !== ($file = readdir($abre))) { if($file=="." || $file==".."){ continue; }else{ array_push( $imgs , $file ); } } $_SESSION['gal_'.$cat] = $imgs; //echo" Loop "; }else{ $imgs = $_SESSION['gal_'.$cat]; //echo" Session "; } if(count($imgs)!=0){ $val = $imgs[0]; unset($imgs[0]); array_push( $imgs , $val ); if(isset($_GET['p'])){ $counter1 = $_GET['p']; $cc1 = $counter1; $counter2 = ceil($_GET['p']/$imgs_p_pagina)*$imgs_p_pagina; }else{ $counter1 = 1; $counter2 = $imgs_p_pagina; $yyy = "ok"; } //echo "$counter1-$counter2"; $porcentagem = 100/$imgs_p_linha; $Linha=1; while($counter1<=$counter2){ echo" $counter "; if($imgs[$counter1]!=""){ //echo $imgs[$counter1]; if($Linha==$img_p_linha){ $Linha=1; $br = "<BR>"; $porcetagem--; }else{ $Linha++; } $infos = @getimagesize("$path/imgs/$cat/".$imgs[$counter1] ); $arr['x'] = $infos[0]; $arr['y'] = $infos[1]; $arr['porcentagem'] = $porcentagem; $arr['dir_img'] = "$cat?".$imgs[$counter1]; $arr['BR'] = $br; $Include->Loop("Imgs",$arr); if($br != ""){$br = ""; } } $counter1++; } $Include->CloseLoop('Imgs'); ///////////////////////////////////// $pagination = "\n\n\n\n\n\n\n\n\n"; if($_GET['p']>$imgs_p_pagina){ $aaa = $cc1 - $imgs_p_pagina; $pagination .= "<a href='?cat=$cat&p=$aaa'><< Voltar</a>&nbsp;&nbsp;&nbsp;"; } $h=1; for( $i=1; $i<=count($imgs); $i=$i+$imgs_p_pagina ){ if($h==(ceil($_GET['p']/$imgs_p_pagina))){ $ppp="<b>$h</b>"; }else{ $ppp = $h; if($h==1 && !isset($_GET['p'])){ $ppp="<b>$h</b>"; } } $pagination .= "&nbsp;&nbsp;<a href='?cat=$cat&p=". $i ."'>$ppp</a>&nbsp;&nbsp;"; $h++; } if(isset($imgs[$counter2+1])){ $uuu = $counter2+1; $pagination .= "&nbsp;&nbsp;&nbsp;<a href='?cat=$cat&p=$uuu'>Próxima >></a>"; } $pagination .= "\n\n\n\n\n\n\n\n\n"; $Include->Replace("Paginação", $pagination ); ///////////////////////////////////// $T->Replace("INCLUDE", $Include->Show() ); }else{ $T->Replace("INCLUDE","<b><a href='index.php'>Galerias</a> > ".$d['nome']." - (".$d['data'].")<br><br><font color=red>Nenhuma imagem encontrada!</font></b>"); } ?> Penso que tem que mudar alguma coisa no $d (deve ser ele que representa a data/hora)... tentei várias coisas mas não consegui.... alguém pode me ajudar nisso? Obrigado pessoa!!!
  14. olá pessoal... venho tentando fazer essa forma de gerar pagamentos... mas não dá jeito de conseguir! por favor me ajudem... meu BD é access... eu tenho na tabela pagamentos (tbl_pagamentos) os seguites campos: - valor - data vencimento - parcelas O que eu precio é por exemplo, preencher assim: (vamos supor que estou fazendo esse cadastro hoje. Considerando o mês 04) Valor: R$ 180,00 Vencimento: 21 Quantidade de Parcelas: 10 Então ao clicar no botão GERAR, iriar gerar e gravar no banco de dados da seguinte forma: Parcela: 1/10 Valor: R$ 180,00 Vencimento: 21/05/2011 Parcela: 2/10 Valor: R$ 180,00 Vencimento: 21/06/2011 Parcela: 3/10 Valor: R$ 180,00 Vencimento: 21/07/2011 Parcela: 4/10 Valor: R$ 180,00 Vencimento: 21/08/2011 Parcela: 5/10 Valor: R$ 180,00 Vencimento: 21/09/2011 Parcela: 6/10 Valor: R$ 180,00 Vencimento: 21/10/2011 Parcela: 7/10 Valor: R$ 180,00 Vencimento: 21/11/2011 Parcela: 8/10 Valor: R$ 180,00 Vencimento: 21/12/2011 Parcela: 9/10 Valor: R$ 180,00 Vencimento: 21/01/2012 Parcela: 10/10 Valor: R$ 180,00 Vencimento: 21/02/2012 IMPORTANTE: o valor será sempre o mesmo para todos os mêses, pois é mensalidade de aula. Portanto não precisa ser dividido pela quantidade de parcelas. Por favor pessoal, preciso muito disso e desde que criei esse tópico tenho tentado fazer, mas não consigo. Agradeço a ajuda.
  15. Obrigado pessoal, foi só ativar o "register_globals" que tudo funcionou normalmente. Valewwww
  16. Certo.. eu procurei essa opção dentro do meu painel de hospedagem (LOCAWEB) mas não encontrei... é no painel mesmo que ativa isso ou tem que criar algum .inc ou algo parecido? e essa opção: PHP 'safe_mode' on [] Tem que deixar desmarcada mesmo né? Obrigado.
  17. Tem alguma coisa de errado aqui? <?php session_start(); include_once "../configuration.inc.php"; require_once "../main.php"; if(!isset($aid)) { ?> <center> <br><p align="right"><font color="#FF6600"><strong><br> Site Admin Area</strong></font> <hr width="100%" size="1" color=#FF6600></p> <table width="278" align="center"> <form method="post" action="<?=$PHP_SELF?>"> <tr> <td>Admin ID:</td> <td> <input type="text" name="aid" size="15"></td> </tr> <tr> <td><?=$PASSWORD1?></td> <td><input type="password" name="apass" size="15"></td> </tr> <tr> <td colspan=2 align=center><input type="submit" value="Login"></td> </tr> <tr><td colspan=2 align=center> <a class=TN href=forgot.php> Forgot your password?</a></td></tr> </form> </table> <?php include "../footer.php"; exit; } session_register("aid"); session_register("apass"); $sql = "SELECT * FROM job_admin_login WHERE aid = '$aid' AND apass = '$apass'"; $result = mysql_query($sql); if (!$result) { echo "A database error occurred while checking your login details. <br>If this error persists, please contact $contactemail"; } elseif (mysql_num_rows($result) == 0) { session_unregister("aid"); session_unregister("apass"); ?> <h1> <?=$ACCDENIED?> </h1> <p>Your user ID or password is incorrect, or you are not a registered user on this site. To try logging in again, click <a href="<?=$PHP_SELF?>">here</a>. </p> <?php include "../footer.php"; exit; } ?>
  18. então, esse é um script de cadastro de currículo que comprei. Meu amigo instalo no servidor dele e funciona normal... porém quando instalei no meu (locaweb) ele fica dando esse problema. Com isso pensei que possa ser alguma coisa com o servidor. Existe essa possibilidade? Se alguém puder me ajudar, eu coloco o script para download. Obrigado.
  19. então, mas existe algum problema que faz co que o logiun e cadastros não funcionem? porque tudo o que é pra se logar ou pra cadastrar acontece isso que cite.
  20. pessoal, peguei um script e instalei no meu servidor, porém não sei o que acontece tudo o que é a parte de cadastro e/ou logar não funciona. Por exemplo, para acessar o painel administrativo do site eu entro com o usuário e senha que está cadastrado no Banco de Dados, porém ao clicar em logar ele volta novamente para a mesma página, ou seja, não loga mas também não apresenta nenhum erro. O que pode está causando isso? E como posso solucionar? Se alguém quiser testar pra ver o que estou falando, o endereço é: www.wm8.com.br/curriculo/siteadmin Usuário: admin Senha: admin Alguém pode me dar uma força? Desde já agradeço.
  21. pessoal.... o problema está aqui dm.q_corpo.Insert; se eu deixo ele junto na programação como eu colei o código acima da o erro.. se eu tiro da programação e coloco o insert em outro botão ai dá certo... só que não é certo clicar em cadastrar e depois ter que clicar em inserir novamente, dá muito trabalho... porque o insert junto com a programação dá erro e se eu coloco ele separado, é feito a soma e não dá erro?
  22. pessoal, beleza? estou com um problema aqui que não consigo entender... meu BD é ACCESS... bom, tenho uma tabelma tbl_orcamento e outra tbl_corpo na tbl_orcamento fica alguns dados do cliente e tem a tbl_corpo que recebe vários ítens que fazem parte desse orçamento... tudo está sendo funcionando legal... porém preciso que seja somado o valor final dos produtos que fazem parte desse orçamento... usei a seguinte função: var soma1: Double; begin soma1 := 0; dm.q_corpo.post; begin with dm.q_corpo do begin Close; SQL.Clear; SQL.Add('select * from tbl_corpo where id_liga like '''+ dbe_codigo.text + '%'''); //os itens que são adcionados na tbl_corpo são relacionados ao orçamento pelo código, esse código é gerado por programa~çao e não automaticamente pelo BD. Open; while not dm.q_corpo.Eof do begin soma1 := soma1 + dm.q_corpo.Fieldbyname('preco_total').Value; dm.q_corpo.Next; ltotal.Caption := FloatToStrF(soma1,ffCurrency , 15,2); begin dm.q_corpo.Insert; edt_produto.SetFocus; end; end; end; end; end; essa programação fica no botão incluir, ou seja, a cada ítem que for incluindo ele já vai somando e exibindo o valor final... quando você inseri o primeiro produto ele pega o valor e mostra certinho... porém quando você insere o segundo produo, ao invés de fazer a soma, ele apresenta o seguinte erro: o que tem de errado nisso que eu fiz que está dando esse erro? valewww
  23. Pessoal, gostaria de saber se alguém tem algum sistema de cadastro, alteração, pesquisa e exclusão de currículo... se alguém tiver algum modelo pra passar ficaria muito grato. procurei na net algo, mas não achei nada que funcionasse! Obrigado!
  24. ops... deu certo!! rrss ficou assim: dm.q_pag_inq.close; dm.q_pag_inq.SQL.clear; dm.q_pag_inq.SQL.add('delete from tbl_pag_inq where id_inq like '''+ Edt_inq.Text + ''''); dm.q_pag_inq.ExecSql;
×
×
  • Criar Novo...