Form to Email

David

Hi,

I have some database records which are listed out in a table on an asp
page.
The table is within a <formtag.
At the end of each record (and table row), I have created a <select>
dropdown box to appear.

The user selects an item for each record in the list, then hits submit.

The following code is used to create the body of the email:

For Each i in Request.Form
MailBody = MailBody & Request.Form(i) & vbcrlf
Next

What I need in the body is the first database field printed on the form
in each record and the selected item from the dropdown against that
record

i.e.

Product A Yes
Product B No
Product C Yes

I have tried adding a hidden input type to carry the Product Code but
all I get is the following as my email body:

Select Status, Select Status, Select Status, Approved, Select Status,
Select Status, Select Status, Approved, Select Status, Select Status,
Approved, Select Status, Select Status
070512001R, 069435001Q, 069424001Q, 069321001Q, 069305001Q, 069270001Q,
069167001Q, 068744001Q, 068677001Q, 068677001Q, 068466001Q, 066497001Q,
061097001Q
Submit

Where 'Select Status' is the default text to show in the dropdown.

It first goes through all the dropdown results, and them through all
the product codes and for some reason, the vbcrlf is not working ? How
can I print them together in sets ?

I need the body to show

070512001R = Approved
069435001Q = Approved

etc

PLEASE CAN YOU HELP ME DO THIS, THANKS

Thanks

David

Oct 25 '06 #1

Subscribe Post Reply

1929

Ray Costanzo [MVP]

Can you post the HTML portion of your form, or just a sampling of a few rows
from the table at least?

Ray at work

"David" <da*********@scene-double.co.ukwrote in message
news:11*********************@i3g2000cwc.googlegrou ps.com...

Hi,

I have some database records which are listed out in a table on an asp
page.
The table is within a <formtag.
At the end of each record (and table row), I have created a <select>
dropdown box to appear.

The user selects an item for each record in the list, then hits submit.

The following code is used to create the body of the email:

For Each i in Request.Form
MailBody = MailBody & Request.Form(i) & vbcrlf
Next

What I need in the body is the first database field printed on the form
in each record and

Oct 25 '06 #2

Mike Brind

"David" <da*********@scene-double.co.ukwrote in message
news:11*********************@i3g2000cwc.googlegrou ps.com...

Hi,

I have some database records which are listed out in a table on an asp
page.
The table is within a <formtag.
At the end of each record (and table row), I have created a <select>
dropdown box to appear.

The user selects an item for each record in the list, then hits submit.

The following code is used to create the body of the email:

For Each i in Request.Form
MailBody = MailBody & Request.Form(i) & vbcrlf
Next

What I need in the body is the first database field printed on the form
in each record and the selected item from the dropdown against that
record

i.e.

Product A Yes
Product B No
Product C Yes

I have tried adding a hidden input type to carry the Product Code but
all I get is the following as my email body:

Select Status, Select Status, Select Status, Approved, Select Status,
Select Status, Select Status, Approved, Select Status, Select Status,
Approved, Select Status, Select Status
070512001R, 069435001Q, 069424001Q, 069321001Q, 069305001Q, 069270001Q,
069167001Q, 068744001Q, 068677001Q, 068677001Q, 068466001Q, 066497001Q,
061097001Q
Submit

Where 'Select Status' is the default text to show in the dropdown.

It first goes through all the dropdown results, and them through all
the product codes and for some reason, the vbcrlf is not working ? How
can I print them together in sets ?

I need the body to show

070512001R = Approved
069435001Q = Approved

Basic HTML. You need to provide different names to each of your select
lists so that they can be identified uniquely. Where you have a default
text in the drop down, make sure its value is set to an empty string eg
<option value="">Select Status</option>. If you don't provide a value
attribute for an option, it picks up on whatever the option is. If you
provide the same name to all your select lists, they will be passed in a
comma-delimited string (which makes parsing the results more difficult).

--
Mike Brind

Oct 25 '06 #3

David

Ray,

Here is the line which prints out the records within a loop in my asp
page:

response.write "<td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=" & RS("ReportID") & ">" &
ref & "</a></td><td>   </td><td align=center>" & part &
"</td><td>   </td><td align=center>" & serial &
"</td><td>   </td><td align=left>" & cause &
"</B></td><td align=LEFT>" & money & "</B></td><TD>" & FD &
"</TD><input TYPE=hidden name=PO VALUE=" & ref & "></tr>"

