28,406
社区成员
发帖
与我相关
我的任务
分享 if not isnull(rs("photoName")) then
dim topId,sqlPhoto
set rs2=server.createobject("adodb.recordset")
sql2="select top 1 SID from SALES order by SID desc "
rs2.open sql2,conn,1,1
topId=CLng(rs2("SID"))
rs2.close
set rs2=nothing
sqlPhoto="insert into PHOTOLIST (SMALLPHOTO,BIGPHOTO,PHOTONAME,PHOTOSIZE,HASH,THEDAY,SID) values ("&rs("smallPhoto")&","&rs("orederImage")&",'"&rs("photoName")&"','0','0',"&Date()&","&topId&")"
conn.Execute sqlPhoto
end if