|
|
|
|
 |
|
김광수 / 2001-03-08 / 오후 10:52:36 / 168.115.32.56
조회수 : 140
|
| [질문] 고수님(채널이)님아 아직도 이해가 잘안가는데요.. |
님이 설명해준것을 아직도 이해가 잘안가서
조금 자세히 설명 좀 해주시면하는데요..
function CheckForm(theForm) {
if (navigator.appName!="Netscape") {
if (theForm.F_Name.value=="") {
alert("이름을 입력하세요.");
theForm.F_Name.focus();
return false;
}
if (theForm.F_Subject.value=="") {
alert("제목을 입력하세요.");
theForm.F_Subject.focus();
return false;
}
if (theForm.F_Contents.value=="") {
alert("내용을 입력하세요.");
theForm.F_Contents.focus();
return false;
}
}
이게 파일업로드에 관한것같은데 어떻게 해야할지??
그리고
if V_Error=1 then
if P_FileName <> "" then
Set Fso = Server.CreateObject("Scripting.FileSystemObject")
V_Flag=0
V_AddName=0
V_FileName=Fso.GetFileName(P_FileName)
V_BaseName=Fso.GetBaseName(V_FileName)
V_ExtensionName=Fso.GetExtensionName(V_FileName)
V_AbsoluteFileName=Server.MapPath("..\data")&"\"&P_ID&"\"&V_FileName
V_SaveFileName=V_AbsoluteFileName
do while V_Flag=0
if (Fso.FileExists(V_SaveFileName)) then
V_AddName=V_AddName+1
V_SaveFileName=Server.MapPath("..\data")&"\"&P_ID&"\"&V_BaseName&V_AddName&"."&V_ExtensionName
else
V_Flag=1
V_AbsoluteFileName=V_SaveFileName
end if
loop
UploadForm("F_FileName").SaveAs V_AbsoluteFileName
V_FileName=Replace(Fso.GetFileName(V_AbsoluteFileName), "'", "''")
Set Fso=Nothing
Set UploadForm=Nothing
end if
이건 write_ok.asp이거든요..제가 생각하기에 이쪽인것같은데 잘모르겠어요..
그리고 데이터베이스를 자세히 좀 설명해주시겠어요..
전 오피스2000에서 디비를 만들었거든요..
그럼 고수님들 좀 알려주세요 |
|
|
|