I have the following Static page:
<!--#include virtual="/check/STORE02/da
ta.inc"-->
<!--#include virtual="/check/STORE02/TR
ANHEAD.INC
"-->
<%
on error resume next
tCars="N/A"
bCars="N/A"
tFleet="N/A"
tVoid="N/A"
tCSI=FormatCurrency(0)
tDisc=FormatCurrency(0)
tTax=FormatCurrency(0)
gTotal=FormatCurrency(0)
avgDisc=FormatCurrency(0)
set objConnection=Server.Creat
eObject("A
DODB.Conne
ction")
objConnection.ConnectionTi
meout = 15
objConnection.CommandTimeo
ut = 10
objConnection.Mode = 3 'adModeReadWrite
if objConnection.state = 0 then
objConnection.Open "STORE02"
end if
strSQL = "SELECT Count(*) AS tCar, Count(T_AMT_TAX) AS billedTrans, Count(T_VOIDCODE) AS totalVoid, Count(T_FLEET) AS totalFleet, AVG(T_AMT_TAX) AS numT_AMT_TAX, SUM(T_AMT_TAX) AS numsT_AMT_TAX, SUM(T_DISCOUNT) AS numT_DISCOUNT, SUM(T_TAX) AS numT_TAX, AVG(T_DISCOUNT) AS numsT_DISCOUNT FROM Tranhead"
set objRS=Server.CreateObject(
"ADODB.Rec
ordSet")
objRS.Open strSQL,objConnection,3,3
if objRS.eof = False Then
tCars=objRS("tCar")
bCars=objRS("billedTrans")
tFleet=objRS("totalFleet")
tVoid=objRs("totalVoid")
tCSI=FormatCurrency(objRS(
"numT_AMT_
TAX"))
tDisc=FormatCurrency(objRS
("numT_DIS
COUNT"))
tTax=FormatCurrency(objRS(
"numT_TAX"
))
gTotal=FormatCurrency(objR
S("numsT_A
MT_TAX"))
avgDisc=FormatCurrency(obj
Rs("numsT_
DISCOUNT")
)
end If
objRS.Close
Set objRS = Nothing
objConnection.close
set objConnection = Nothing
%>
<html xmlns:v="urn:schemas-micro
soft-com:v
ml" xmlns:o="urn:schemas-micro
soft-com:o
ffice:offi
ce" xmlns="
http://www.w3.org/TR/REC-html40">
<head>
YOU KNOW THE REST BLAH! BLAH! BLAH!
</table>
</body>
</html>
How do I make it Dynamic?
I need to make one page then type:
http://www.webserver.com/page.asp?SiteID=STORE03I don't know if I am clear enough If not ask questions.
thanks in advance.
vico1
Start Free Trial