In ASP.NET you can check with Page.IsPostBack property - it will tell you if the page was loaded first time or not.

In the 'normal' classic web development I forgot how can we do that - hopefully someone will clarify.


>Alrighty I'm back again. I got the page redirect sorted, and now have both tables showing the information I need. The only thing I need now is to only have the second table display when the link on the HTML page is clicked... So basically you enter the record number on the main page and click Submit, a table pops up below the text box and Submit button that contains information. In that information is a link to display a second table below the first with more detailed information. Right now they both show when I click submit and I'm not sure how to have the second table "fire" when the link is clicked. Maybe that's something else I need to do in JS? Thoughts?
>
>Here is my updated messy code:
>
>

FUNCTION r214input
>
>fdBlNo = ALLTRIM(UPPER(Request.Form("blno")))
>fdBN   = Request.Form("BN")
>fdPK   = Request.Form("PK")
>mEr = ""
>lcTable=""
>m.protbl = ""
>m.rplen = 0
>
>DO CASE
>CASE ! EMPTY(fdBN)
>	SQLWhere = "BN=" + ALLTRIM(fdBN)
>	IF ! EMPTY(fdPK)
>		SQLWhere = SQLWhere + " AND PK=" + ALLTRIM(fdPK)
>	ENDIF 
>OTHERWISE
>	lcTable = "Not Found" 
>	Response.Expandtemplate(goWCServer.oConfig.oTask.cHtmPath+"r214input.htm")
>	RETURN 
>ENDCASE 
>lcTable="TBL Master File<br>"
>
>THESQLDB = "TBL_BL"	
>THESQLTABLE = "TBL_BOL"
>THESERVER = goWCServer.oConfig.oTask.cSQLServer
>usr = "sa"
>pas = "Th1nk@123"
>ConnStr = [driver=SQL Server; server=]+THESERVER+[; database=]+THESQLDB+[; uid=]+usr+[;pwd=]+pas+[; Trusted_Connection=No;]
>curHandle = SQLstringCONNECT( connStr )
>
>
>
>THESQLDB = "TBL_BL"	
>THESQLTABLE = "TBL_BOL"
>THESERVER = goWCServer.oConfig.oTask.cSQLServer
>usr = ""
>pas = ""
>ConnStr = [driver=SQL Server; server=]+THESERVER+[; database=]+THESQLDB+[; uid=]+usr+[;pwd=]+pas+[; Trusted_Connection=No;]
>curHandle = SQLstringCONNECT( connStr )
>*!*	cmd = [exec InTransit ?']+ALLTRIM(user.cclientcd)+[']
>text to cmd textmerge noshow
>exec InTransitRN 
>endtext
>lr = SQLEXEC( curHandle, cmd, "sq")  && sq is the cursor the data is loaded into
>
>
>IF SQLEXEC( curHandle, cmd, "sq")  = -1
>messagebox(message())
>ENDIF
>
>SELECT;	
>	client_zip,;
>   [<a href="javascript:back('BNRN~X~]+fdBN+[~]+fdPK+[') "target="_self"> ]+TRIM(fdBlNo)+[</a>            ] as bol_number,;
>	ref_num,;
>	weight,;
>	pro_number,;
>	customer_name,;
>	customer_state,;
>	customer_zip,;
>	carrier_name,;
>	ship_date,;
>	est_delivery,;
>	appt_date,;
>	latest_status_description,;
>	latest_reason_description,;
>	date_last_updated;
>	FROM sq;
>	WHERE bol_Number = ?m.fdBlNo;
>	INTO CURSOR TQuery
>	SELECT TQuery
>	SET CENTURY ON 
>	recs=RECCOUNT()
>		
>loSC = CREATEOBJECT("wwShowCursor")
>loSC.lCenterTable = .f.
>loSC.cHeaderBGColor = "black"   &&"#336633"
>loSC.lAlternateRows = .T.
>	loSC.cAlternatingBGColor = "white"  &&"#EFEFEF"
>loSC.cTableBorder ="3"
>loSC.cTableWidth="1000"
>DIMENSION laHeaders[15]
>laHeaders[1] = "Ozp"
>laHeaders[2] = "BOL#"
>laHeaders[3] = "Ref#"
>laHeaders[4] = "Weight"
>laHeaders[5] = "Pro#"
>laHeaders[6] = "Customer Name"
>laHeaders[7] = "Dst"
>laHeaders[8] = "Dzp"
>laHeaders[9] = "Carrier"
>laHeaders[10] = "Ship Date"
>laHeaders[11] = "Est_Delivery"
>laHeaders[12] = "Appt. Date"
>laHeaders[13] = "Latest Status"
>laHeaders[14] = "Latest Reason"
>laHeaders[15] = "Last Updated"
>loSC.BuildFieldListHeader(@laHeaders)
>loSC.lSumNumerics = .t.
>loSC.ShowCursor()
>lctable=loSC.GetOutput()
>
>
>*******TABLE TWO (TO BE POPPED UP AFTER CLICKING LINK)*********
>
>
>THESQLDB = "TBL_BL"	
>THESQLTABLE = "TBL_BOL"
>THESERVER = goWCServer.oConfig.oTask.cSQLServer
>usr = ""
>pas = ""
>ConnStr = [driver=SQL Server; server=]+THESERVER+[; database=]+THESQLDB+[; uid=]+usr+[;pwd=]+pas+[; Trusted_Connection=No;]
>curHandle = SQLstringCONNECT( connStr )
>*!*	cmd = [exec InTransit ?']+ALLTRIM(user.cclientcd)+[']
>text to cmd2 textmerge noshow
>exec InTransitRNStatus 
>endtext
>lr = SQLEXEC( curHandle, cmd2, "sq2")  && sq is the cursor the data is loaded into
>
>IF SQLEXEC( curHandle, cmd2, "sq2")  = -1
>messagebox(message())
>ENDIF
>
>SELECT;	
>	date_added,;
>	status_date,;
>	status_time,;
>	status_city,;
>	status_state,;
>	equipment_id;
>	FROM sq2;
>	WHERE bol = ?m.fdBlNo;
>	INTO CURSOR TQuery2
>	SELECT TQuery2
>	SET CENTURY ON 
>	recs=RECCOUNT()
>
>loSC = CREATEOBJECT("wwShowCursor")
>loSC.lCenterTable = .f.
>loSC.cHeaderBGColor = "black"   &&"#336633"
>loSC.lAlternateRows = .T.
>loSC.cAlternatingBGColor = "white"  &&"#EFEFEF"
>loSC.cTableBorder ="3"
>loSC.cTableWidth="750"
>DIMENSION laHeaders[6]
>laHeaders[1] = "Date Added"
>laHeaders[2] = "Status date"
>laHeaders[3] = "Status time"
>laHeaders[4] = "City"
>laHeaders[5] = "State"
>laHeaders[6] = "Equipment ID"
>loSC.BuildFieldListHeader(@laHeaders)
>loSC.lSumNumerics = .t.
>loSC.ShowCursor()
>protbl=loSC.GetOutput()
>
>
>Response.ExpandTemplate(goWCServer.oConfig.oTask.cBTSHTMPath+"r214Input.htm")
>ENDFUNC