The variables 'ref', 'part', 'serial', 'cause', 'money' might be text
strings or database records.

The <select tagagainst each record is defined in the top of the page
and set to a variable called FD, which is on the bottom line of the
code above

<TD>" & FD & "</TD>

FD = "<select name=select><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option
selected>Select Status</option></select>"

I cannot name each select tag seperately as there is only 1, and the
asp repeats it for each record in the loop.

If you can suggest a better way to go about this i'm all ears and
really appreciate your advise and help, thanks so much.

Oct 25 '06 #4

David

Mike,

Thanks for your advise. I only have 1 select statement. Please see my
reply to Ray.

David

Oct 25 '06 #5

Ray Costanzo [MVP]

Can you post the HTML, I mean? Not the ASP code.

Thanks,

Ray at work

"David" <da*********@scene-double.co.ukwrote in message
news:11*********************@e3g2000cwe.googlegrou ps.com...

Ray,

Here is the line which prints out the records within a loop in my asp
page:

response.write "<td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=" & RS("ReportID") & ">" &
ref & "</a></td><td>   </td><td align=center>" & part &
"</td><td>   </td><td align=center>" & serial &
"</td><td>   </td><td align=left>" & cause &
"</B></td><td align=LEFT>" & money & "</B></td><TD>" & FD &
"</TD><input TYPE=hidden name=PO VALUE=" & ref & "></tr>"

The variables 'ref', 'part', 'serial', 'cause', 'money' might be text
strings or database records.

The <select tagagainst each record is defined in the top of the page
and set to a variable called FD, which is on the bottom line of the
code above

<TD>" & FD & "</TD>

FD = "<select name=select><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option
selected>Select Status</option></select>"

I cannot name each select tag seperately as there is only 1, and the
asp repeats it for each record in the loop.

If you can suggest a better way to go about this i'm all ears and
really appreciate your advise and help, thanks so much.

Oct 25 '06 #6

David

I have sent the pages to you direct, hope this is ok.

Oct 25 '06 #7

Ray Costanzo [MVP]

Can you post the HTML? Just load the page in your browser and do a
view-source to get it.

Ray at work

"David" <da*********@scene-double.co.ukwrote in message
news:11**********************@f16g2000cwb.googlegr oups.com...

>I have sent the pages to you direct, hope this is ok.

Oct 25 '06 #8

David

<HTML>

<head>
<style type="text/css">

ul#split,ul#split li{margin:0;padding:0;list-style:none}
ul#split li{float:CENTER;width:1100px;margin:0 10px 10px 0}
ul#split h3{font: normal 90%/1.0 Verdana,sans-serif;
text-transform:uppercase;margin:0px;padding: 5px 5px
5px;text-align:CENTER;color: #000}
ul#split p{margin:0;padding:5px 8px 5px}
ul#split div{background:#C5E6F6}
li#one h3{background: #C8C866}
li#two h3{background: #FFBD00}
li#three h3{background: #E3A1C4}
</style>
<script type="text/javascript" src="niftycube.js"></script>
<script type="text/javascript">
window.onload=function(){
Nifty("ul#split h3","top");
Nifty("ul#split div","bottom same-height");
Nifty("div#box","big");
}
</script>

</head>
<BODY bgcolor="#FFFFCC">

<center>

<%

FD = "<select name=select><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option
selected>Select Status</option></select>"
info = "Received at Scene Double"

strquery = "SELECT reports.Charges, reports.BB_Approval,
reports.ReportID, reports.CustomerID, reports.ReportDate,
reports.DateReturned, reports.YourPart, reports.YourRef,
'reports.Firmware Version', 'reports.Hardware Version',
reports.FaultReported, reports.FaultDescription, 'reports.Fault Found',
reports.Cause, reports.ActionTaken, reports.BoxContents,
reports.Comments, reports.GeneralNotes, reports.EditRefurbNotes,
reports.Customer, reports.Serial, reports.Country, reports.RepairSite,
reports.Job, reports.Warranty, reports.Charges, reports.ReportTS,
reports.RefurbSerial, reports.LocalFW, reports.RemoteFW,
reports.ReceivedDate, reports.Status, reports.StatusNotes FROM reports"
strquery = strquery & " WHERE ((reports.BB_Approval='Awaiting
Approval') and (reports.CustomerID=13)) ORDER BY reports.YourRef
DESC,reports.Serial;"

