fenggesetsave.asp

FlashPicViewer电子相册 v2.6 繁体中文版

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%><!--#include file="user.asp" -->
<%
if ((session("flash_name")<>user_name) or (session("flash_pass")<>user_password)) then 
response.write "FPV by Yellowboy&Chipiano!"
else
%>
<!--#include file="conn.asp"-->
<%
cid=request("cid")
foderjpg=request("foderjpg")
fname=request("fname")
bgimg=request("bgimg")
ydir=request("ydir")
ieopen=request("ieopen")
comok=request("comok")
titleok=request("titleok")
loadtype=request("loadtype")
password=request("password")
count=request("count")
xiazai=request("xiazai")
set conn=server.createobject("adodb.connection")
conn.open MM_hs_STRING
set rs=server.createobject("adodb.recordset")
sql1 = "SELECT * FROM picinfo WHERE fname='"+fname+"'"
rs.open sql1,Conn,2,2
if not rs.eof then
rs("bgimg")=bgimg
rs("foderjpg")=foderjpg
rs("ydir")=ydir
rs("loadtype")=loadtype
rs("ieopen")=ieopen
rs("comok")=comok
rs("titleok")=titleok
rs("cid")=cid
rs("password")=password
rs("xiazai")=xiazai
rs("count")=count
rs.update
rs.close
set rs=nothing
response.Write("&SendOK=1")
else
sql2="insert into picinfo (fname,bgimg,ydir,ieopen,comok,titleok,loadtype,cid,password,count,xiazai,foderjpg) values ('"&fname&"','"&bgimg&"','"&ydir&"','"&ieopen&"','"&comok&"','"&titleok&"','"&loadtype&"','"&cid&"','"&password&"','"&count&"','"&xiazai&"','"&foderjpg&"')"
conn.Execute (sql2)
conn.close
set conn=nothing
response.Write("&SendOK=1")
end if
end if
%>