文章探索:   分类:    关键字:  
  + 栏目导航
  + 相关文章
asp中有关字符编码转换的几个函数
绝妙的asp生成静态页面html函数
Asp计算页面执行时间
一个简单的用存储过程分页
将asp页面转换成htm页面
ASP网站漏洞解析及黑客入侵防范方法
URL编码与SQL注入
几种常用排序算法(asp)
ASP调用带参数存储过程的几种方式
实用的ASP连接数据库的函数
ASP如何获取真实IP地址
ASP中怎么实现SQL数据库备份、恢复
判断Cookies是否处于开启状态
怎样才能将服务器端文件夹下的文件,..
几行Asp代码实现防止表单重复提交
用ASP设计网站在线人数统计程序
asp论坛在线人数统计研究
如何用ASP远程在数据库中创建Table
用ASP调用SQL Server的视图和存储过程
Asp与XML的关系
ASP读取EXCEL
在ASP中使用Oracle数据库技巧
一个通过web.Mail发送邮件的类
几种打开记录集方式的比较
购物车范例(购物车页面 )
如何使用FSO搜索硬盘文件
GB码和BIG5码的互换技术
用ASP开发WEB日期选择器
一个投票系统的源程序(coveryourasp.c..
列出服务器上的打印机


技术教程 -> ASP教程 ->  
如何用ASP远程在数据库中创建Table
来源:转载   人气:1760   录入时间:2007-11-8
    
   Dim objRS
   Set objRS = Server.CreateObject( "ADODB.Recordset" )
   objRS.CursorLocation = adUseClient
    
   
   objRS.Fields.Append "Product", adBSTR
   objRS.Fields.Append "Quantity", adInteger
   objRS.Fields.Append "Unit Price", adCurrency
    
   
   objRS.Open
   objRS.AddNew
   An empty record now exists; you just need to set the values.
   
   objRS.Fields( "Product" ).value = "1969 Camero RS"
   objRS.Fields( "Quantity" ).value = 3
   objRS.Fields( "Unit Price" ).value = 2000.40
   And finally Update() is called to save the changes.
   
   objRS.Update
    
   
   ADO Added Value
   If that were all, using ADO in this way would be no better than using
   arrays. However, you now get to use all that great functionality
   built into ADO. Let's look at some specific examples.
   
   Methods
   There are many methods available in ADO used for data manipulation. A
   popular feature is sorting. Instead of writing code to sort an array
   you can store the data in an ADO Recordset object and sort it.
   
   objRS.Sort = "Product"
   This creates a temporary index based on the Product field, so when
   the records are accessed they will be returned in a sorted order.
   
   Streaming
   Data in a recordset can be streamed out as a string. An example of
   its use is building a comma-delimited file to import into Excel. Here
   is an example:
   
   asString = objRS.GetString( adClipString, , "," )
   The method GetString() starts at the current cursor position, so be
   sure to call MoveFirst if you intend to stream all the records. The
   parameters to GetString() allow you to control the number of rows to
   convert, the column delimiter, the row delimiter and the expression
   used for a NULL field.
   
   Persistence
   Persisting data to a file so that a data structure can be
   reconstructed later is tedious if you are using standard data types,
   since you have to create your own persistence mechanism. ADO has
   persistence built in so you get it for free. To write your recordset
   to a file just call Save() .
   
   objRS.Save "theOrder.dat", adPersistADTG
   The file type in this case is "Advanced Data Tablegram" format. This
   is a proprietary Microsoft format, so it is only really useful for
   storing a recordset in a file. The only other option is adPersistXML.
   
   To reconstruct the recordset from the file just do the following:
   
   Dim objRS2
   Set objRS2 = Server.CreateObject( "ADODB.Recordset" )
   objRS2.Open "theOrder.dat"
   




Copyright(C)2007-2022 广州市佳沛数码科技有限公司 版权所有
公司地址: 广州市荔湾区东漖北路560号511室
电话:020-81803473 传真:020-81544987