Ir para conteúdo
Fórum Script Brasil

leaio

Membros
  • Total de itens

    13
  • Registro em

  • Última visita

Sobre leaio

leaio's Achievements

0

Reputação

  1. leaio

    Upload de Imagens

    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. leaio

    Internet Information Server

    cara aconteceu algo parecido comigo (utilizo o windows 2000), descobri q era uma falha no meu windows ,reistalei o mesmo daí deu certo....
  3. leaio

    Sistema De Vagas Online

    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???
  4. 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
  5. 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
  6. 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>
  7. Consegui!!!,Valeu mesmo galera,as respostas me ajudaram muito!!!!!
  8. beleza,mas tem hora que da certo mas tem hora que dá o seguinte erro 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!!!!!
  9. 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
  10. 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!!!!!!!
  11. leaio

    Dividir Formulários

    vou tentar aki....valeu pela ajuda galera!!!!
  12. leaio

    Dividir Formulários

    Tenho um formulário no meu site,só que ele está muito grande e demora muito para carregar,como eu poderia dividi-lo este formulário,por 2 o mais páginas??? obs:este formulario faz conexão com um banco de dados
  13. 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...