Ir para conteúdo
Fórum Script Brasil

traira007

Membros
  • Total de itens

    154
  • Registro em

  • Última visita

Posts postados por traira007

  1. Fla galera,

    então to criando um formulário aqui de cadastro de currículo,porem..

    Nome da Escola:<input type="text" name="nom_esco" title="NOME DA ESCOLA "> <br>
    Data De Início:<input type="text" name="data_ini_esco" title="DATA DE INÍCIO "> <br>
    Data De Término:<input type="text" name="data_fin_esco" title="DATA DE TÉRMINO "> <br>
    Nível Escolar:<select name="nivel_escolar" title="NÍVEL ESCOLAR">
                      <option>Ensino Médio
                        <option>Ensino Técnico
                          <option>Graduação
                            <option>Pós Graduação
                              <option>Mestrado
                   </select><br><br>
    <b>+ ESCOLARIDADE<input type="checkbox" name="add_esco">   <br> </b>

    ao usuario clicar em +escolaridade, quero q ele adicione mais 2 formularios de escolaridade igual ao de cima,como posso fazer isso?

    obrigadooo

  2. <?php
    $radio1 =$_POST[radio1]; //recebe o valor do radio1
    $radio2 =$_POST[radio2];  //recebe o valor do radio2
    $radio3 =$_POST[radio3];  //recebe o valor do radio3
    $radio4 =$_POST[radio4];  //recebe o valor do radio4
    
    //valor do select
    for ($i = 0; $i < count($_POST['assunto']); $i++) 
    { 
        echo $_POST['assunto'][$i]; 
    }
    
    
    $outro =$_POST[outro];
    $comentarios =$_POST[comentarios];
    $nome =$_POST[nome];
    $email =$_POST[email];
    $tel =$_POST[tel];
    $fax =$_POST[fax];
    
    
    //montadoo texto
    $conteudo="
    Radio1: $radio1 <br>
    Radio2: $radio2 <br>
    Radio3: $radio3 <br>
    Radio4: $radio4 <br>
    Assunto: $assunto <br>
    Outro:  $outro <br>
    Comentarios: $comentarios<comentarios>
    Nome: $nome <br>
    Email: $email <br>
    Tel: $tel <br>
    Fax: $fax <br>
    ";
    
    
    //Enviar os dados para o e-mail
    $enviar = mail("$teste@oi.com.br", $conteudo); 
    //Verifica se o e-mail foi entregue com sucesso 
    if($enviar) {
    echo "E-mail enviado com sucesso!";
    }else{
    echo "Não foi possível enviar.";
    }
    
    
    ?>

    fica falando que ta danu erro na linha 43

    o que esta errado nesse codigo

    vlw galera

  3. Galera to querenu fazer uma macro que tenhas essas seguintes caracteristicas:

    -Mapear uma impressora na rede.

    -Mapear uma unidade de rede e copiar ela para area de trabalho

    -Copiar um arquivo na rede e joga-lo na area de trabalho como atalho

    -E por fim.Instalar um programa da rede(mysql) e configurar seus dados no odbc(MySQL ODBC 3.51).

    Os dados seriam:IP,NOME DO BANCO DE DADOS,USUARIO.

    Teria como realizar uma macro desse tipo?

    desde já agradeço.

  4. Estou usando o mysq l 4.

    Mais quando vou executar um sistema envolvido com o mysql.. as vez da max users conectados..

    como posso fazer para aumenter o numero de usuarios..

    porem o estranho tenho umas 50 pessoas usando o sitemas e o limite de usuarios esta a 100

    oque pode esta acontecendoo

    obrigado

  5. Uso o windows server 2003..tenho em media 50 usuarios que acessam meus arquivos do server

    bom o problema foi que um unico usuario esta sendo bloqueado pelo server

    fala que a rede não esta acessivel..

    tem como eu mecher na maquina dele e voltar aquela tela de fazer logon para a rede..

    pois ta entranu direto..

    por isso acho que ta travando

    obrigado

  6. Fala galera..

    boa noite primeiramente

    fiz um relatório no rave.. so que na hora de visualizar ele so mostra um registro..

    sendo que no banco de dados tem mais registros..

    q pode ta acontecendo?

    uhausa acho expliquei erradooo

    na tabela temm

    NOME,IDADE,TELEFONE,SEXO

    SENDO QUE já CADASTREI UMAS 50 PESSOAS..

    AI SO MOSTRA UM REGISTROO

  7. cara deu certin mais tipo..

    quando eu mando calcular a soma e a divisao por exemplo..

    e quero agora so multiplicao,quando eu dismarco a opcao da soma..o botao desabilito..

    como posso fazer que precise so de um checkbox clicado pra habilitar o botao?

  8. Fala galera to crianu uma calculadora básica

    Ela funciona assim:

    O usuario escolhe no checkbox que opcao vai ser:

    SOMAR/SUBTRAIR/DIVIDIR/MULTIPLICAR

    ou todos eles de uma vez

    ai eu criei um messagebox para enviar todos os resultados..

    Mais como que eu posso fazer um message box que so imprima so o resultado da opcao que eu escolhi no checkbox..

    o codigo ate agora está aqui..

    so que está danu erro no if

    sse alguém puder da uma olhada

    grato

    unit Unit1;

    interface

    uses

    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

    Dialogs, StdCtrls;

    type

    TForm1 = class(TForm)

    btn_calcular: TButton;

    btn_limpar: TButton;

    edt_num1: TEdit;

    edt_num2: TEdit;

    check_somar: TCheckBox;

    check_subtrair: TCheckBox;

    check_dividir: TCheckBox;

    check_multiplicar: TCheckBox;

    Label1: TLabel;

    Label2: TLabel;

    procedure btn_limparClick(Sender: TObject);

    procedure btn_calcularClick(Sender: TObject);

    private

    { Private declarations }

    public

    { Public declarations }

    end;

    var

    Form1: TForm1;

    implementation

    {$R *.dfm}

    procedure TForm1.btn_calcularClick(Sender: TObject);

    var

    result ,

    num1,num2,soma,sub,divi,mult:integer;

    begin

    if edt_num1.text='' then

    ShowMessage('Digite um valor para o 1º número')

    else if edt_num2.text='' then

    ShowMessage('Digite um valor para o 2º número');

    if check_somar.Checked then

    num1:=StrToInt(edt_num1.text) ;

    num2:=StrToInt(edt_num2.text) ;

    soma:=num1 + num2;

    ShowMessage('O resultado da soma é'+IntToStr(soma))

    else if check_subtrair.Checked then

    num1:=StrToInt(edt_num1.text) ;

    num2:=StrToInt(edt_num2.text) ;

    sub:=num1 - num2;

    ShowMessage('O resultado da subtracao é'+IntToStr(sub));

    if check_dividir.Checked then

    num1:=StrToInt(edt_num1.text) ;

    num2:=StrToInt(edt_num2.text) ;

    divi:=(num1 / num2);

    result:=divi;

    if check_subtrair.Checked then

    num1:=StrToInt(edt_num1.text) ;

    num2:=StrToInt(edt_num2.text) ;

    mult:=num1 * num2;

    result:=mult;

    end;

    procedure TForm1.btn_limparClick(Sender: TObject);

    begin

    edt_num1.text:='';

    edt_num2.text:='';

    check_somar.Checked:=False;

    check_subtrair.Checked:=False;

    check_dividir.Checked:=False;

    check_multiplicar.Checked:=False;

    end;

    end.

  9. To com um jogo de perguntas e respostas..t

    na hora dos resultados quero que um campo receba o nº de perguntas erradas e outra para o numero de perguntas certas..

    Outro campo para calcular a % porcentagem de acertos e erros..

    ce puder me ajudar..

    é pra amanha esse jogo

  10. fala cara..o jogo é dividi em 3 partes velho..

    1 para o inico,

    2 para perguntas e

    3 para resultados

    no resultados a varios campos de resultados das repostas corretas,tipo porcentagem,media de acertos,perguntas certa e erradas dentre outros para dados estatisticos..

  11. Galera

    procedure TForm3.RESULTADOSClick(Sender: TObject);

    begin

    case form2.RadioGroup1.itemindex of

    0:Edit1.text := FloatToStr(strtofloat(edit1.text) +1) ;

    1:Edit5.text := FloatToStr(strtofloat(edit1.text) +1) ;

    2:Edit5.text := FloatToStr(strtofloat(edit1.text) +1) ;

    3:Edit5.text := FloatToStr(strtofloat(edit1.text) +1) ;

    end ;

    o que pode está acontecendo aí? ele da erro aqui o

    is not a valid floating point value

    HElp aí

  12. procedure TForm3.RESULTADOSClick(Sender: TObject);

    begin

    if form2.RadioGroup1.ItemIndex=0 then

    edit1.Text:=strtofloat(edit1.text) +1

    else

    edit5.Text:=strtofloat(edit5.text) +1;

    begin

    if form2.RadioGroup2.ItemIndex=2 then

    edit1.Text:=strtofloat(edit1.text) +1

    else

    edit5.Text:=strtofloat(edit5.text) +1 ;

    begin

    if form2.RadioGroup3.ItemIndex=1 then

    edit1.Text:=strtofloat(edit1.text) +1

    else

    edit5.Text:=strtofloat(edit5.text) +1 ;

    begin

    if form2.RadioGroup4.ItemIndex=0 then

    edit1.Text:=strtofloat(edit1.text) +1

    else

    edit5.Text:=strtofloat(edit5.text) +1;

    begin

    if form2.RadioGroup5.ItemIndex=3 then

    edit1.Text:=strtofloat(edit1.text) +1

    else

    edit5.Text:=strtofloat(edit5.text) +1 ;

    begin

    if form2.RadioGroup6.ItemIndex=0 then

    edit1.Text:=strtofloat(edit1.text) +1

    else

    edit5.Text:=strtofloat(edit5.text) +1

    end;

    end;

    end;

    end;

    end;

    end;

    end.

    alguém da uma mao?

  13. aí velho..da uma ajuda agora..caso eu queira colocar mais if..

    como fica?

    procedure TForm3.RESULTADOSClick(Sender: TObject);

    begin

    if form2.RadioGroup1.ItemIndex=0 then

    edit1.text:='1'

    else

    edit5.Text:='0'

    end;

    begin

    if form2.RadioGroup2.ItemIndex=0 then

    edit2.text:='1'

    else

    edit5.Text:='0'

    end;

    end;

    end.

  14. procedure TForm3.Edit3Change(Sender: TObject);

    begin

    if form2.RadioGroup1.ItemIndex=0 then

    edit1.text:=1

    else

    edit5.Text:=0

    end;

    end.

    TO NO FORM 3 E TO QUERENU PUXAR O FORM 2 A VERIFICACAO..

    MAIS está DANDO ERRO NO ELSE..

    HAHA é UMA PERGUNTA NOOB MAIS QL é O ERRO?

  15. bom galera,to precisando de uma ajuda aqui..quem souber as teclas de atalho para essas funcoes

    -Inserir os nomes de argumentos e parênteses para uma função, após ter digitado um nome de função válido em uma fórmula.

    -Criar nomes a partir de rótulos de linhas ou de colunas

    -Exibir a caixa de criação de fórmulas após ter digitado um nome de função válido em fórmulas

    quem puder ajuda =)

  16. Bom consegui colocar um server de um jogo chama do mu online no ar!

    Mas quando vou colocar o site no ar,ele diz que não consegue conectar ao BD.

    Fatal error: Call to undefined function: mssql_connect() in /home/bcbarros/public_html/traira/MuFace/include/internal.php on line 19

    O tipo de login do banco de dados é Windows Authentication.

    Como eu posso resolver o problema?

    Abráços

×
×
  • Criar Novo...