Below thiscode I try also toselect and display the first and last namefrom a database => fails
<div id="select_document" style="display: none;">Which is the coirrect code Typ tekst of een websiteadres ofvertaal een document.</div>What is the correct code tot do this ?
<div class="g-section" id="gt-c"> <div id="gt-form-c"><form name="text_form" id="gt-form" action="/" enctype="application/x-www-form-urlencoded" method="post"> <div id="gt-text-all"> <div id="gt-main"> <div id="gt-text-c"> <div id="gt-text-top"> <div class="g-unit" id="gt-src-c"> <div id="gt-src-p"> <div class="file" id="file_div" style="display: none;"> <div id="select_text">Annuleren</div> <input name="file" id="file" type="file" size="40" /></div> <div class="translit" id="src-translit" style="text-align: left;" dir="ltr">Thanks forassistance - Leifoet</div> </div> </div> </div> </div> </div> </div> </form></div> </div><%
' thisverificationcodeis a continuation of
a workinglogincode
- the goalis to verify
if the useris logged in.
' session("uid") is thekey field=>
LdnID (cfrpreviousequationinthe logincode.Session ("uid") =rs("Ldn-Id")
if Session("uid") = "" then
Response.Redirect("login.asp")
else
Response.Write("<title>ASP next page</title>")
Response.write("<center>Hi " & Session("uid") & "<br><a href=logout.asp>Logout</a></center>")
Dim dtmHour
dtmHour = Hour(Now())
If dtmHour >= 6 And dtmHour < 12 Then
Response.Write "Goede morgen "
ElseIf dtmHour >= 12 And dtmHour < 19 Then
Response.Write "Goede middag "
ElseIf dtmHour >= 19 And dtmHour < 23 Then
Response.Write "Goede avond "
Else
Response.Write "Goede nacht "
End If
===== the above code is correctto here(I think)-but I can not displaythefirst and last name with the following code-faultycode?
set conn = server.CreateObject ("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath ("users.mdb")
set rs = server.CreateObject ("ADODB.Recordset")
' => open the record to selectthe correspondingfirst and last name for the session ("uid")
rs.Open "SELECT voornaam,familienaam FROM userlist WHERE Session("uid")='"& leden-id &"'", conn, 1
Response.Write (rsUsers("Voornaam"))
Response.Write (rsUsers("Familienaam"))
end if
%>