|
 |
asp_databases thread: Jscript and Asp Code
Message #1 by "Phil Perks" <philp@w...> on Fri, 12 May 2000 21:55:22
|
|
---Original Message-----
From: Patrick Sturge [mailto:psturge@a...]
Sent: 12 May 2000 22:06
To: support@w...
Subject: Jscript and Asp Code
I have a little problem that I need help with.
Problem:
How do I pull data from a Database using ASP then put the data into a
Jscript array.
Example:
<%
' Load Messages for the Scrolling Text Box
Set CnnMsg = Server.CreateObject("Adodb.Connection")
CnnMsg.open "DSN=MESSDATA;Uid=;"
Set RsMsg = Server.CreateObject("Adodb.Recordset")
SqlStr = "Select * From Msg where prodcode = 'SW'"
RsMsg.open SqlStr, CnnMsg, 1, 3, 1
If Not RsMsg.Eof then
%>
<Script language="Jscript">
<!--
var Message = new Array();
Message[0] = <%RsMsg("SMsgText")%>
<%RsMsg.MoveNext%>
Message[1] = <%RsMsg("SMsgText")%>
<%RsMsg.MoveNext%>
Message[2] = <%RsMsg("SMsgText")%>
-->
</Script>
<%
RsMsg.Close
set RsMsg = nothing
CnnMsg.close
set CnnMsg = nothing
end if
%>
Thank in advance....
Patrick
Message #2 by Mark Everest <Mark.Everest@t...> on Mon, 15 May 2000 09:19:05 +0100
|
|
Try the following....
<%
open recordset...
%>
<script language="JavaScrip">
var myArray = array(
<% do while not adoSet.eof
response.write """" & adoSet.fields("Field") & """, "
adoSet.movenext
loop
adoset.close
response.write ");" %>
</script>
-----Original Message-----
From: Phil Perks [mailto:philp@w...]
Sent: 12 May 2000 22:55
To: ASP Databases
Subject: [asp_databases] Jscript and Asp Code
---Original Message-----
From: Patrick Sturge [mailto:psturge@a...]
Sent: 12 May 2000 22:06
To: support@w...
Subject: Jscript and Asp Code
I have a little problem that I need help with.
Problem:
How do I pull data from a Database using ASP then put the data into a
Jscript array.
Example:
<%
' Load Messages for the Scrolling Text Box
Set CnnMsg = Server.CreateObject("Adodb.Connection")
CnnMsg.open "DSN=MESSDATA;Uid=;"
Set RsMsg = Server.CreateObject("Adodb.Recordset")
SqlStr = "Select * From Msg where prodcode = 'SW'"
RsMsg.open SqlStr, CnnMsg, 1, 3, 1
If Not RsMsg.Eof then
%>
<Script language="Jscript">
<!--
var Message = new Array();
Message[0] = <%RsMsg("SMsgText")%>
<%RsMsg.MoveNext%>
Message[1] = <%RsMsg("SMsgText")%>
<%RsMsg.MoveNext%>
Message[2] = <%RsMsg("SMsgText")%>
-->
</Script>
<%
RsMsg.Close
set RsMsg = nothing
CnnMsg.close
set CnnMsg = nothing
end if
%>
Thank in advance....
Patrick
|
|
|
View Cart
