<% Set UploadForm = Server.CreateObject("SiteGalaxyUpload.Form") if UploadForm("name") <> "" then %> <% set userinfo = server.createobject("ADODB.Connection") userinfo.open session("dsn") set reqfield=userinfo.execute("select max(일련번호),count(*) from " & session("linktable")) if reqfield.fields(1) < 1 then seqn = 1 else seqn = reqfield.fields(0) + 1 end if wdate = Year(now) & "-" & Month(now) & "-" & Day(now) re_level = 0 '-----------제목, 내용 정리 -------------- subject = Replace(UploadForm("subject"), "'", "''") textdata = Replace(textdata, "'", "''") textdata = Replace(textdata, chr(32), " ") textdata = Replace(textdata, chr(13), "
") '-----------제목, 내용 정리 -------------- %> <% userinfo.execute("insert into " & session("linktable") & " values (" & seqn & ",'" & _ wdate & "','" & _ UploadForm("name") & "','" & _ UploadForm("pwd") & "','" & _ UploadForm("email") & "','" & _ "'," & _ re_level & ",'" & _ subject & "','" & _ textdata & "','" & _ filename & "',0)") userinfo.close set userinfo=nothing response.redirect "boardlist.asp" end if %> 하이샤시 전문 생산업체 "천호산업"입니다.
 

. 		       
  홈으로... 이메일 사이트맵  
  ">리스트목록으로
 

 
작성자
이메일 암호
제 목
내 용
   
 



.............Copyright © 2001 CHUNHO inc. All right reserved.

<% Set UploadForm = nothing %>