So heres the deal...
I work for a company in which numbers are dropping. The owners created
a game where calling potential clients racks up points for crap like
basketball ticekts and such. The owners called upon me to develop a
system where users could enter information to list user name, data
stamp it, and then add form data such as the person they called and if
it was a cold call or not. All that was pretty easy. Oh, by the by, I
had never programmed anything prior to this. I was strictly html. So I
made the game... Users enter data, gets dropped into a csv in our
_private folder. Then I made it so that the data can be read in html
format, simple fso... Well not for me, but I got it to work... So now,
the owner wants this list to be sortable by the last name of the
agent....
This is where I have the problem.
You see, I have a boss, a programmer. He is in Canada where as I am in
California. He is far to busy to assist me, and his teaching methods
consist of telling me one key word, and leaving me to google the hell
out of it. So his key work was bubble sort.
Now I have been playing with this for,,, well over a week now (a few
days past deadline) and I cannot get it to work properly.
I can get bubble sort to work on an array of pre-defined data...
My problem( which I have taken forever to get to, sorry) is that I need
to get it to look at the whole csv, find out where the eof is, then
read up from there...
I have no idea how to do this, and no jedi like mentor to ask
assistance. I ask for help and either get harped at or a "lol"... Its
getting old...
Here is the code for the game
+++++++++++++++ +++++++++++++++ ++++
<script language="vbscr ipt">
sub referrals_oncha nge()
DIM intCounter
for intCounter = 1 to 5
if CInt(document.a ll.item("referr als").value) >= intCounter
then
document.all.it em("referral_"& intCounter).sty le.display="blo ck"
else
document.all.it em("referral_" &
intCounter).sty le.display="non e"
end if
next
end sub
</script>
</head>
<body>
<table border="1" cellpadding="0" cellspacing="0"
style="border-collapse: collapse" bordercolor="#1 11111"
id="AutoNumber1 " bgcolor="#C0C0C 0">
<tr>
<td width="100%" colspan="3">
<img src="../images/1newbanner.jpg" width="513" height="57"><fo rm
method="POST" name="FrontPage _Form1" action="--WEBBOT-SELF--"
target="_self">
<!--webbot bot="SaveResult s" u-file="../_private/game.csv"
s-format="TEXT/CSV" s-label-fields="TRUE" b-reverse-chronology="FAL SE"
s-date-format="%d-%m-%Y" s-time-format="%I:%M:% S %p"
s-builtin-fields="Date Time" startspan --><input TYPE="hidden"
NAME="VTI-GROUP" VALUE="0"><!--webbot bot="SaveResult s" endspan
i-checksum="43374 " --><p>
<font face="Arial" size="2" color="#000066" >Welcome
<!--webbot bot="HTMLMarkup " startspan --><span
id="lblCurrentU serName"></span><!--webbot bot="HTMLMarkup " endspan
--></font></p>
<hr>
<p>
<font face="Arial"><f ont size="2" color="#000066" >Please enter
the name of the agent with whom you made contact:<br>
First Name: </font><font color="#000066" >
<!--webbot bot="Validation " s-data-type="String"
b-allow-letters="TRUE" i-maximum-length="15" --><input type="text"
name="agentFnam e" size="20" maxlength="15"> </font><font size="2"
color="#000066" ><br>
Last Name: </font><font color="#000066" >
<!--webbot bot="Validation " s-data-type="String"
b-allow-letters="TRUE" i-maximum-length="20" --><input type="text"
name="agentLnam e" size="20" maxlength="20"> </font></font></p>
<hr>
<p>
<font face="Arial"><f ont size="2" color="#000066" >Please enter
the agents phone number:<br>
</font><font color="#000066" >
<!--webbot bot="Validation " s-data-type="Number"
s-number-separators="x." b-value-required="TRUE" i-minimum-length="10"
i-maximum-length="10" --><input type="text" name="agentNumb er"
size="20" maxlength="10"> </font><font size="2" color="#000066" >
( </font><font size="1" color="#FF0000" >must have 10 digits
</font><font size="2" color="#000066" >
)</font></font></p>
<p>
<font face="Arial"><f ont size="2" color="#000066" >What is the
agents e-mail address:<br>
</font><font color="#000066" >
<input type="text" name="agentEmai l" size="40"></font></font></p>
<p>
<font face="Arial"><f ont size="2" color="#000066" >Please select a
category which best describes the agent with whom you made
contact:<br>
Active Agent </font><font color="#000066" <input type="radio"
value="active" checked name="agentType "></font><font size="2"
color="#000066" >
Inactive Agent </font><font color="#000066" <input type="radio"
name="agentType " value="inactive "></font><font size="2"
color="#000066" >Cold
Call</font><font color="#000066" ><input type="radio"
name="agentType " value="cold"></font></font></p>
<p>
<font face="Arial" color="#000066" size="2">How many referrals
this agent
give you?<br>
<select size="1" name="referrals ">
<option value="0">0</option>
<option value="1">1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
</select></font></p>
<p>
</p>
<p>
<input type="text" name="referral_ 1" size="20"
style="display: none"></p>
<p>
<input type="text" name="referral_ 2" size="20"
style="display: none"></p>
<p>
<input type="text" name="referral_ 3" size="20"
style="display: none"></p>
<p>
<input type="text" name="referral_ 4" size="20"
style="display: none"></p>
<p>
<input type="text" name="referral_ 5" size="20"
style="display: none"></p>
<hr>
<p>
<font color="#000066" face="Arial"><i nput type="submit"
value="Submit" name="B1"><inpu t type="reset" value="Reset"
name="B2"></font></p>
<input type="hidden" name="uname" value="hidden">
</form>
</td>
</tr>
</table>
<iframe src="date_user. asp" width="80%" height=100 frameborder=0
scrolling=no name="date_time " styke="display: none">
</iframe>
+++++++++++++++ +++++++++++++++ ++++++++++++
this is the code for data_user.asp
+++++++++++++++ +++++++++++++++ ++++++++++++
<script language="vbscr ipt">
dim txtUserName
txtUserName = "<% = (Session("UserN ame")) %>"
Sub window_onload()
window.parent.d ocument.all.ite m("uname").valu e = txtUserName
window.parent.d ocument.all.ite m("lblCurrentUs erName").InnerT ext =
txtUserName
end sub
</script>
+++++++++++++++ +++++++++++++++ ++++++
this is the admin page i am trying to create
+++++++++++++++ +++++++++++++++ +++++++
<b><font color="#000066" face="Arial">Ma rketing Contest Results
<%
csv_to_read="../_private/game.csv"
set fso = createobject("s cripting.filesy stemobject")
set act = fso.opentextfil e(server.mappat h(csv_to_read))
imported_text = act.readline
imported_text = replace(importe d_text,chr(13), ",")
imported_text = replace(importe d_text,chr(34), "")
split_text=spli t(imported_text ,",")
num_imported=ub ound(split_text )+1
total_imported_ text = act.readall
total_imported_ text = replace(total_i mported_text,ch r(13),",")
total_imported_ text = replace(total_i mported_text,ch r(34),"")
total_split_tex t=split(total_i mported_text,", ")
total_num_impor ted=ubound(tota l_split_text)
%>
</font>
</b>
<table width="100%"bor der="1" cellpadding="0" cellspacing="0"
style="border-collapse: collapse" bordercolor="#1 11111" >
<tr>
<%
for table = 0 to num_imported -1
%>
<td width="<% response.write 100/(num_imported) 'make the cell widths
even %>%"bgcolor="#C 0C0C0">
<font face="Arial" size="1" color="#000066" >
<b><%= split_text(coun t) %></b>
</td>
<%
count=count+1
next
%>
</tr>
<tr>
<font face="Arial" size="1" color="#000066" >
<%
'Reset the counter
count=0
for tablea = 0 to (total_num_impo rted/ (num_imported)-1)
%>
<%
for table = 0 to num_imported -1
%>
<td width="<%= 100/(num_imported) %>%">
<font face="Arial" size="1" color="#000066" >
<%= total_split_tex t(count)
%>
</font>
</td>
<%
count=count+1
next ' end of the observation
%>
</tr>
<% next 'end of the csv %>
</table>
+++++++++++++++ +++++++++++++++ +++++++++++++++ ++++
so there it is...
I no Im lame...
I have no idea how to do any of this, but do not remember it being in
my job description either.
Either way, I have to learn or Im gone...
All advice will be appreciated.
Thanks very much,
- joe
