Home | Advertising Info99 USERS CURRENTLY ONLINE   
   Site Search Contact Us Thursday, October 23, 2014  
 
 


 
ASPProtect
User Management Application with web based screens that allow you to manage users.
www.ASPProtect.com
 
ASPBanner
Banner Rotation system. Advertisers can monitor online statistical reports via their web browsers.
www.ASPBanner.com
 
ASP Photo Gallery
Upload an unlimited amount of albums. Set up categories.Image resizing thumbnail creation.
www.ASPPhotoGallery.com
 
ASPClassifieds
Classifieds system. Set up categories. Users can register themselves. Supports picture uploads.
www.ASPClassifieds.com



DISCUSSION ARCHIVES
 
Try a free httpZip trial now and compress for less!


We didn't realize
the site was so popular.

Other Stuff
 

 
 
Active Server Pages help tutorial how to ASP Help ASP Tutorials ASP Programming ASP Code - ASP Free CJWSoft ASPProtect ASPBanner ASPClassifieds



(Advanced)  (Components)  (Database)  (General)  (Vbscript)




ASPProtect

 
Subject: Re: How can we provide the functionality of Next 20 Records??
From: Vijaya
Date: 8/22/2000 7:49:01 PM
IP: 63.109.49.181



 

Modify and Try this code...it works! This is written in Visual Interdev..so you will need the _scriptlibrary folder as an include file to work. This is one of the default folders that is available with Interdev. Copy and paste the folder with your code.

<%@ Language=VBScript %>
<%option explicit%>
<SCRIPT id=DebugDirectives runat=server language=javascript>
// Set these to true to enable debugging or tracing
@set @debug=false
@set @trace=false
</SCRIPT>

<% VI 6.0 Scripting Object Model Enabled %>
<!--#include file="_ScriptLibrary/pm.asp"-->
<% if StartPageProcessing() Then Response.End() %>
<FORM name=thisForm METHOD=post>

<!--#include file="adovbs.inc" -->
<%

Response.Buffer = true
dim rsTemp, strSQL, cnn, iAppl_UID, strCnn, i, ipage

Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open application("dbconn_ConnectionString"), Application("dbconn_RuntimeUserName"),Application("dbconn_RuntimePassword")

Set rsTemp = Server.CreateObject("ADODB.Recordset")
Set rsTemp.ActiveConnection = cnn


rsTemp.Open "select * from states order by [state code]",cnn,adOpenStatic,adLockReadOnly
rstemp.PageSize = 20

ipage = Request.QueryString("ipage")

if ipage > 0 then
rsTemp.AbsolutePage = iPage
end if

%>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>

<P> </P>
<table>
<%for i =1

Previous Message


 

   Active Server Pages Rule The World
Contact Us  
All artwork, design & content contained in this site are Copyright 1998 - 2014 PowerASP.com and Christopher J. Williams
Banner ads ,other site logos, etc are copyright of their respective companies.
STATS Unless otherwise noted - All Rights Reserved.

Active Server Pages ASP ASP.NET .aspx .ascx Web HTML Developer Internet Microsoft Web Services Visual Studio .NET CJWSoft ASPProtect ASPBanner ASPClassifieds www.aspclassifieds.com, www.powerasp.com,www.cjwsoft.com,www.aspphotogallery.com,www.codewanker.com,www.aspprotect.com,www.aspbanner.com