我的一亩三分地 我就喜欢!
13fen  设为主页
 收藏本站
 
当前位置: > 一亩三分地：首页 > 网络学院 > 网络编程 > ASP专区 > Asp未分类 > 将数据库中的数据通过 client 控件显示 (一个asp和javascrip
热门文章排行
热门文章排行 手推车”功能的实现(10-07)
八大法则防范ASP网站漏洞(10-23)
ASP教程十一、调试ASP脚本(10-23)
在JSP中访问数据库大全(10-23)
虚机服务中常见Asp.Net低级错误一览(03-21)
精采文章排行
精采文章排行 ASP.NET实现抓取网页中的链接(11-15)
ASP连接数据库的11种方法(11-10)
如何动态创建网页的RSS内容摘要(11-10)
ASP网站漏洞及入侵防范方法(11-10)
ASP自定义函数：对字符串正则替换(11-10)
技术专题推荐
网管论坛交流
　

将数据库中的数据通过 client 控件显示 (一个asp和javascrip 

作者:佚名   来源:一亩三分地   点击:   日期:2007-03-30
从浏览器到数据库关系：
browser
mschart control
javascript (client-side)
asp (server-side vbscript)
ado
odbc
dbms
==================
关键在于将 RS 内的内容赋给 client-side javascript.
source code:
==================
<%@ LANGUAGE="VBSCRIPT" %>
<%
Dim oConn
Dim oRs
Dim curDir
Dim Index


Dim sqlstring
sqlstring = "select field from table"

' Create ADO Connection Component to connect
' with sample database

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DSN=localserver;SERVER=(local);UID=sa;PWD=;DATABASE=pubs"
Set oRs = oConn.Execute(sqlstring)
%>


<script language=vbscript>

<% Response.Write "<!--" %>
Sub Window_onload()
Dim A
A = Array(<%
Do while (Not oRs.eof) %>
<% =Int(oRs(0))%>,<% oRs.MoveNext
Loop
%>0)


MSChart1.ChartType = 1
MSChart1.ChartData = A

End sub

<% Response.Write "-->" %>
</script>

<%
oRs.close
oConn.close
%>



<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual InterDev 1.0">
<META HTTP-EQUIV="Content-Type" content="text/html; charset=iso-8859-1">
<TITLE>Document Title</TITLE>
</HEAD>
<BODY>

<!-- Insert HTML here -->

<OBJECT ID="MSChart1" WIDTH=356 HEIGHT=268
CLASSID="CLSID:31291E80-728C-11CF-93D5-0020AF99504A" CODEBASE="msChart.cab#version=5.0.37.14">
</OBJECT>

</BODY>
</HTML>


【文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【论坛讨论】

   相关文章:
·ASP中巧用Response属性 ·第六课:ASP脚本循环语句
·在 Web 页上使用条件数值格式 ·连接数据库查询手册（不仅仅适用于asp）
·警惕"给你的FileSystemObject对象加把锁" ·用ASP做全文检索

   文章评论:(条)
  
 请留名： 匿名评论   点击查看所有评论 网管论坛
 

  责任编辑:一分  声明：刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。