묻고답하기

제 홈페이지에 꼭!! 필요합니다.

2002.09.16 20:37

폼메일에서 파일 업로드해서 메일 첨부파일로
받고 싶은데 잘 안되네요. 제가 워낙 초보라서...
cgi로 되어있는데 그냥 텍스트는 잘되는데
이미지 첨부는 가질 않아요.
제발 누가 아시는분 올려주세요. ㅠ.ㅠ
제가 이게 꼭!!! 필요하거든요.

아래에 소스 올립니다.
고수님들의 수정 부탁드립니다.

아래는 cgi 소스입니다.
----------------------------------

#!/usr/bin/perl

######################################################################
######################################################################
#ONLY EDIT THIS PART OF THE SCRIPT!!!!

$backurl = "http://www.xxxxo.net/";
$backname = "homepage";
$mailprog = '/usr/lib/sendmail'+ '+ ';
$youmail = 'xxx@xxx.co.kr';
$yourname = "sxxx";

# DO NOT EDIT BELOW THIS LINE!!!!
#################################################################

# Receive info from Fill in Form

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});

# Process info from Fill in Form

@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
 ($name, $value) = split(/=/, $pair);
 $value =~ tr/+/ /;
 $value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
 $INPUT{$name} = $value;
}

# Post the usernames and passwords in the file.

# open (PASS, "|perl $htpasswd $htpasswdloc $INPUT{'username'} $INPUT{'password'}>/dev/null 2>&1") || die "Can't open $htpasswdloc!";
# close(PASS);

# 아래부분은 홈페이지 주인이 받을 내용입니다.

open (MAIL, "|$mailprog $youmail") || die "Can'+ 't open $mailprog!n";
if ($INPUT{'email'} =~ /(.*)@(.*)/) {
 print MAIL "From: $INPUT{'email'} <$INPUT{'email'}>n";
} else {
 print MAIL "From: $INPUT{'+ 'email'}n";
}
print MAIL "Subject: 신청서nn";
print MAIL "$INPUT{'name'} 님이 신청하신 신청서입니다.nn";
print MAIL "------------------------------------------------------n";
print MAIL "▶ 성명: $INPUT{'name'}";
print MAIL "▶ 주민등록번호: $INPUT{'number1'}- $INPUT{'number2'}n";
print MAIL "▶ 우편번호: $INPUT{'zip1'}-$INPUT{'zip2'}n";
print MAIL "▶ 자택주소: $INPUT{'homeaddress'}n";
print MAIL "▶ 전화번호: $INPUT{'dial'}n";
print MAIL "▶ 휴대폰: $INPUT{'beeper'}n";
print MAIL "▶ 홈페이지주소: $INPUT{'workaddress'} n";
print MAIL "------------------------------------------------------n";
print MAIL "▶ 특기: $INPUT{'skill'}n";
print MAIL "▶ 요구사항: $INPUT{'textarea'}n";
print MAIL "------------------------------------------------------n";
close (MAIL);

# 입력양식을 다썼을때 보여지는 글입니다.

print "Content-Type: text/htmlnn";
print "<html><head><title>감사합니다.</title></head>n";
print "<body bgcolor=white><center>n";
print " n";
print " n";
print " n";
print " n";
print " n";
print " n";
print "<center>감사합니다. </center>n";
print " n";
print " $INPUT{'name'} 님이 작성하신 신청서입니다.n";
print "</center> n";
print " n";
print "</body></html>n";

exit;

sub required {
print "Content-type: text/htmlnn";
print "<html>n";
print "<head><title>ERROR-You must fill asterisk section</title></head>n";
print "<body bgcolor=#ffffff text=#000000>n";
print " <CENTER>Error - You must fill * section to be a member.</CENTER>n";
print " <CENTER>에러 - * 부분을 입력해 주셔야만 회원가입이 가능합니다.</CENTER>n";
print "</body></html>n";
exit;
}

--------------------------------
아래는 html 폼형식
-----------------------------------------------------------------------

<HTML>
<HEAD>
<TITLE>온라인 신청서</TITLE>
<META http-equiv="content-type" content="text/html; charset=EUC-KR">
</HEAD>
<BODY bgcolor="white" text="black" link="blue" vlink="purple" alink="red">

<FORM name="theForm" method="post" action="form.cgi" onsubmit="
 if(this.name.value == '') {
 alert('신청인의 이름을 기입해주세요.');
 return false;}">

 <DIV align="center"><TABLE border="0" cellpadding="0" width="421" height="400"><CAPTION align="bottom">
