tux_boy

O erro é que do jeito que está ele simplesmente não cadastra, na tela não da erro nenhum. Aqui vai o codigo completo: <? $totcf=0; $totcb=0; $totc=0; $totp=0; $totba=0; $tots=0; $totl=0; $tota=0; $xra= $_POST["vra"]; $vin=$_POST["escondido"]; $xx=$_POST["vnumteste"]; echo $_POST["area"]; echo $xx; if ($_POST["resp"] == 1) { if ($_POST["area"] == 1) $totcf++; else if ($_POST["area"]== 2) $totcb++; else if ($_POST["area"]== 3) $totc++; } $conexao=mysql_connect('localhost','root',''); mysql_select_db('teste_vocac',$conexao); $mudavalor = mysql_query("UPDATE resposta_aluno SET totcf = totcf+'$totcf', totcb = totcb+'$totcb', totc = totc+'$totc', totp = '$totp', totba = '$totba', tots = '$tots', totl = '$totl', tota = '$tota' WHERE num_teste= '$xx' ", $conexao); if ($mudavalor) echo 'Resposta cadastrado'; else echo 'Não deu certo'; //echo "<meta HTTP-EQUIV='Refresh' CONTENT='0;URL=teste.php'>"; echo '<form method="post" action="teste.php" >'; echo '<input type=hidden name=escondido value="'.$vin.'">'; echo '<input type=hidden name=vra value="'.$xra.'">'; echo'<input type="reset" value="Cancelar">'; echo'<input type="submit" value="Avançar">'; ?>

Socorro pessoal. Estou com um problema, não estou me acertando com as aspas e com a concatenação no seguinte codigo: $mudavalor = mysql_query("UPDATE resposta_aluno SET totcf = '$totcf', totcb = '$totcb', totc = '$totc', totp = '$totp', totba = '$totba', tots = '$tots', totl = '$totl', tota = '$tota' WHERE num_teste= '$xx' ", $conexao); if ($mudavalor) echo 'Resposta cadastrado'; else echo 'Não deu certo'; Meu problema está no update, tentei inumeras variações, mais a maiorira retorna que não consegue atualizar o registro. alguém pode me ajudar? Muito Obrigado

Olá Onde trabalho instalamos um servidor de bando de dados com o oracle, e eu gostaria de fazer alguns testes. O problema é que todos os componetes com acesso nativo a oracle que encontrei são pagos, gostaria de saber se tenho alguma opção gratuita. alguém pode me ajudar? Muito Obrigado pela atenção

