OA企业智能办公自动化系统边缘特别版 功能非常强大的OA系统 1.仿WINDOWS操作界面

源代码在线查看: popnotice.asp

软件大小: 3222 K
上传用户: yyjpu
关键词: WINDOWS 办公自动化系统 OA系统 操作界面
下载地址: 免注册下载 普通下载 VIP

相关代码

				
				
				
				
				
								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
				%>
				
				
				
				
				查看公司最新通告
				
								.style6 {color: #098abb}
				.style7 {color: #0d79b3}
				.z14 {font-size: 14px;
					font-weight: bold;
					color: #098abb;
				}
				-->
				
				
				
				
								
				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
				%>
				
				
				  
				    通告标题:
				  
				  
				    
				  
				  
				    
				        
				           
				        
				        
				          
				                				
				%>
				          
				        
				    
				  
				  
				    [发布日期:]  
				  
				
				
				
				 
				
				
				
				
				
				
								
				%> 
				
							

相关资源