</CAPTION>
<TR>
<TD width="417" colspan="2" bgcolor="#F3F6ED" height="35">
 <table align="center" border="1" cellspacing="0" width="417" bordercolor="#CCCCCC" bordercolordark="#CCCCCC" bordercolorlight="#CCCCCC">
 <tr>
 <td width="411" height="57">신
 청 서</td>
 </tr>
 </table>
</TD>
</TR><TR>
<TD width="26%" bgcolor="#EEEEEE" height="21">성
 명
 : </TD>
<TD width="73%" bgcolor="#F6F6F6" height="21"> <INPUT type="text"
name="name" size="10"></TD>
</TR><TR>
<TD width="26%" bgcolor="#EEEEEE" height="21">e-mail
 :</TD>
<TD width="73%" bgcolor="#F6F6F6" height="21"> <INPUT type="text"
name="email" size="23"> </TD>
</TR><TR>
<TD width="26%" bgcolor="#EEEEEE" height="21">자택주소
 :</TD>
<TD width="73%" bgcolor="#F6F6F6" height="21"> <INPUT type="text"
name="homeaddress" size="31"></TD>
</TR><TR>
<TD width="26%" bgcolor="#EEEEEE" height="21">전화번호
 :</TD>
<TD width="73%" bgcolor="#F6F6F6" height="21"> <INPUT type="text"
name="dial" size="15"> </TD>
</TR><TR>
<TD width="26%" bgcolor="#EEEEEE" height="21">
 이미지
 보내기
</TD>
<TD width="73%" bgcolor="#F6F6F6" height="21"><input type=file name="userfile" size=20 value=''></TD>
</TR><TR>
<TD width="26%" height="21" bgcolor="#EEEEEE">
요구사항 :
 </TD>
<TD width="73%" height="21" bgcolor="#F6F6F6"> <TEXTAREA name="textarea"
rows="3" cols="37">
</TEXTAREA> </TD>
</TR><TR>
<TD width="417" colspan="2" bgcolor="#F3F6ED" height="38"> 
</TD>
</TR></TABLE><TABLE border="3" cellpadding="0" cellspacing="0">
<TR>
<TD><INPUT type="submit" value=" 신 청"></TD>
<TD><INPUT type="reset" value=" 취 소"></TD>
</TR></TABLE></DIV>
</FORM>

 
</body>
</HTML>

이 게시물을

글쓴이	제목	최종 글
XE	공지 글 쓰기,삭제 운영방식 변경 공지 [16]	2019.03.05 _by 남기남
유키™	php로 필드를 추가할려고 하는데요.^^;
Aki23.™	모닷컴 도메인을 네띠앙에 신청해 사용하다가 최근 다른 호스팅 업체로 옮기고싶습니다. [1]	2007.08.10
글랜굴드	창틀없는 새창 띄우기 어케 하는지..갈켜 주세요. [1]	2007.08.10
아벨라	용량많은 계정서비스 추천해 주세요. [2]	2007.08.10
junic	상태바에 관련 질문과 주소창 질문입니다.
정용호	php 설치 에러 때문에 벌써 4일째 고생입니당...ㅠ ㅠ [2]	2007.08.10
정희연	[re] 포토샵문제요^^글자가 안보여요
김규완	포토샵문제요^^글자가 안보여요 [2]	2007.08.10
김태진	asp 에서 엑셀로 변환시 문제
손병철	질문 입니다 ㅡㅡ
Medic	익스 중지버튼을 텍스트하이퍼링크로..
네띠	인쇄시 머리글처럼... [3]	2007.08.10
박성호	도메인 포워딩에 관련하여 질문드립니다 [1]	2007.08.10
윤봉근	제 홈페이지에 꼭!! 필요합니다.
replica	초보입니다 도움을 구합니다... [2]	2007.08.10
romi	여기 계정점 봐주실래여~ ^^ [2]	2007.08.10
부갱이	프레임을 링크할때.. [2]	2007.08.10
이정은	웹질문이라구 해야하는지 먼지 -_-;
replica	아까 질문 이어서.. [1]	2007.08.10
고지연	nzeo 메뉴처럼.. [1]	2007.08.10

태그 쓰기

묻고답하기

제 홈페이지에 꼭!! 필요합니다.

댓글 0

About

Get involved

Blog

Download

Support

Showcase