Photo Gallery Member List Search Calendars FAQ Ticket List Log Out


Saving Dynamic Input

 
Logged in as: Guest
arrSession:exec spGetSession 2,2,3457
 Active Users: There are 0 members and 0 guests.
 Users viewing this topic: none
 

 

 
  
  Printable Version
All Forums >> [Scripting] >> WSH & Client Side VBScript >> Saving Dynamic Input
  Do you like VisualBasicScript.com? Link to us and help spread the word about our forum. Thanks!
Page: [1]
Login
Message << Older Topic   Newer Topic >>
 Saving Dynamic Input - 6/20/2005 8:50:45 AM   
  staciekreates

 

Posts: 3
Score: 0
Joined: 6/14/2005
From:
Status: offline
Okay ---

I am attempting to upload data to a database. Here's the situation.

I have a "report" that shows employees per job site. This report counts the number of people at each location and calculates the daily cost. I need to be able to overwrite the calculated count of employees which then will recalculate the daily cost.

An input box shows up for each of the job sites. When I input a value into that box I need to associate the job site that it goes to and send that information to Access.

Job Site1 EmpCount DailyCost
employee1
employee2
employee3

Job Site2 EmpCount DailyCost
employee4
employee5
employee6

Here is my code so far...
rsj is pulling from the Job table.

do while not rsj.eof
st = st + 1
modmasctname = "modmasct" & st
jobidnum = "jobid" & st

job=rsj("jname")
jobid =rsj("jindex")
mos=rsj("MasonsOnSite")
dc=rsj("DayCost")
masonct=rsj("CountMasons")
laborerct=rsj("LaborerCount")
rawdaycost=rsj("DailyRateRaw")

if job<>last_job then

%>
<tr bgcolor="#cccccc">
<td >
<b><%=job%></b></td>
<td align=left>
<table align="left" width=100% cellpadding=0 cellspacing=0 border=0 bordercolor=#000000>
<tr>
<td align=center><font size=1>Masons</font></td>
<td align=center><font size=1>Rev. Masons</font></td>
<td align=center><font size=1>Laborers</font></td>
<td align=center><font size=1>Day Cost</font></td>
</tr>
<tr>
<td align=center><b><% =mos %></b></td>
<td align=center><input type="text" name="<% =modmasctname %>" size=1 maxlength=2 onblur="ModDC()"></td>
<td align=center><b><% =laborerct %></b></td>
<td align=center><b><% if dc<>"" then response.write FormatCurrency(dc, 2) %></b>
 
 
Post #: 1
 
 
 
  

If you found our site useful please link to us <a href="http://www.visualbasicscript.com">VisualBasicScript.com</a>.
All Forums >> [Scripting] >> WSH & Client Side VBScript >> Saving Dynamic Input Page: [1]
Jump to:





New Messages No New Messages
Hot Topic w/ New Messages Hot Topic w/o New Messages
Locked w/ New Messages Locked w/o New Messages
 Post New Thread
 Reply to Message
 Post New Poll
 Submit Vote
 Delete My Own Post
 Delete My Own Thread
 Rate Posts