Forums
This topic is locked
Please help correct this code..
29 May 2007 18:50:38 phil C posted:
the code below checks if Request("email" is empty, if it is it takes the value of ("name" and ("postcode", strips out the blank spaces and asigns to variable email in the format 'name@postcode'my problems comes in replacing the orinal Request("email" string.. i have tried request.QueryString("email" = email as per the code below but no luck.
i have included the record insert code below the email code for your ref...
can anyone please tell me what im doing wrong
*****************************************************
<%
if Request.QueryString("email" ="" then
Dim zip
DIM stremail
Dim strzip
strname = Request("name"
strzip = Request("postcode"
email = Replace(strname, " ", "" + "@" + Replace(strzip, " ", ""
request.QueryString("email" = email
End if
%>
******************************************************************
this is the code generated by DW8 for an insert recort (not all code shown)
the field i need replaciing is email.
*****************************************************************
' *** Insert Record: set variables
If (CStr(Request("MM_insert") = "form1" Then
MM_editConnection = MM_conn_pegsales_STRING
MM_editTable = "customers"
MM_editRedirectUrl = "viewall.asp"
MM_fieldsStr = "name|value|company|value|add1|value|add2|value|county|value|postcode|value|country|value|tel|value|fax|value|email|value"
MM_columnsStr = "name|',none,''|company|',none,''|add1|',none,''|add2|',none,''|county|',none,''|postcode|',none,''|country|',none,''|tel|',none,''|fax|',none,''|email|',none,''"
**********************************
Replies
Replied 08 Jun 2007 22:57:39
08 Jun 2007 22:57:39 dave blohm replied:
your problem is the request.QueryString("email" = email line at the end of your code right before the End If. Request.Querystring is read only.
- Doc
Progress is made by the discontent.
- Doc
Progress is made by the discontent.