<%
'Declare variables needed
Dim strSQL
Dim adCmdText
varuserID= request.form("user")
response.write varuserid
'Set required variables
adCmdText = 1

If Len(Request.Form("FormAction")) = 0 Then

'Create the recordset object
Set objRS = Server.CreateObject("ADODB.Recordset")

'Open the recordset
objRS.Open "Select Distinct wedate from everyone WHERE edsnet LIKE 'varuserid'", "DSN=offstats"
%>


<form action=Ex.asp method=post name=frmDisplay>
<input type=hidden name=FormAction value=Step2>
<table>
<tr>
<td colspan=2>Select a we date to update</td>
</tr>
<tr>
<td>WE Date</td>
<td><select name=cbowedate>
<%
'Loop through the recordset adding wedate to the combo box
Do While Not objRS.EOF
%>
<option value="<%=objRS("wedate")%>">
<%=objRS("wedate")%></option>
<%
objRS.MoveNext

Loop

'Close and dereference database objects
objRS.Close
Set objRS = Nothing
%>
</select></td>
</tr>
<tr>
<td height=60><input type=submit name=btnSubmit value=Submit></td>
</tr>
</table>
</form>
--------------------------------
If I change this line:

objRS.Open "Select Distinct wedate from everyone WHERE edsnet LIKE 'varuserid'", "DSN=offstats"

to THIS:

objRS.Open "Select Distinct wedate from everyone WHERE edsnet LIKE 'rzm41v'", "DSN=offstats"

Replacing my ID with the varuserid it works fine, but this is hard coded, I need it for different users.

objRS.Open "Select Distinct wedate from everyone WHERE edsnet LIKE 'varuserid'", "DSN=offstats"

What you need to do, is enter it as a variable :

objRS.Open "Select Distinct wedate from everyone WHERE edsnet LIKE '" & varuserid & "'", "DSN=offstats"

Im not sure why you would use LIKE? you should be searching for an exact match?

Can you explain the structure of the line of code to me so I can understand in the future? What does the & do?

Thanks!

strSQL = "Select * from Everyone where wedate = '" & _
CStr(Request.Form("cbowedate")) & "'"

The above is part of my update form script.

But it does not include the 'user' id field that we worked on previously, how would I include this to query where the varuserid matches the one entered on the previous form?

Hope im not being too confusing...Thanks again!

objRS.Open "Select Distinct wedate from everyone WHERE edsnet LIKE 'varuserid'"

The " signify the start and end of a string.

So if we need to insert a variable into a string, we need to break out of it at the point we are going to join a new variable.

objRS.Open "Select Distinct wedate from everyone WHERE edsnet LIKE '" <-- So we add a quote.

Now we want to join a variable to this string, so we use the &

To restart the string , we have to again add & and restart the " to let asp know we are continuing where we left off.

Im not quite sure where the ID comes in, but do you mean something like :

strSQL = "Select * from Everyone where wedate = '" & _
CStr(Request.Form("cbowedate")) & "' AND edsnet ='" & varuserid & "'"

Weekending date:
ADODB.Field error '80020009'

Either BOF or EOF is True, or the current record has been deleted; the operation requested by the application requires a current record.

?

strSQL = "Select * from Everyone where wedate = '" & _
CStr(Request.Form("cbowedate")) & "' AND edsnet LIKE 'VMCWEB\rzm41v' "'",

-------------------------
and that seems to work, but when trying to use varuserid in its place I get the error I talked about above???

Vince

------------------
Internet Business Solutions S.L.(Spain)

Select * from Everyone where wedate = '02/03/01' AND edsnet =''
Weekending date:
ADODB.Fields error '800a0cc1'

ADO could not find the object in the collection corresponding to the name or ordinal reference requested by the application.

/reports/stats/Ex.asp, line 81

-----------
It appears that the varuserid is not writing the ID...Above the statement I do a response.write varuserid and it is showing the correct ID that I need, it just is not working in the statement for some reason.

Thanks...

strSQL = "Select * from Everyone where wedate = '" & _
CStr(Request.Form("cbowedate")) & "' AND edsnet = '" & CStr(Request.Form("varuserid")) & "'"

Works great! Thanks everyone