图片如下:
网页布局不能按意愿布局,代码如下
<table width="760" height="600" border="0" align="center" cellpadding="0" cellspacing="0">
<%
'条件显示插件 star
if Session("MM_Username") = "" then
%><tr>
<td height="30" colspan="3" align="left"><form id="login" name="login" method="POST" action="<%=MM_LoginAction%>">
<table width="628" height="30" border="0" cellpadding="0" cellspacing="0">
<tr align="center">
<td width="87">用户名:</td>
<td width="113"><input name="username" type="text" id="username" size="15" /></td>
<td width="81">密码:</td>
<td width="119"><input name="psd" type="password" id="psd" size="15" /></td>
<td width="76"><input type="submit" name="Submit" value="登录" /></td>
<td width="152" style="color:#FF0000"><%= Request.QueryString("msg") %></td>
</tr>
</table>
</form> </td>
</tr>
<%
end if
'条件显示插件 end
%>
<tr>
<td colspan="3" height="30"><table width="100%" height="30" border="0" cellpadding="0" cellspacing="0">
<tr>
<%
'条件显示插件 star
if Session("MM_Username") <> "" then
%><td width="7%">您好:</td>
<td width="21%"><%=(Recordset1.Fields.Item("userName").Value)%></td>
<td width="9%"><a href="<%= MM_Logout %>">注销用户</a></td>
<td width="9%"><A HREF="psd_change.asp?<%= Server.HTMLEncode(MM_keepNone) & MM_joinChar(MM_keepNone) & "User_id=" & Recordset1.Fields.Item("User_id").Value %>">修改密码</A></td>
<td width="54%" style="color:#FF0000">您有
<%
'条件显示插件 star
if Session("MM_UserAuthorization") = 1 then
%>
发布公文
<%
end if
'条件显示插件 end
%>
<%
'条件显示插件 star
if Session("MM_UserAuthorization") = 2 then
%>
批注公文
<%
end if
'条件显示插件 end
%>
<%
'条件显示插件 star
if Session("MM_UserAuthorization") = 3 then
%>
管理
<%
end if
'条件显示插件 end
%>
的权限</td>
<%
end if
'条件显示插件 end
%></tr>
</table></td>
</tr>
<tr>
<td colspan="3" height="30">
<form id="form1" name="form1" method="post" action="search.asp">
<table width="100%" height="30" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="73" align="center" valign="middle">搜索</td>
<td width="687" valign="middle">
文件所属部门
<select name="select">
<%
While (NOT dp_RS.EOF)
%><option value="<%=(dp_RS.Fields.Item("Department_name").Value)%>"><%=(dp_RS.Fields.Item("Department_name").Value)%></option>
<%
dp_RS.MoveNext()
Wend
If (dp_RS.CursorType > 0) Then
dp_RS.MoveFirst
Else
dp_RS.Requery
End If
%>
</select>
文件名
<input name="file_name" type="text" id="file_name" />
<input type="submit" name="Submit2" value="提交" />
</td>
</tr>
</table>
</form></td>
</tr>