ask.asp

AspEase Auction System Ver2.0/动易拍卖系统 Ver2.0

<!-- #include file="conn.asp" -->
<!--#include file="inc/check.asp"-->
<!-- #include file="inc/info.asp" -->
<!-- #include file="inc/const.asp" -->
<%
'=========================================================
'Copyright (C) 2003-2004 AspEase.Com. All rights reserved.
'Web: http://www.aspease.com
'Email: [e-mail],[e-mail]
'=========================================================
'
'FileName: ask.asp
'Version:2.0
'UpdateTime: 2004-10-3 22:36:22
'Script Written by www.aspease.com 
'=========================================================
call activeonline()
aspeasepage=""
if rst("action")="save" then
header
sql="insert into msg (msg_aucid,msg_fromid,msg_writedate,msg_content,msg_toid) values("&sqlval(rst("aucid"))&","&sqlval(userid)&",now,"&sqlstr(rst("content"))&","&sqlval(rst("ownerid"))&")"
conn.execute(sql)
response.write "<script language=javascript>{alert( '" & easemsgmsgbox & "');location.href='viewitem.asp?aucid=" & sqlval(rst("aucid")) & "';}</script>"
footer
response.end
end if
stats=easeaskstats
header
	aucid=fval(rst("auc_id"))
	Ownerid=fval(rst("Ownerid"))	
	sql="select * from auctions where auc_itemOwner="&sqlval(Ownerid)&" and auc_id="&sqlval(aucid)
	set rs=conn.execute(sql)
	if rs.eof then
	err_msg=easeerrpage
	aspease_err
	response.End()
	end if		
aspeasepage=aspeasepage &"<script language=""JavaScript"">"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"function chkNull()"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"	{"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"		var doc;"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"		doc = document.myform;"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"		if (doc.content.value=="""")"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"		{"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"			alert("""&easeleavemsgtitle&easenotnullname&"！ "");"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"			doc.content.select();"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"			doc.content.focus();"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"			return false;"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"		}"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"	}"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"	"
aspeasepage=aspeasepage &chr(10)
aspeasepage=aspeasepage &"</script>"
navigation
aspeasepage=aspeasepage & aspeasetable1yopen 
aspeasepage=aspeasepage &" <form name=""myform"" method=""post"" action=""ask.asp"" onsubmit=""return chkNull()"">"
aspeasepage=aspeasepage &"<input type=hidden name=action value=save>"
aspeasepage=aspeasepage & tr2
aspeasepage=aspeasepage & td("11","41","","","d") & ctd("d")
aspeasepage=aspeasepage & td("","","l","","d") & easeasktopname & ctd("d") 
aspeasepage=aspeasepage & td("11","","","","d") & ctd("d") & ctr
aspeasepage=aspeasepage & tr1
aspeasepage=aspeasepage & td("11","100","","","d") & ctd("d")
aspeasepage=aspeasepage & td("","18","c","","d")
aspeasepage=aspeasepage & aspeasetablehopen & tr
aspeasepage=aspeasepage & tdrc("","2","d","") & ctd("d") & ctr
aspeasepage=aspeasepage & tr
aspeasepage=aspeasepage & td("","","c","t","d") & easeleavemsgtitle & "：" & ctd("d")
aspeasepage=aspeasepage & td("80%","","","","d")
aspeasepage=aspeasepage &"              <textarea name=""content"" cols=""90"" rows=""6"" wrap=""hard""></textarea>"
aspeasepage=aspeasepage & ctd("d") 
aspeasepage=aspeasepage & ctr
aspeasepage=aspeasepage & tr
aspeasepage=aspeasepage & tdrc("","2","d","") & ctr & aspeasetableclose
aspeasepage=aspeasepage & ctd("d") 
aspeasepage=aspeasepage & td("11","18","","","d") & ctd("d") & ctr
aspeasepage=aspeasepage & tr2
aspeasepage=aspeasepage & tdrc("","3","d","<div align=center><input type=""hidden"" name=""aucid"" value=""" & fval(aucid) & """><input type=""hidden"" name=""writerid"" value=""" & fval(userid) & """><input type=""hidden"" name=""ownerid"" value="""& fval(Ownerid) & """><input type=""submit"" name=""Submit"" value="""&easesubmitbutton&"""><input type=""reset"" name=""Submit2"" value="""&easeresetbutton&"""></div>")
aspeasepage=aspeasepage & ctd("d") & ctr & "</form>"
aspeasepage=aspeasepage & aspeasetableclose
response.write aspeasepage
footer
'=========================================================
'Copyright (C) 2003-2004 AspEase.Com. All rights reserved.
'Web: http://www.aspease.com
'Email: [e-mail],[e-mail]
'=========================================================
'
'FileName: ask.asp
'Version:2.0
'UpdateTime: 2004-10-3 22:36:22
'Script Written by www.aspease.com 
'=========================================================%>