検索

ホームページ >ウェブフロントエンド >htmlチュートリアル >HTML で掲示板を追加した後、入力ボックスをクリックできない場合があります。 help_html/css_WEB-ITnose をご覧ください

HTML で掲示板を追加した後、入力ボックスをクリックできない場合があります。 help_html/css_WEB-ITnose をご覧ください

WBOY
WBOYオリジナル
2016-06-24 12:12:242132ブラウズ

HTMLページで簡単な掲示板を作り始めたばかりの初心者ですが、表示される入力欄がクリックできないことがよくあります>_> 、初心者には意味がありません、助けてください。
コードは次のとおりです:

" valign= "top"> String.prototype.Trim = function()
{
return this.replace(/(^s*)|(s*$)/g, "" );
function isEmail(strEmail) ) {
if (strEmail.search(/^w+((-w+)|(.w+))*@[A-Za-z0-9]+((.|-)

{
alert(「ユーザー名を入力してください! ");
obj.UserName.focus();
return false;
}
if(obj.EMail.value.Trim()=="")
{
alert("メールアドレスを入力してください!");
obj.EMail.focus();
return false;
}
if(!isEmail(obj.EMail.value.Trim()))
{
alert("入力したメールアドレスが間違っています!"); EMail.focus();
return false;
}
if(obj.Title.value.Trim()=="")
{
alert("メッセージのタイトルを入力してください!"); ();
return false; }
if(obj.Content.value.Trim()=="")
{
alert("メッセージの内容を入力してください!"); false false;                              














                              






在中留言
姓
NAM名前：		 　
联系方式： 　
留言主题： 　
留言内容： 　




 


回论论(解決案)

来位大侠帮我呀~~

贴明確代啊。

上面を見ていない代コード谢谢注
原は ASP の一つの简单留言板です、我是想只引用写留言衹、另因為本人不懂臂这一块，故にハード運搬の代コードに属し，真不好意，我就是此里面一部ASPペイコードは HTML の中に運び込まれており、これを解決して、もう一度再調整することができます。この復元は長くはできないため、その ASP のペイメントを 2 回下に置いています。







留言板

<スクリプト言語="javascript">
String.prototype.Trim = function()
{
return this.replace(/(^s*)|(s*$)/g, "");
}
関数 isEmail(strEmail) {
if (strEmail.search(/^w+((-w+)|(.w+))*@[A-Za-z0-9]+((.|-)[A -Za-z0-9]+)*.[A-Za-z0-9]+$/) != -1)
true を返します。
else
falseを返す;
}




<%
CreConn(Conn) を呼び出す
Action=FormatRequest(1,"Action",1,"")
Case アクションを選択
Case "Add"
Add() を呼び出す
Case "SaveAdd"
SaveAdd() を呼び出す
ケース「ログイン」
Login() を呼び出す
ケース「ChkLogin」
ChkLogin() を呼び出す
ケース「EditPwd」
EditPwd() を呼び出す
ケース「SavePwd」
SavePwd() を呼び出す
ケース「LoginOut」
を呼び出すログインアウト()
Case 「Reply」
Call Reply()
Case 「SaveReply」
Call SaveReply()
Case 「Del」
Call Del()
Case Else
Call Main()
End Select
Sub Main()
Page=FormatRequest (1,"ページ",0,1)
If Page<=0 Then Page=1
PSize=10
TbName="Book_List"
GetCol="ID,UserName,Title,Content,AddDate,Reply,HomePage,EMail "
PCol="ID"
SortCol="ID"
StrW="IsShow=True"
CT=""
TCount=Conn.Execute("IsShow=True の Book_List からカウント (ID) を選択します")(0)
PCount=GetPageCount(TCount,PSize)
If Page>PCount And PCount>0 Then Page=PCount
PIndex=Page

Set Rs=Conn.Execute(GetPageList(TBName,GetCol,PCol,SortCol,1,StrW,PSize) 、PIndex))
Rs.Eof ではない場合
%>











<%
Do While Not Rs.Eof
%>










<%
TmpReply=Rs(5)
If Trim(TmpReply)<>"" Then
%>




  <%End If
If Session("AdUser")<>"" Then
%>





<%End If%>



  <%
Rs.MoveNext
Loop
%>
签写留言　　　　　<%If Session("AdUser")="" Or IsNull(Session("AdUser")) Then%>管理登录<%Else%>修改密码　　退出登录<%End If%>
留言主题 <%=Rs(2)%> 留言者:<%=Rs(1)%> 留言时间:<%=Rs(4)%>
留言内容 <%=Replace(Left(Rs(3),500),chr(10),"
")%>
管理员回复 <%=TmpReply%>
留言管理 电子邮件:<%=Rs(7)%> 回复留言　　删除留言

<%
If PCount>1 Then
Response.Write PageList(3,PCount,Page,CT)
Else
Response.Write "
"
End If
Else
Response.Write "


没有留言

我要签写留言

"
End If
End Sub
Sub Add()
%>






姓:


" align="center">メッセージ件名:








<%
Rs.Close
Set Rs=Nothing
End Sub
Sub SaveReply()
If Session("AdUser")="" Or IsNull(Session("AdUser")) Then Call ShowErrMsg(3,"非法) ","")
ID=FormatRequest(2,"ID",0,0)
Page=FormatRequest(2,"ページ",0,0)
TmpReply=FormatRequest(2,"返信",1, "")
If TmpReply="" Then Call ShowErrMsg(3,"请输入回复内容！","")
Conn.Execute("Update Book_List Set Reply='"&TmpReply&"'Where ID="&ID)
Call ShowErrMsg(1,"回复成功！","index-book.asp?Page="&Page)
End Sub

Sub Del()
ID=FormatRequest(1,"ID",0,0)
Page=FormatRequest (1,"ページ",0,0)
Conn.Execute("Book_List から削除 ID="&ID)
Call ShowErrMsg(1,"删除成功！","index-book.asp?Page="&Page)
End Sub
Call CloConn(Conn)
%>

この解決方法を同求し、回答案を得ることができます~

解决不了、看来、结个贴算了、自琢磨去、谢谢大家の関心~

声明：
この記事の内容はネチズンが自主的に寄稿したものであり、著作権は原著者に帰属します。このサイトは、それに相当する法的責任を負いません。盗作または侵害の疑いのあるコンテンツを見つけた場合は、admin@php.cn までご連絡ください。
前の記事：Web ビデオ再生コードが利用できないのはなぜですか? _html/css_WEB-ITnose次の記事：Web ビデオ再生コードが利用できないのはなぜですか? _html/css_WEB-ITnose

関連記事

続きを見る
メッセージ リストに戻る

名前を入力= "タイトル" style="width:200px;"
< ; /td>
;