Ir para conteúdo
Fórum Script Brasil

leaio

Membros
  • Total de itens

    13
  • Registro em

  • Última visita

Posts postados por leaio

  1. Ola´pessoal, é o seguinte eu tenho uma área administrativa onde o usuário depois de cadastrado, pode enviar a sua foto, mas ta aí o pau... não consigo fazer o upload por nada, e nem mandar o nome da foto pro servidor... de uma olhada no meu code, por favor me ajudem..

    Eu sei que tem alguma coisa errada, mas não sei alterar sou iniciante, em Php, se alguém habilitar em rescreever o codigo e explicasse qual erro, seria muito bom aproveito para mim e os outros usuários.

    Tabela.sql

    CREATE TABLE usuarios (
      uname varchar(10) NOT NULL default '',
      upass varchar(10) NOT NULL default '',
      nome varchar(100) NOT NULL default '',
      image varchar(100) NOT NULL default '',
      PRIMARY KEY  (uname)
    ) ENGINE=MyISAM;
    Conn.php
    <?
    
    $connection = mysql_connect("localhost", "root", "")
     or die (mysql_error());
    
    
     $db = mysql_select_db("usuarios", $connection) or die (mysql_error());
    ?>
    Upload.php
    <?php
    
    session_start();
    
    if(empty($_SESSION[uname]))
    {
            header("location:login.php");
    }
    else
    {
            include_once "conn.php";
    }
    
    ?>
    
    
    <?php
    
    
    $q1 = "select image from usuarios where uname = \"$uname\" ";
    $r1 = mysql_query($q1) or die(mysql_error());
    $a1 = mysql_fetch_array($r1);
    
    ?>
    
    <html>
    
    <head>
        <title><?=$UPLOADIMG?></title>
    
    <?
    
    if ($REQUEST_METHOD == "POST") 
    {
    
        /* SUBMITTED INFORMATION - use what you need
         * temporary filename (pointer): $imgfile
         * original filename           : $imgfile_name
         * size of uploaded file       : $imgfile_size
         * mime-type of uploaded file  : $imgfile_type
         */
    
         /*== upload directory where the file will be stored 
              relative to where script is run ==*/
        
        $uploaddir = "images/";
        
    
        /*== get file extension (fn at bottom of script) ==*/
        /*== checks to see if image file, if not do not allow upload ==*/
        $pext = getFileExtension($imgfile_name);
        $pext = strtolower($pext);
        if (($pext != "jpg")  && ($pext != "jpeg")  && ($pext != "gif"))
        {
            print "<h1>ERROR</h1>Image Extension Unknown.<br>";
            print "<p>Please upload only a JPEG or GIF image with the extension .gif , .jpg or .jpeg ONLY<br><br>";
            print "The file you uploaded had the following extension: $pext</p>\n";
    
            /*== delete uploaded file ==*/
            exit();
        }
    
    
        /*== setup final file location and name ==*/
        /*== change spaces to underscores in filename  ==*/
        $rand_numb = md5(uniqid(microtime())); //generate random name u can change this to rand(1,99999); if u want make shorter name 
            $neu_name = "$rand_numb"."$imgfile_name";
        $final_filename = str_replace(" ", "_", $neu_name);
        $newfile = $uploaddir . "/$final_filename";
        
        /*== do extra security check to prevent malicious abuse==*/
        if (is_uploaded_file($imgfile))
        {
    
           /*== move file to proper directory ==*/
           if (!copy("$imgfile","$newfile")) 
           {
              /*== if an error occurs the file could not
                   be written, read or possibly does not exist ==*/
              print "Error Uploading File.";
              exit();
           }
         }
    
        /*== delete the temporary uploaded file ==*/
        
    echo "<br>
    This is the image you upload :<br><br>
    <img src='$newfile'><br>
    <br>
    If you want to replace it just upload another image . <br>
    <br>
    <center><a href=upload.php>Go Back</a></center>";
    
        /*== DO WHATEVER ELSE YOU WANT
             SUCH AS INSERT DATA INTO A DATABASE  ==*/
        if (is_uploaded_file($imgfile))
            {
            $qup = "update usuarios set image = \"$newfile\" where uname = \"$uname\" ";
            $rup = mysql_query($qup) or die(mysql_error());
    include "../footer.php";
            exit();
            }
    }
    ?>
    
    <p align="right"><font color="#FF6600"><strong><br>
      Upload your Picture !</strong></font>
    <hr size="1" color=#FF6600></p>
    <?=$WARNINGUPLOAD?>
    <form action="<?=$SCRIPT_NAME; ?>" method="POST" enctype="multipart/form-data">
        <input type="hidden" name="MAX_FILE_SIZE" value="50000">
    
        <p><?=$UPLOADIMG?> <input type="file" name="imgfile"><br>
        <font size="1"><?=$CLICKTOUPLOAD?></font><br>
        <br>
        <input type="submit" value="Upload Image">
        </form>
    
    
    <?
        /*== FUNCTIONS ==*/
    
        function getFileExtension($str) {
    
            $i = strrpos($str,".");
            if (!$i) { return ""; }
    
            $l = strlen($str) - $i;
            $ext = substr($str,$i+1,$l);
    
            return $ext;
    
        }
            
     include_once('../footer.php'); 
    ?>
    [code]

  2. já fiz um post com esta pergunta tempos atras,mas vocês não entederam muito bem..

    Bom eu estou fazendo um sistema de curriculos,já fiz o formulario e a parte administrativa da empresa e do candidato,bom recentemente entrei na catho e em outras agencias de emprego online,e notei que em todas esses sites oferecem para a empresa cadastrada um servico de incluir vagas,para que candidatos com curriculos cadastrados possam se candidatar a estas vagas.......Eu queria entender,e gostaria que vocês explicassem como isso funciona,porque não tenho a minima ideia de como fazer isso... tem alguma coisa a ver com session???

  3. E ai galera, é o seguinte to fazendo um sistema de curriculum online já fiz o formulario para cadastro do curriculo o admin do candidato e da empresa,agora queria fazer,um sistema pra inclui vagas ou seja o empresario cadastrado inclui sua vaga e o candidato cadastrado vê esta vaga e se candidata,mais ou menos igual da catho online,

    Por favor me ajudem!!!!,nem tenho ideia de como fazer isto...,como o codigo é gratuito e praticamente vocês me ajudaram em outros post a fazer este codigo...,quem tiver interesse de me ajudar posta o email ai que eu mando o que eu já fiz.....

    obrigado

  4. Por Favor me ajudem, fiz um sistema de login,onde usuario cadastrado loga e tem acesso aos seus dados para poder modifica-los,beleza,

    então fiz o seguinte: no login.asp gravei o usuario numa session,e no arquivo "alteracao.asp" ,tentei recuperar esta session,mas só tá dando pau

    da uma olhada no codigo::

    login.asp

    <%
    	usuario = Request.Form("usuario")
    	senha = Request.Form("senha")
        
    	If Len(usuario) > 0 Then
        Set objConn = CreateObject("ADODB.Connection")
      objConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\inetpub\wwwroot\curriculum\dados\dados_cadastro.mdb")
          Set rsUser = objConn.Execute("SELECT ID, usuario, senha, nome FROM curriculo_cadastrado WHERE usuario=""" & usuario & """ AND senha=""" & senha & """")
      Session("id")=rsUser("id")
      If rsUser.EOF Then
      	ErrorMessage = "<P><font color=""#FFFFFF"">Invalid Username or Password</font></P>"
      	rsUser.close
      	Set rsUser = Nothing
      	Set objConn = Nothing
      Else
      	Session("id") = rsUser("id")
      	Session("nome") = rsUser("nome")
      	rsUser.close
      	Set rsUser = Nothing
      	Set objConn = Nothing
      	Response.redirect "alteracao.asp"
      End If
    	End If	
    
    %>
    
    alteracao.asp
    <%
    	If Len(Session("id")) = "0" Then
      Response.Redirect "default.asp"
    	End If
    %>
    
    <html>
    <head>
    <title>ASP Dataform</title>
    </head>
    <body>
    <center><font face="Arial" size="4"><b>Formulário de Alteração</b></center>
    
    <%
    id = session("id")
    response.write id
    If IsEmpty( Request.Form("submit") ) Then
    Set Conexao = Server.CreateObject("ADODB.Connection")
    Constr = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& server.MapPath("..\dados\dados_cadastro.mdb")
    Conexao.Open Constr
    ComandoSQL = "SELECT * FROM curriculo_cadastrado WHERE id =" &id& " ORDER BY id DESC"
    Set rs = Server.CreateObject("ADODB.Recordset")
    rs.CursorLocation = 2
    rs.CursorType = 0
    rs.LockType = 3
    rs.Open ComandoSQL, conexao,,, &H0001
    
    If Not rs.EOF Then
      rs.Move Request.QueryString("n")
    %>
    

    ERRO

    Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

    [Microsoft][Driver ODBC para Microsoft Access] Parâmetros insuficientes. Eram esperados 1.

    /curriculum/login_usuario/alteracao.asp, line 26

  5. alguém poderia me dar uma dica de com fazer um script para modificar dados de um bd através de formularios,servindo de exemplo este abaixo

    <tr>
        <td align=left valign=top width="254" height="25">
          <font face="Arial" size="1">Nome<br>
        <input type=text name="nome" value="<%=RS("nome")%>" size=38 maxlength=50 style="<font-family: Arial; font-size: 8 pt; font-family: Arial; border: 1 solid #808080; padding-top: 0">
          </font>
        </td>
        <td align=left valign=top width="269" height="25">
          <font face="Arial" size="1">Sexo<br>
        <input type=text name="sexo" value="<%=RS("sexo")%>" size=15 maxlength=50 style="<font-family: Arial; font-size: 8 pt; font-family: Arial; border: 1 solid #808080">
          </font>
        </td>
      </tr>
    

  6. beleza,mas tem hora que da certo mas tem hora que dá o seguinte erro

    Microsoft OLE DB Provider for ODBC Drivers error '80004005'

    [Microsoft][Driver ODBC para Microsoft Access] O campo 'curriculo_cadastrado.tel_res' não pode ser uma seqüência de caracteres de comprimento nulo.

    /exemplos/3/Formulario/dados/confirma.asp, line 103

    não preenchi o campo tel_res,mas cara queria saber se tem uma função que por exemplo,

    IF campo=="(NULL)";faz O CAMPO RECEBER POR EXEMPLO O VALOR "INDIFERENTE",TO PENSANDO NISSO porque TEM O FORMULARIO DE CONSULTA,E CREIO EU QUE, SE UM CAMPO QUE ELE FOR PEGAR DO FORMULARIO FOR NULO,VAI DAR PAU>>

    OBRIGADO!!!!!

  7. E ai galera eu mandei o codigo para cadastro de dois campos (nome,cidade),ele não dá menssagem de erro,quando eu não preencho algum campo ele cai no ELSE e me retorna a mensagem que está lá!!!,

    <%
    If Not IsEmpty(Request.Form("submit")) AND Trim(Request.Form("nome")) <> ""  AND Trim(Request.Form("cidade")) <> ""  Then
        Set Conexao = Server.CreateObject("ADODB.Connection")
        Conexao.Open "DBQ=C:\Inetpub\wwwroot\exemplos\3\Formulario\dados\dados_cadastro.mdb;Driver={Microsoft Access Driver (*.mdb)};"
        ComandoSQL = "INSERT INTO curriculo_cadastrado (nome, cidade)"
        ComandoSQL = ComandoSQL & " VALUES ("
        ComandoSQL = ComandoSQL & "'" & Server.HTMLEncode(Request.FORM("nome")) & "',"
        ComandoSQL = ComandoSQL & "'" & Server.HTMLEncode(Request.FORM("cidade")) & "')"
        Set bd = Conexao.Execute(ComandoSQL)
        Conexao.Close
        Set bd = Nothing
        Set Conexao = Nothing
    %>
    
       <font face="Arial" size="2">
       <center><br>Os dados foram enviados com sucesso!
    
       <br><a href="index.asp"><b>Clique aqui</b></a> para continuar</font></center>
    
    <%
      Else
    %>
    
       <font face="Arial" size="2">
       <center><br>Atenção: Alguns dados necessário não foram preenchidos corretamente
    
       <br><a href="javascript:history.go(-1)"><b>Clique aqui</b></a> para voltar</font></center>
    
    <%
      End If
    %>

    ,tem outra funçao mais simples onde eu possar usar para o envio de dados????

    editado: Utilize as tags CODE ou QUOTE quanto for postar códigos

  8. Olá pessoal ,eu peguei um software na net que chama dataform,(vocês já devem ter ouvido falar),ele cria formularios rapidamente sem precisar de programacao,bem em peguei este softaware e criei o meu formulario,só que ele só manda os dados pro BD quando todos os campos do formulario estiverem preenchidos!!!,EU QUERIA SABER COMO FAÇO PRA MANDAR OS DADOS DO FORMULARIO PRO BANCO DE DADOS SEM QUE PRECISE PRRENCHER TODOS OS CAMPOS

    If Not IsEmpty(Request.Form("submit")) AND Trim(Request.Form("nome")) <> "" AND Trim(Request.Form("sexo"))

    EU ACHO QUE É AKI!!!!,TENTEI ALTERAR,TIRAR ESTE if not IsEmpty,mas sem sucesso!!!!!

    Por Favor me ajudem!!!!!!!

  9. Bom galera:estou com um problemão e gostaria que vocês me ajudassem:

    eu estou fazendo um programa para calcular juros compostos, comecei fazendo as formulas e td corria bem até que então esbarrei com a seguinte equação:::

    por exemplo divisão de dois numeros 3500/2500 isso vai dar 1,4 beleza e só guardar o resultado numa variavel do tipo float que estaria tudo tranquilo....,mas não preciso deste 1,4 que esta guardada na tal variavel float e transformala em um numero decimal (ou seja 1/4=0,25),....desculpe a minha ignorância,mas teria como eu guardar o valor em duas variaveis int ou seja 1 em numa e 4 na outra????

    POR FAVOR ME AJUDEM!!!!!!

×
×
  • Criar Novo...