|
发布时间:2007-11-21 - 点击:7次 - 字数:2224字 | Using METADATA to Import DLL Constants One disadvantage of ASP is that when using a component, the component's constants aren't immediately avaialable. For example, if you want to use the ADO constant adOpenStatic you need to include... |
|
发布时间:2007-11-21 - 点击:9次 - 字数:1845字 | 1、最简单的如下 Dim objConn Set objConn = Server.CreateObject( ADOBD.Connection ) objConn.Open Application( Connection_String ) 'Call the stored procedure to increment a counter on the page objConn.Execute exec sp_AddHit... |
|
发布时间:2007-11-21 - 点击:9次 - 字数:844字 | % Function Encrypt(theNumber) On Error Resume Next Dim n, szEnc, t, HiN, LoN, i n = CDbl((theNumber + 1570) ^ 2 - 7 * (theNumber + 1570) - 450) If n 0 Then szEnc = R Else szEnc = J n = CStr(abs(n)) For i = 1 To Len(n) step 2 t = Mid(n, i,... |
|
发布时间:2007-11-21 - 点击:12次 - 字数:3065字 | % '**************************代码源自网络*********************** '******************可能具有一定的危害性,请不要用于非法企图,否则后果自负******************* '**********************修改:Blue2004*********************** '*************Set... |
|
发布时间:2007-11-21 - 点击:9次 - 字数:594字 | 在做电子商务站点的时候,经常要求浏览器在https和http之间转化 下面我给出相应的代码: 让一个ASP页面以https开始,请在该ASP页面顶部添加如下代码: % Response.Buffer = True If (Request.ServerVariables( HTTPS ) = off ) Then Dim xredir__, xqstr__... |
|
发布时间:2007-11-21 - 点击:9次 - 字数:3554字 | 我们都知道asp这一类的服务器端处理的程序,其好处之一就是只向客户端输出 标准的Html流。因此可以起到向客户隐藏细节的作用。也就是说当我们在浏览器中 键入asp程序的网址后只能看见标准的Html文件,而不能看见asp的内容。但有时,... |
|
发布时间:2007-11-21 - 点击:2次 - 字数:1775字 | 我们有时候可能会有这样的要求,如果我们输入了一段带有链接的文字,如: 今天,我访问了中央电视台的网站:http://www.cctv.com 那么,我们希望能自动为我们的 http://www... |
|
发布时间:2007-11-21 - 点击:4次 - 字数:1815字 | count.asp: %Server.ScriptTimeout=300 id=Trim(Request.QueryString( id )) fc=Trim(Request.QueryString( fc )) if fc= then fc= FFFF00 bg=Trim(Request.QueryString( bg )) if bg= then bg= 000000 bc=Trim(Request.QueryString( bc )) if bc= then... |
|
发布时间:2007-11-21 - 点击:5次 - 字数:465字 | % id = Request( id ) newpassword = Request( password ) newpasswordtemp = Request( passwordtemp ) If newpassword newpasswordtemp Then Response.Write center 对不起,新密码与新密码确认不同!请重试! /center Response.End End If Set conn =... |
|
发布时间:2007-11-21 - 点击:7次 - 字数:266字 | 支持判断返回任何数值型的类型数据: Function GetNumType(sVal) Dim sType If Not IsNumeric(sVal) Then GetNumType= Unknow Exit Function End If Execute sType=TypeName( sVal ) GetNumType=sType End Function 测试: Response.Write GetNumType( 9999 ... |
|
发布时间:2007-11-21 - 点击:15次 - 字数:10746字 | title 列表 /title style !-- body { font-size: 10px } table { font-size: 12px } -- /style script language = 'javascript' function InitList(theList, theTable, iEnd, iId, checkIt) { var colWidth = (document.body.clientWidth - 200) /... |
|
发布时间:2007-11-21 - 点击:4次 - 字数:3155字 | 三、显示广告 这部分程序主要有如下四个目的:第一,参考各个广告的显示等级,随机选择本次显示的广告;第二,更新数据库中该广告的显示次数;第三,输出标题广告的HTML代码;第四,在数据库历史表中保存显示和点击历史纪录。 ... |
|
发布时间:2007-11-21 - 点击:3次 - 字数:2842字 | 二、管理功能 管理部分共有12个asp文件,这些脚本的主要功能分别如下: BannerAdminLogin.asp:管理功能的登录页面。默认的用户名称是 ADMIN USER ,密码是 PASSWORD 。 CheckBannerAdministrationPassword.asp:检查使用管理功能的用户的密码... |
|
发布时间:2007-11-21 - 点击:9次 - 字数:2437字 | 程序代码: % Class ImgWHInfo '获取图片宽度和高度的类,支持JPG,GIF,PNG,BMP Dim ASO Private Sub Class_Initialize Set ASO=Server.CreateObject( ADODB.Stream ) ASO.Mode=3 ASO.Type=1 ASO.Open End Sub ... |
|
发布时间:2007-11-21 - 点击:9次 - 字数:6325字 | 1.添加索引 2.遍历词典 % Set d = CreateObject( Scripting.Dictionary ) d.add a ,-20319 d.add ai ,-20317 d.add an ,-20304 d.add ang ,-20295 d.add ao ,-20292 d.add ba ,-20283 d.add bai ,-20265 d.add ban ,-20257 d.add bang ,-20242 d.add bao ,... |
|
发布时间:2007-11-21 - 点击:5次 - 字数:1467字 | /*****听以前的同事说asp页面上的分页太慢了(如果数据多了), 就想了这么个笨办法。有些地方还要考虑----比如select top 22 * from cat_list where T_id not in (select T_id from #change)是否有效率问题;数据不能重复等等 不过灵活性挺好... |
|
发布时间:2007-11-21 - 点击:2次 - 字数:5538字 | !--#include file= ../lib/filelib.asp -- % Response.write title 上传文件至当前文件夹 /title Response.Write body bgcolor= #D6D3CE leftmargin= 0 topmargin= 0 title = 请您遵守国家相关法律法规上传文件... |
|
发布时间:2007-11-21 - 点击:11次 - 字数:3422字 | 1.数据表 CREATE TABLE [Nta_our_travelco] ( [travelco_id] [int] IDENTITY (1, 1) NOT FOR REPLICATION NOT NULL , [travelco_name] [varchar] (80) COLLATE Chinese_PRC_CI_AS NULL , [travelco_linkman] [varchar] (20) COLLATE Chinese_PRC_CI_AS NULL ... |
|
发布时间:2007-11-21 - 点击:3次 - 字数:1917字 | 在ASP中加密方法有对应的解密方法好象不多,现在根据前辈资料整理出在asp中加密与解密函数 rsa.asp % rem 在ASP中实现加密与解密,加密方法:根据RSA rem 联系:hnsoso@sina.com Class clsRSA Public PrivateKey Public PublicKey... |
|
发布时间:2007-11-21 - 点击:1次 - 字数:16324字 | 一段显示论坛贴子的程序 /////////////////////////////////////////////////////////////////////////////// // // File name: showtopic.cs // // Description: showtopic.aspx的后台代码 // // date: 2000/11/01 // // Programming: ... |
|
|