中国计生委网络办公系统,政府电子商务程序

				
				
				
				
								oabusyusername=request.cookies("oabusyusername")
				oabusyuserid=request.cookies("oabusyuserid")
				if request("submit")="我已经看了此通告" then
					id=request("id")
					set conn=opendb("oabusy","conn","accessdsn")
					sql = "update newnotice set readuserid=readuserid+'("&oabusyuserid&")' where ID="&id
					conn.Execute sql
					conn.close
				%>
				                   
				window.close();
				opener.location.reload();
				 
									response.end
				end if
				%>
				
				
				
				
				Crackgo办公系统--查看通告
				
				
				
								call bghead()
				set conn=opendb("oabusy","conn","accessdsn")
				Set rs=Server.CreateObject("ADODB.recordset")
				sql="select * from newnotice where readuserid NOT LIKE '%("&oabusyuserid&")%' and sendusername'"&oabusyusername&"'"
				rs.open sql,conn,1
				%>
				
				通告标题：
				
				[发布日期：]
				
								call bgmid()
				%>
				 
				
				
				
				
				
				
				
								call bgback()
				%>