Pessoal, tenho um groupbox com 6 opções e de acordo com a opção se gera um arquivo texto diferente. O meu problema que quando vou tentar gravar no arquivo texto, e apenas em uma das opções aparece o erro de "invalid file name". Olhi tudo e não achei porque ele não ta pegando o nome do arquivo, até porque essa parte do codigo está igual a das outras cinco opções, que não dão erro. Abaixo vou colocar o trecho com erro: ... LabelStatus.Caption := 'Gerando Notas de Saida'; LabelStatus.visible := TRUE; MessageDlg('Esta operação pode demorar alguns minutos, por favor aguarde !!!', mtWarning, [mbOK], 0); QSaida.close; QSaida.parambyname('WFI').AsInteger := QFILIAL.FIELDBYNAME('FILIAL').AsInteger; QSaida.parambyname('TIPO').Asstring := 'S'; QSaida.parambyname('WDTINI').AsDATE := dtInicial.Date; QSaida.parambyname('WDTFIM').AsDATE := dtFinal.DATE; IF QSaida.ParamByName('WdtfiM').AsDate < QSaida.ParamByName('Wdtini').AsDate THEN begin MessageDlg('Data Final menor que data inicial!', mtWarning, [mbOK], 0); dtFinal.SetFocus; end else BEGIN QSaida.Open; QSaida.First; GaugeStatus.MaxValue := QSaida.RecordCount; {$I-} { Get directory name from TEdit control } MkDir('C:\teste\'+ IBLKFILIAL.Text + '\Saidas\'+ copy(DateToStr(dtInicial.Date),1,2)+ ' a ' + copy(DateToStr(dtFinal.Date),1,2) + ' do ' + copy(DateToStr(dtInicial.Date),4,2) + ' de ' + copy(DateToStr(dtInicial.Date),7,4)); {$I+} Salvar1.InitialDir := 'C:\teste\'+ IBLKFILIAL.Text + '\Saidas\'+ copy(DateToStr(dtInicial.Date),1,2)+ ' a ' + copy(DateToStr(dtFinal.Date),1,2) + ' do ' + copy(DateToStr(dtInicial.Date),4,2) + ' de ' + copy(DateToStr(dtInicial.Date),7,4); Salvar1.FileName := 'saida.txt'; Salvar1.Title := 'Salvar arquivo remessa em:'; SALVAR1.Execute; AssignFile (arq,Salvar1.FileName); Rewrite (arq); O sistema da o erro na ultima linha, no rewrite, mais não consigo descubrir o porque! Por favor, vocês podem me ajudar!!!!

Pessoal, meu problema é o seguinte: sou novo em delphi, estou tentando fazer um sistema de backup e fazer a cópia de um arquivo de um lugar para outro eu consegui. O problema é que eu queria compactar o backup, procurei na internet e achei alguns exemplos de como fazer isso utilizando o winzip e o winrar. Meu problema é que nenhum que eu tenha encontrado funcinou e queria saber se vocês poderiam me ajudar. Utilizo o delphi 5. Muito obrigado!

Ainda sou novo em programação e estou utilizando o delphi 5 e gostaria de saber como posso utilizar esse componente. Sei que um corretor ortográfico, mais coloquei-o no formulário e não sei como faze-lo funcionar. alguém pode me dar um exemplo ou me explicar como ele funciona? Muito Obrigado!

Alguém poderia me dizer qual banco utiliza arquivos com a extenção dbb? Muito obrigado

Qual é o jeito mais facil? Achei um tutorial na internet de como fazer, mandando eu utilizar um sqlconection, um datasource e um sqlquery, só que quando testo a conexão da um erro de Failure to Conect: Unable to load LibMysql.dll. se alguém puder me dizer como contornar esse erro, ou outra maneira de faze-lo, agradeceria muito!

Pessoal, tenho um servidor MySql na escola em que trabalho, e estou desenvolvendo um sistema para a biblioteca, e o chefe quer que utilize um banco criado no servidor, o problema é que não sei como posso fazer isso! alguém pode me ajudar? Obrigado

Muito obrigado micheus! Resolveu o meu problema sim, vlw

Pessoal, eu baixei da internet um novo componente para utilizar no delphi. No arquivo zipado que eu baizei vei 3 arquivos: um com extensão DCR, outro DCU e um PAS. Como faço para instala-lo no delphi? Eu não sei, pois sou iniciante e nunca havia utilizado componentes diferentes antes. Muito obrigado!

Micheus, desculpe a folga, mais seria possivel você colocar um exemplo de como faz isso? Muito obrigado!

No meu fomulario tenho um page control, e em cada uma das "abas" estou montando um cadastro diferente. O problema é que a quantidade de informações é grande e queria usar esse componente para que o ususario pudesse rolar essa barra, para eu poder organizar melhor o cadastro. porém quando altero a propriedade associate e coloco o tab sheet, ou qualquer outro componente que esteja no formulario, ele fica em branco. alguém poderia me dizer o porque? Estou utilizando errado o componente? Muito obrigado!

Realçmente o InnoSetup é muito bom, porem como faço para gerar um instalador de um sistema que uiliza bando de dados Access. Tentei utilizar o InnoSetup, mais depois da instalação do sistema, fui tentar executar e não deu certo, deu erro. Muito obrigado

Algum poderia me ajudar me dizendo onde consigo download de programas que gerem instaladores para aplicações em delphi. Eu utilizo o InstallShield com o delphi 5, mais estou com alguns problemas e queria saber se exitem outras opções. Muito obrigado!