Set RS = adoDataConn.Execute(strquery)

if RS.EOF then
response.write "All repairs at Scene Double have either been Approved
or Shipped back to you" & vbcrlf & "Please use our search facility for
locating specific repairs"

else
RESPONSE.WRITE "<ul id=split>"
RESPONSE.WRITE "<li id=one><h3>-- Repairs currently in progress at
Scene Double --</H3>"
RESPONSE.WRITE "<div><form name=Approval method=post
action=processemail_approval.asp>"

response.write "<table><tr><td align=center><b>Your
PO#</TD><td>   </td><TD align=center><b>Part
Code</td><td>   </td><td align=center><b>Serial
Number</td><td>   </td><td
align=center><b>Status</td><td align=center><b>Charge</td></tr><tr>"

do while NOT RS.EOF

If RS("Cause") = "" or isnull(RS("Cause")) then
cause = "Unknown Cause"
else
cause = RS("Cause")
end if
If RS("YourRef") = "" or isnull(RS("YourRef")) then
ref = "Unknown PO#"
else
ref = RS("YourRef")
end if

If RS("YourPart") = "" or isnull(RS("YourPart")) then
part = "Unknown Product Code"
else
part = RS("YourPart")
end if

If RS("Serial") = "" or isnull(RS("Serial")) then
serial = "No Serial Number"
else
serial = RS("Serial")
end if

If RS("Status") = "" or isnull(RS("Status")) then
status = "Currently Unknown"
else
status = RS("Status")
end if
'-------------- BEGIN CHARGES ------------------

if RS("Charges") = "" or ISNULL(RS("Charges")) then
money = "Awaiting"

elseif RS("Charges") = "FOC" then
money = "FOC"

else
money = RS("Charges")

