医药进销存管理系统 全代码 很详细 可惜没有数据库 可供参考

				
						 
						     
						 
						 
						     		     
					            　 连锁店列表
						 
						 
						     
							 
								If Session("flag")1 Then
				  Response.Write "window.history.back();"
				  Response.End()
				End If
				Set conn=Server.CreateObject("ADODB.Connection")
				conn.connectionstring="Driver={Sql Server};Server=(local);UID=sa;database=DB_lsmanage"
				conn.open
				set rs1=server.CreateObject("adodb.recordset")
				str1="select * from tb_User where UserId  1000"
				rs1.open str1,conn,3,3
				do while not rs1.eof
				%>
							     
								    
									    用户ID:
									    
									    用户名称:
									    
									
									
									    联系电话:
										
									    联系人:
									    
									
									
									    地 址:
									    
								    
									
									
									  
								   
						     
																rs1.movenext
								loop
								%>