📄 29-6.cfm.htm
字号:
</B></FONT><FONT FACE="宋体" LANG="ZH-CN" SIZE=3><P ALIGN="JUSTIFY"> View Resume页显示了一个简历表（见图29.20）。这页显示匹配由UserID字符串传递过来的UserID的申请人的简历，如果这页没有收到一个查询字符串的话，将对用户发出警告。</P>
<P ALIGN="JUSTIFY">表29.4显示了View Resume页的完整代码。</P>
<P ALIGN="JUSTIFY"><IMG SRC="Image11.gif" tppabs="http://210.74.168.175/guide/asp/part29/Image11.gif" WIDTH=617 HEIGHT=393><B>图29.20 View Resume页</P>
</B><P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY">表29.4 View Resume页:fconsult3.asp的代码。</P>
<P ALIGN="JUSTIFY"><HR ALIGN="RIGHT" SIZE=1></P>
<P ALIGN="JUSTIFY"><!-- #INCLUDE VIRTUAL="ADOVBS.INC" --></P>
<P ALIGN="JUSTIFY"><%</P>
<P ALIGN="JUSTIFY">' Shows A Part Of A Resume Only If It Exists</P>
<P ALIGN="JUSTIFY">SUB ShowIt(theCol,theVar)</P>
<P ALIGN="JUSTIFY"> IF RS(theVar)<>"" THEN </P>
<P ALIGN="JUSTIFY">%></P>
<P ALIGN="JUSTIFY"><B><%=theCol%></B> <%=RS(theVar)%><BR></P>
<P ALIGN="JUSTIFY"><%</P>
<P ALIGN="JUSTIFY"> END IF</P>
<P ALIGN="JUSTIFY">END SUB</P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY">' Loops Through All Skills In Resume</P>
<P ALIGN="JUSTIFY">SUB ShowSkills</P>
<P ALIGN="JUSTIFY"> FOR i=0 TO RS.Fields.Count-1</P>
<P ALIGN="JUSTIFY"> IF RS(i).type=vbBoolean THEN</P>
<P ALIGN="JUSTIFY"> IF RS(i) THEN Response.Write("<LI>"&RS(i).Name)</P>
<P ALIGN="JUSTIFY"> End IF</P>
<P ALIGN="JUSTIFY"> NEXT</P>
<P ALIGN="JUSTIFY">END SUB</P>
<P ALIGN="JUSTIFY">%></P>
<P ALIGN="JUSTIFY"><HTML></P>
<P ALIGN="JUSTIFY"><HEAD><TITLE> View Resume </TITLE></HEAD></P>
<P ALIGN="JUSTIFY"><BODY BGCOLOR="#FFFFFF" ALINK="#FF0000"></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><!-- Create Title Banner Table --></P>
<P ALIGN="JUSTIFY"><TABLE BGCOLOR="#00aaff" WIDTH="100%"></P>
<P ALIGN="JUSTIFY"><TR><TD VALIGN=CENTER></P>
<P ALIGN="JUSTIFY"><FONT FACE=ARIAL SIZE=+4> &nbsp;ASP Job Site</FONT><FONT SIZE=+2> &nbsp;&nbsp;<I> Find Consultant </I></FONT></P>
<P ALIGN="JUSTIFY"></TD></TR></P>
<P ALIGN="JUSTIFY"></TABLE></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><!-- Create Main Body Table --></P>
<P ALIGN="JUSTIFY"><TABLE HEIGHT="100%" CELLPADDING=20></P>
<P ALIGN="JUSTIFY"><TR></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><!-- The Left Cell Of The Body Table Contains The Navigation Strip --></P>
<P ALIGN="JUSTIFY"><TD ALIGN=CENTER VALIGN=TOP BGCOLOR="#D0D0D0" WIDTH=100></P>
<P ALIGN="JUSTIFY"><B></P>
<P ALIGN="JUSTIFY"><P><A HREF="../default.asp">Home</A></P>
<P ALIGN="JUSTIFY"><P><HR></P>
<P ALIGN="JUSTIFY"><P>Consultants</P>
<P ALIGN="JUSTIFY"><P><A HREF="/fjob/fjob1.asp">Find A Job</A></P>
<P ALIGN="JUSTIFY"><P><A HREF="/nresume/nresume1.asp">Post A Resume</A></P>
<P ALIGN="JUSTIFY"><P><A HREF="/uresume/uresume1.asp">Update Your Resume</A></P>
<P ALIGN="JUSTIFY"><P><HR></P>
<P ALIGN="JUSTIFY"><P>Employers</P>
<P ALIGN="JUSTIFY"><P><FONT COLOR="#808080">Find A Consultant</FONT></P>
<P ALIGN="JUSTIFY"><P><A HREF="/njob/njob1.asp">Post A Job</A></P>
<P ALIGN="JUSTIFY"><P><A HREF="/ujob/ujob1.asp">Update Job Information</A></P>
<P ALIGN="JUSTIFY"></B></P>
<P ALIGN="JUSTIFY"></TD></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><!-- The Right Cell Of The Body Table Contains The Page Contents --></P>
<P ALIGN="JUSTIFY"><TD ALIGN=CENTER VALIGN=CENTER></P>
<P ALIGN="JUSTIFY"><TABLE HEIGHT="100%" ALIGN=CENTER CELLSPACING=50></P>
<P ALIGN="JUSTIFY"><TR><TD></P>
<P ALIGN="JUSTIFY"><%</P>
<P ALIGN="JUSTIFY">' Create ADO objects</P>
<P ALIGN="JUSTIFY">Set MyConn=Server.CreateObject("ADODB.Connection") </P>
<P ALIGN="JUSTIFY">MyConn.Open Application("ConnectionString")</P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY">' Create SQL SELECT String</P>
<P ALIGN="JUSTIFY">MySQL="Select * FROM resumes WHERE UserID="&Request.QueryString("UserID")</P>
<P ALIGN="JUSTIFY">Set RS=Server.CreateObject("ADODB.RecordSet")</P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY">' A Static Cursor Must Be Used To Retrieve The TEXT fields</P>
<P ALIGN="JUSTIFY">RS.Open MySQL,Myconn,adOpenStatic</P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY">' Checks For Leap To Page From Nowhere</P>
<P ALIGN="JUSTIFY">IF RS.EOF THEN</P>
<P ALIGN="JUSTIFY">%></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+2><I>You cannot retrieve this page directly.</I></P>
<P ALIGN="JUSTIFY"><BR>Click the Back button to return to the Find Consultant Page.</FONT></P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FORM ACTION="fconsult1.asp"></P>
<P ALIGN="JUSTIFY"><INPUT TYPE="SUBMIT" VALUE="BACK"></P>
<P ALIGN="JUSTIFY"></FORM></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><% ELSE %></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><!-- Show The Resume --></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+2 FACE="Arial"><I><%=RS("FullName")%></I></FONT></P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+1><I>Contact Information:</I></FONT></P>
<P ALIGN="JUSTIFY"><BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><% ShowIt "Name:","FullName" %> </P>
<P ALIGN="JUSTIFY"><B>Email:</B></P>
<P ALIGN="JUSTIFY"><A HREF="MAILTO:<%=RS("Email")%>"><%=RS("Email")%></A><BR> </P>
<P ALIGN="JUSTIFY"><% ShowIt "Phone:","Phone" %></P>
<P ALIGN="JUSTIFY"><% ShowIt "City:","City" %></P>
<P ALIGN="JUSTIFY"><% ShowIt "State:", "State" %></P>
<P ALIGN="JUSTIFY"><% ShowIt "Country:","Country" %></P>
<P ALIGN="JUSTIFY"></BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><% IF RS("Goals")<>"" THEN %></P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+1><I>Work Goals:</I></FONT></P>
<P ALIGN="JUSTIFY"><BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><%=RS("Goals")%></P>
<P ALIGN="JUSTIFY"></BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><% END IF %></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><% IF RS("Experience")<>"" THEN %></P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+1><I>Experience:</I></FONT></P>
<P ALIGN="JUSTIFY"><BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><%=RS("Experience")%></P>
<P ALIGN="JUSTIFY"></BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><% END IF %></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+1><I>Proficiencies:</I></FONT></P>
<P ALIGN="JUSTIFY"><BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><UL></P>
<P ALIGN="JUSTIFY"><% ShowSkills %></P>
<P ALIGN="JUSTIFY"></UL></P>
<P ALIGN="JUSTIFY"></BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><% IF RS("MoreScript")<>"" THEN %></P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+1><I>Scripting Language Experience:</I></FONT></P>
<P ALIGN="JUSTIFY"><BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><%=RS("MoreScript")%></P>
<P ALIGN="JUSTIFY"></BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><% END IF %></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><% IF RS("MoreProg")<>"" THEN %></P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+1><I>Programming Language Experience:</I></FONT></P>
<P ALIGN="JUSTIFY"><BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><%=RS("MoreProg")%></P>
<P ALIGN="JUSTIFY"></BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><% END IF %></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><% IF RS("MoreWeb")<>"" THEN %></P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+1><I>Web Server Experience:</I></FONT></P>
<P ALIGN="JUSTIFY"><BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><%=RS("MoreWeb")%></P>
<P ALIGN="JUSTIFY"></BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><% END IF %></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><% IF RS("MoreData")<>"" THEN %></P>
<P ALIGN="JUSTIFY"><P></P>
<P ALIGN="JUSTIFY"><FONT SIZE=+1><I>Database Experience:</I></FONT></P>
<P ALIGN="JUSTIFY"><BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><%=RS("MoreData")%></P>
<P ALIGN="JUSTIFY"></BLOCKQUOTE></P>
<P ALIGN="JUSTIFY"><% END IF %></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"><% </P>
<P ALIGN="JUSTIFY">END IF </P>
<P ALIGN="JUSTIFY">RS.Close</P>
<P ALIGN="JUSTIFY">MyConn.Close</P>
<P ALIGN="JUSTIFY">%></P>
<P ALIGN="JUSTIFY"></TD></TR></P>
<P ALIGN="JUSTIFY"></TABLE></P>
<P ALIGN="JUSTIFY"></TD></TR></P>
<P ALIGN="JUSTIFY"></TABLE></P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"></BODY></P>
<P ALIGN="JUSTIFY"></HTML></P>
<P ALIGN="JUSTIFY"><HR ALIGN="RIGHT" SIZE=1></P>
<P ALIGN="JUSTIFY"> 申请者的简历从 resumes 表从提取。一个包含有单个所匹配用户简历记录的记录集将被打开。注意，这个记录集不是以向前光标的形式打开。如果你使用一个向前光标来提取文本字段信息，会发生意想不到的怪事。</P>
<P ALIGN="JUSTIFY"> View Resume页使用同以前页相同的技巧来显示简历中的技能。记录中BIT列通过ADO字段对象的Type属性来检测，所有在简历中的技能都通过ShowSkills过程自动显示。</P>
<P ALIGN="JUSTIFY"> </P>
<P ALIGN="JUSTIFY"> </P></FONT></BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -