网上商城~~ 手机类型的网站源码Asp

源代码在线查看: pay_list.asp

软件大小: 643 K
上传用户: wentianliang
关键词: Asp 网上商城 手机类型 源码
下载地址: 免注册下载 普通下载 VIP

相关代码

				
								if  session("username")="" then
				   response.write "你还未登陆,或登陆已超时,请重新登陆!"
				   response.write "返回"
				   response.end
				end if
				%>
				
				
				无标题文档
				
				
				
				
				
				
				   
				   
				     
				      
				         
				         
				           
				             
				              
				                 
				                 
				                        
				                        
				                             
				                              支付网关列表
				                            
				                          
				                
				                 
				              
				                  
				                  				            border=0 cellpadding=2 cellspacing=1 class="table1">
				                    
				                       
				                        编号
				                        名称
				                        网址
				                        状态
				                        添加日期
				                        修改
				                         
				                          
				                          
				                      
				                      				sql="select * from Net008_pay order by adddate desc"
				set rs=server.createobject("adodb.recordset")
				rs.open sql ,conn,1,2
				if rs.recordcount				response.write"暂无信息!"
				response.end
				end if
				const maxperpage=20 '定义每一页显示的数据记录的常量                                   
				dim currentpage '定义当前页的变量                                   
				rs.pagesize=maxperpage                                   
				currentpage=request.querystring("pageid")                                   
				if currentpage="" then                                   
				currentpage=1                                   
				elseif currentpage				currentpage=1                                   
				else                                   
				currentpage=clng(currentpage)                                   
					if currentpage > rs.pagecount then                                   
					currentpage=rs.pagecount                                   
					end if                                   
				end if                                   
				'如果变量currentpage的数据类型不是数值型                                   
				'就1赋给变量currentpage                                   
				if not isnumeric(currentpage) then                                   
				currentpage=1                                   
				end if                                   
				dim totalput,n '定义变量                                   
				totalput=rs.recordcount                                   
				if totalput mod maxperpage=0 then                                   
				n=totalput\maxperpage                                   
				else                                   
				n=totalput\maxperpage+1                                   
				end if                                   
				if n=0 then                                   
				n=1                                   
				end if                                   
				rs.move(currentpage-1)*maxperpage                                   
				i=0                                   
				do while i< maxperpage and not rs.eof     
				%>
				                       
				                         				%> 
				                         				%> 
				                         				%> 
				                         				if rs("indexflag")=1 then
					response.write "开放中"
				elseif rs("indexflag")=2 then
					response.write "已关闭"
				end if
				%> 
				                          
				                        修改
				                          
				                        
				                      
				                      				    i=i+1                                  
				    rs.movenext                                  
				    loop       
				%>
				                    
				                  
				              
				                  
				                     
				                 
				                        				                  height=22 colspan=3 align=middle class="th1">页数:/ 
				                    
				                    				   	if k1 then%>
				                          [首页] 
				                          [上一页] 
				                          
				                    [首页] [上一页] 
				                    
				                    
				                          [下一页] 
				                          [尾页] 
				                          
				                    [下一页] [尾页] 
				                    
				                    共有条信息
				                
				                 
				
				              
				              
				            
				          
				        
				         
				      
				    
				  
				   
				
				
				   
				    说明:请注意查看每条支付网关的"状态":
				      1.如果显示"开放中"说明这个支付网关正在使用中,即前台顾客提交订单的页面就可以看到该个支付网关的接口;
				      2.如果显示"已关闭"说明这个支付网关没有在使用,即前台顾客提交订单的页面不可以看到该个支付网关的接口。
				  
				   
				     
				  
				
				
				
							

相关资源