将数据库中的数据通过 client 控件显示 (一个asp和javascript传参数的列子)_显示数据库查询结果的aps用什么控件-优快云博客

本文链接：https://blog.youkuaiyun.com/softart/article/details/1846190

本文介绍了一种使用ASP结合VBScript来连接数据库并读取数据的方法，并展示了如何利用这些数据在客户端生成图表的过程。文章通过具体代码示例详细说明了从建立数据库连接、执行SQL查询到使用MSChart控件进行图表展示的技术细节。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

2000年08月27日 11:33:00

从浏览器到数据库关系：
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/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<

Trackback: http://tb.blog.youkuaiyun.com/TrackBack.aspx?PostId=3107