'money = "<a href='#'
onclick=window.open('http://www.ozforex.com.au/tools/customConvert.asp?NC_ID1=GBP&NC_ID2=USD&BG=1C8CB3& amount="
& CINT(RS("Charges")) &
"&l=www.ozforex.com.au/images/tools/fxTranzfers.gif','ozforexWin','toolbar=no,menubar= no,scrollbars=no,resizable=no,status=no,location=n o,directories=no,copyhistory=no,dependent=0,height =360,width=250');
return false; onMouseOver=status='Launch Sample'; return true"
onMouseOut=status='';return true>OzForex Currency Converter</a>"
'money = CH & "<script
src=http://coinmill.com/frame.js></script><script>var
currency_round=true;</scriptGBP (approx
$<script>currency_show_conversion(" & CH & ",'GBP','USD');</script>
USD)"

END IF

'-------------- END CHARGES ------------------

If RS("YourRef") = "" or isnull(RS("YourRef")) then

response.write "<td align=center>" & ref &
"</td><td>   </td><td align=center>" & part &
"</td><td>   </td><td align=center>" & serial &
"</td><td>   </td><td align=left>" & cause &
"</B></td><td align=LEFT>" & money & "</B></td></tr>"

else

response.write "<td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=" & RS("ReportID") & ">" &
ref & "</a></td><td>   </td><td align=center>" & part &
"</td><td>   </td><td align=center>" & serial &
"</td><td>   </td><td align=left>" & cause &
"</B></td><td align=LEFT>" & money & "</B></td><TD>" & FD &
"</TD><input TYPE=hidden name=PO VALUE=" & ref & "></tr>"

end if

rs.movenext

Loop

end if
RESPONSE.WRITE "</TABLE></div></LI></UL><input type=reset name=Reset
value=Reset><input type=submit name=Submit value=Submit></form>"

%>

</font>
</body>

</html>

Oct 25 '06 #9

Ray Costanzo [MVP]

Dave, load the page in your browser and do a view-source! This is still the
ASP code!

Ray at work

"David" <da*********@scene-double.co.ukwrote in message
news:11**********************@i3g2000cwc.googlegro ups.com...

>
<HTML>

<head>
<style type="text/css">

ul#split,ul#split li{margin:0;padding:0;list-style:none}
ul#split li{float:CENTER;width:1100px;margin:0 10px 10px 0}
ul#split h3{font: normal 90%/1.0 Verdana,sans-serif;
text-transform:uppercase;margin:0px;padding: 5px 5px
5px;text-align:CENTER;color: #000}
ul#split p{margin:0;padding:5px 8px 5px}
ul#split div{background:#C5E6F6}
li#one h3{background: #C8C866}
li#two h3{background: #FFBD00}
li#three h3{background: #E3A1C4}
</style>
<script type="text/javascript" src="niftycube.js"></script>
<script type="text/javascript">
window.onload=function(){
Nifty("ul#split h3","top");
Nifty("ul#split div","bottom same-height");
Nifty("div#box","big");
}
</script>

</head>
<BODY bgcolor="#FFFFCC">

<center>

<%

FD = "<select name=select><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option
selected>Select Status</option></select>"
info = "Received at Scene Double"

strquery = "SELECT reports.Charges, reports.BB_Approval,
reports.ReportID, reports.CustomerID, reports.ReportDate,
reports.DateReturned, reports.YourPart, reports.YourRef,
'reports.Firmware Version', 'reports.Hardware Version',
reports.FaultReported, reports.FaultDescription, 'reports.Fault Found',
reports.Cause, reports.ActionTaken, reports.BoxContents,
reports.Comments, reports.GeneralNotes, reports.EditRefurbNotes,
reports.Customer, reports.Serial, reports.Country, reports.RepairSite,
reports.Job, reports.Warranty, reports.Charges, reports.ReportTS,
reports.RefurbSerial, reports.LocalFW, reports.RemoteFW,
reports.ReceivedDate, reports.Status, reports.StatusNotes FROM reports"
strquery = strquery & " WHERE ((reports.BB_Approval='Awaiting
Approval') and (reports.CustomerID=13)) ORDER BY reports.YourRef
DESC,reports.Serial;"

Oct 25 '06 #10

David

That is what I did ? as most of the html is written out by
response.write statements

RESPONSE.WRITE "<div><form name=Approval method=post
action=processemail_approval.asp>"

asp ......

response.write "<td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=" & RS("ReportID") & ">" &
ref & "</a></td><td>   </td><td align=center>" & part &
"</td><td>   </td><td align=center>" & serial &
"</td><td>   </td><td align=left>" & cause &
"</B></td><td align=LEFT>" & money & "</B></td><TD>" & FD &
"</TD><input TYPE=hidden name=PO VALUE=" & ref & "></tr>"

end if

rs.movenext

Loop

end if
RESPONSE.WRITE "</TABLE></div></LI></UL><input type=reset name=Reset
value=Reset><input type=submit name=Submit value=Submit></form>"

Oct 25 '06 #11

Mike Brind

"David" <da*********@scene-double.co.ukwrote in message
news:11*********************@f16g2000cwb.googlegro ups.com...

Mike,

Thanks for your advise. I only have 1 select statement. Please see my
reply to Ray.

David

Seems from the ASP that you posted earlier that you are creating a select
list for each record in the recordset? That's more than one. Do as Ray
said, run the page to generate your form and then paste the resulting html
here.

--
Mike Brind

Oct 25 '06 #12

David

ok, I have dynamically given the <SELECTTAG a new name on each loop,
i.e. 1, 2, 3, 4, 5
as follows:

As it stands, I have managed to create the following in my email body:
How can I replace the ',' with '=' and how can I remove 'Submit' from
the forms collection.

070512001R, Approved
069435001Q, Not Approved
Submit
069424001Q, Approved
061097001Q, Approved
069321001Q, Select Status
068466001Q, Approved
069305001Q, Approved
069270001Q, Approved
069167001Q, Not Approved
068744001Q, Approved
068677001Q, Approved
066497001Q, Approved
068677001Q, Not Approved

_______________________

<HTML>

<head>

<Title>

Scene Double Repair Lab

</Title>
<style type="text/css">

ul#split,ul#split li{margin:0;padding:0;list-style:none}
ul#split li{float:CENTER;width:1100px;margin:0 10px 10px 0}
ul#split h3{font: normal 90%/1.0 Verdana,sans-serif;
text-transform:uppercase;margin:0px;padding: 5px 5px
5px;text-align:CENTER;color: #000}
ul#split p{margin:0;padding:5px 8px 5px}
ul#split div{background:#C5E6F6}
li#one h3{background: #C8C866}
li#two h3{background: #FFBD00}
li#three h3{background: #E3A1C4}

</style>
<script type="text/javascript" src="niftycube.js"></script>
<script type="text/javascript">
window.onload=function(){
Nifty("ul#split h3","top");
Nifty("ul#split div","bottom same-height");
Nifty("div#box","big");
}
</script>
</head>
<BODY bgcolor="#FFFFCC">

<center>
<font face="Arial, Helvetica, sans-serif" size="4"><b><U>Scene Double
Repair Lab as at 25/10/2006 17:40:19 GMT</U></b><br><< Repairs Awaiting
Approval >></font><br><br>Either CLICK on your PO# to view individual
cost conversions or use converter below.<br>
<a href="#"
onclick="window.open('http://www.ozforex.com.au/tools/customConvert.asp?NC_ID1=GBP&NC_ID2=USD&BG=1C8CB3& amount=0&l=www.ozforex.com.au/images/tools/fxTranzfers.gif','ozforexWin','toolbar=no,menubar= no,scrollbars=no,resizable=no,status=no,location=n o,directories=no,copyhistory=no,dependent=0,height =360,width=250');
return false;" onMouseOver="status='Launch Sample'; return true"
onMouseOut="status='';return true"><font face="Arial, Helvetica,
sans-serif" size="4">Launch Currency Converter</a><br><br>
<ul id=split><li id=one><h3>-- Repairs currently in progress at Scene
Double --</H3><div><form name=Approval method=post
action=processemail_approval.asp><table><tr><td align=center><b>Your
PO#</TD><td>   </td><TD align=center><b>Part
Code</td><td>   </td><td align=center><b>Serial
Number</td><td>   </td><td
align=center><b>Status</td><td align=center><b>Charge</td></tr><tr><td
align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2182>07 0512001R</a></td><td>   </td><td
align=center>ACU1009A</td><td>   </td><td
align=center>No Serial Number</td><td>   </td><td
align=left>Unknown Cause</B></td><td
align=LEFT>Awaiting</B></td><TD><input type = hidden name = 1 value =
070512001R><select name=1><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr>
<td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2178>06 9435001Q</a></td><td>   </td><td
align=center>ACU1002A</td><td>   </td><td
align=center>0406137398</td><td>   </td><td
align=left>Remote unit dip switch mounted upside down !</B></td><td
align=LEFT>FOC</B></td><TD><input type = hidden name = 2 value =
069435001Q><select name=2><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2181>06 9424001Q</a></td><td>   </td><td
align=center>ACU2009A</td><td>   </td><td
align=center>0106129137</td><td>   </td><td
align=left>Defective remote board</B></td><td
align=LEFT>Awaiting</B></td><TD><input type = hidden name = 3 value =
069424001Q><select name=3><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2180>06 9321001Q</a></td><td>   </td><td
align=center>ACU4222A</td><td>   </td><td
align=center>0406137568</td><td>   </td><td
align=left>Unknown Cause</B></td><td align=LEFT>£5</B></td><TD><input
type = hidden name = 4 value = 069321001Q><select
name=4><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2173>06 9305001Q</a></td><td>   </td><td
align=center>ACU1028A</td><td>   </td><td
align=center>0705109928</td><td>   </td><td
align=left>Unknown Cause</B></td><td align=LEFT>£5</B></td><TD><input
type = hidden name = 5 value = 069305001Q><select
name=5><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2174>06 9270001Q</a></td><td>   </td><td
align=center>ACU4222A</td><td>   </td><td
align=center>0506140511</td><td>   </td><td
align=left>Unknown Cause</B></td><td align=LEFT>£10</B></td><TD><input
type = hidden name = 6 value = 069270001Q><select
name=6><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2179>06 9167001Q</a></td><td>   </td><td
align=center>ACU1002A</td><td>   </td><td
align=center>0106128955</td><td>   </td><td
align=left>Wrong power jack fitted</B></td><td
align=LEFT>FOC</B></td><TD><input type = hidden name = 7 value =
069167001Q><select name=7><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2170>06 8744001Q</a></td><td>   </td><td
align=center>ACU3009A</td><td>   </td><td
align=center>0705112426</td><td>   </td><td
align=left>Unknown Cause</B></td><td align=LEFT>£5</B></td><TD><input
type = hidden name = 8 value = 068744001Q><select
name=8><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2175>06 8677001Q</a></td><td>   </td><td
align=center>ACU3001A</td><td>   </td><td
align=center>0506139850</td><td>   </td><td
align=left>Remote surge diode blown</B></td><td
align=LEFT>£5</B></td><TD><input type = hidden name = 9 value =
068677001Q><select name=9><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2176>06 8677001Q</a></td><td>   </td><td
align=center>ACU3001A</td><td>   </td><td
align=center>0506139883</td><td>   </td><td
align=left>Remote surge diode blown</B></td><td
align=LEFT>£5</B></td><TD><input type = hidden name = 10 value =
068677001Q><select name=10><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2172>06 8466001Q</a></td><td>   </td><td
align=center>ACU1008A</td><td>   </td><td
align=center>1005</td><td>   </td><td align=left>Remote
unit VGA output amps ALL blown by something user connected
!!</B></td><td align=LEFT>£50</B></td><TD><input type = hidden name =
11 value = 068466001Q><select
name=11><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2177>06 6497001Q</a></td><td>   </td><td
align=center>ACU4001A</td><td>   </td><td
align=center>0306135594</td><td>   </td><td
align=left>Bad Remote RJ45</B></td><td
align=LEFT>FOC</B></td><TD><input type = hidden name = 12 value =
066497001Q><select name=12><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr><td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2171>06 1097001Q</a></td><td>   </td><td
align=center>ACU3001A</td><td>   </td><td
align=center>1205125052</td><td>   </td><td
align=left>Local surge diode blown</B></td><td
align=LEFT>£5</B></td><TD><input type = hidden name = 13 value =
061097001Q><select name=13><option>Approved</option><option>Not
Approved</option><option>Scrap at your location</option><option>Select
Status</option></select></TD</tr></TABLE></div></LI></UL><input
type=reset name=Reset value=Reset><input type=submit name=Submit
value=Submit></form>

</font>
</body>

</html>

Oct 25 '06 #13

Mike Brind

"David" <da*********@scene-double.co.ukwrote in message
news:11**********************@m7g2000cwm.googlegro ups.com...

ok, I have dynamically given the <SELECTTAG a new name on each loop,
i.e. 1, 2, 3, 4, 5
as follows:

As it stands, I have managed to create the following in my email body:
How can I replace the ',' with '=' and how can I remove 'Submit' from
the forms collection.

Evertjan answered this in the other thread you started
<snip>

<ul id=split><li id=one><h3>-- Repairs currently in progress at Scene
Double --</H3><div><form name=Approval method=post
action=processemail_approval.asp><table><tr><td align=center><b>Your
PO#</TD><td>   </td><TD align=center><b>Part
Code</td><td>   </td><td align=center><b>Serial
Number</td><td>   </td><td
align=center><b>Status</td><td align=center><b>Charge</td></tr><tr><td
align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=2182>07 0512001R</a></td><td>   </td><td
align=center>ACU1009A</td><td>   </td><td

<snip rest of garbled html>

When you response.write html, put a few judicious vbcrlfs in. Otherwise you
get a load of junk which is nearly impossible to debug/decipher. I for one
would sooner stick pins in my eyes than plough through that lot.

Oct 25 '06 #14

Ray Costanzo [MVP]

If your ASP code shows up in your browser, how on Earth are you submitting
the form and having anything happen?

This is how ASP works:

Server sees this:

<%
Response.Write "<div>hi</div>
%>

Browser receives this:

<div>hi</div>

You will NOT see ASP code in the browser if you are loading the page
properly, i.e. http://.....yourpage.asp

Ray at work

"David" <da*********@scene-double.co.ukwrote in message
news:11**********************@b28g2000cwb.googlegr oups.com...

That is what I did ? as most of the html is written out by
response.write statements

RESPONSE.WRITE "<div><form name=Approval method=post
action=processemail_approval.asp>"

asp ......

response.write "<td align=center><A
HREF=BBUSA_Repair_Lab_Datacheck.asp?SDLink=" & RS("ReportID") & ">" &
ref & "</a></td><td>   </td><td align=center>" & part &
"</td><td>   </td><td align=center>" & serial &
"</td><td>   </td><td align=left>" & cause &
"</B></td><td align=LEFT>" & money & "</B></td><TD>" & FD &
"</TD><input TYPE=hidden name=PO VALUE=" & ref & "></tr>"

end if

rs.movenext

Loop

end if
RESPONSE.WRITE "</TABLE></div></LI></UL><input type=reset name=Reset
value=Reset><input type=submit name=Submit value=Submit></form>"

Oct 25 '06 #15

Similar topics