一個(gè)簡單的ASP表單提交_第1頁
一個(gè)簡單的ASP表單提交_第2頁
一個(gè)簡單的ASP表單提交_第3頁
一個(gè)簡單的ASP表單提交_第4頁
一個(gè)簡單的ASP表單提交_第5頁
已閱讀5頁，還剩2頁未讀， 繼續(xù)免費(fèi)閱讀

下載本文檔

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡介

1、一個(gè)簡單的ASP表單提交 (2006-10-08 21:22:27)轉(zhuǎn)載分類： ASP一個(gè)簡單的asp表單提交建立數(shù)據(jù)庫文件note.mdb有以下字段：id-自動(dòng)編號(hào)name -文本   20title-文本     255sex-文本       2email-文本     50web-文本     255ip-文本 

2、;    15time-日期時(shí)間型     默認(rèn)值：now() content-備注color=Bluepost.htm 頁面/colorcode<html ><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312" /><title>提交頁面 </title></head><body>

3、;<form name="form1" id="form1" method="post" action="post.asp"><table width="600" border="0" align="center" cellpadding="0" cellspacing="1">  <tr>    <td width

4、="85">姓名：</td>    <td width="512"><input name="name" type="text" id="name" /></td>  </tr>  <tr>    <td>標(biāo)題：</td>    <

5、td><input name="title" type="text" id="title" /></td>  </tr>  <tr>    <td>性別：</td>    <td><input type="radio" name="radiobutton" value="男

6、" />    男    <input type="radio" name="radiobutton" value="女" />    女</td>  </tr>  <tr>    <td>email:</td>   &#

7、160;<td><input name="email" type="text" id="email" /></td>  </tr>  <tr>    <td>網(wǎng)站：</td>    <td><input name="web" type="text" id="web&q

8、uot; /></td>  </tr>  <tr>    <td>備注：</td>    <td><textarea name="content" cols="50" id="note"></textarea></td>  </tr></table><p

9、align="center">  <input type="submit" name="Submit" value="提交" />  <input type="reset" name="Submit2" value="重置" /></p></form></body></html>/codecolor=Blue以下為post.asp頁面/co

10、lorcode<%      set conn=Server.CreateObject("ADODB.Connection")     dbparam="Driver=Microsoft Access Driver (*.mdb);dbq="& server.MapPath("note.mdb")     conn.Open dbparam  

11、dim NoteMaxSize     NoteMaxSize=200     uname      =      replace(trim(request.form("name"),"'","")     utitle   

12、60;  =      replace(trim(request.form("title"),"'","")     usex      =      replace(trim(request.form("sex"),"'",&quo

13、t;")     uemail      =      replace(trim(request.form("email"),"'","")     uweb      =      

14、;replace(trim(request.form("web"),"'","")     unote      =      replace(trim(request.form("content"),"'","")     uip 

15、           =      request.servervariables("remote_addr")  if uname="" then     response.write "<script language=javascript>alert('姓名不能為空，請(qǐng)留下您的大名！

16、');javascript:history.back();</script>"     response.end     end if     if len(uname)>20 then     response.write "<script language=javascript>alert('"&uname&a

17、mp;" ，您的名字也太長了吧？');javascript:history.back();</script>"     response.end     end if     if unote="" then     response.write "<script language=javascript>alert(

18、'留言不能為空！');javascript:history.back();</script>"     response.end     end if     if len(unote)>NoteMaxSize then     response.write "<script language=javascript>alert(&#

19、39;"& uname &" ，留言內(nèi)容字?jǐn)?shù)不要大于"& NoteMaxSize &"？');javascript:history.back();</script>"     response.end     end if     if uemail<>"" then    

20、 if instr(uemail,"")=-1 or instr(uemail,".")=-1 or len(uemail)<5 then     response.write "<script language=javascript>alert('您的電子信箱地址好象有問題哦！');javascript:history.back();</script>"     response

21、.end     end if     end if     response.write uname&"|"&utitle  response.write "<br>"     response.write usex&"|"&uemail   

22、  response.write "<br>"     response.write uweb&"|"&unote     response.write "<br>"     response.write uip     sql="insert into list(na

23、me,title,sex,email,web,content,ip)values('"&uname&"','"&utitle&"','"&usex&"','"&uemail&"','"&uweb&"','"&unote&"','"&uip&"&

24、#39;)"             set rs = Server.createobject("adodb.recordset")     rs.open sql,conn,2,3     set rs=nothing     set conn=nothing  %&

25、gt;ASP連接ACCESS (2006-10-08 21:21:34)轉(zhuǎn)載分類： ASP<% 'AdoAccess.aspOption ExplicitResponse.Expires = 0'第一部分: 建立連接Dim Cnn, StrCnnSet Cnn = Server.CreateObject("ADODB.Connection")StrCnn = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C:InetpubhomeaspNorthwind.mdb&qu

26、ot;Cnn.Open StrCnn%>程序wuf50.asp<% LANGUAGE = VBScript %><!-#include file="AdoAccess.asp"-><% ' wuf50.asp'第二部分: 使用 Connection 對(duì)象的 Execute 添加新數(shù)據(jù)Dim StrSQL, rsTestStrSQL = "INSERT INTO 運(yùn)貨商 (公司名稱,電話) valueS('wu''feng','#39;)"

27、Cnn.Execute StrSQL%><HTML><BODY><% '第三部分: 將得到的記錄集顯示到瀏覽器上Set rsTest = Cnn.Execute("Select * From 運(yùn)貨商")Do While Not rsTest.EOFResponse.Write rsTest(0) & " " & rsTest(1) & " " & rsTest(2) & " " & "<BR>"

28、;rsTest.MoveNextLoop'第四部分: 打掃戰(zhàn)場Cnn.closeSet rsTest = Nothing: Set Cnn = Nothing%></BODY></HTML>MYSQL建表實(shí)例 (2006-10-08 21:11:13)轉(zhuǎn)載分類： MYSQL一個(gè)建庫和建表以及插入數(shù)據(jù)的實(shí)例drop database if exists school; /如果存在SCHOOL則刪除create database school; /建立庫SCHOOLuse school; /打開庫SCHOOLcreate table tea

29、cher /建立表TEACHER(id int(3) auto_increment not null primary key,name char(10) not null,address varchar(50) default 深圳,year date); /建表結(jié)束/以下為插入字段insert into teacher values(,glchengang,深圳一中,1976-10-10);insert into teacher values(,jack,深圳一中,1975-12-23);注：在建表中（1）將ID設(shè)為長度為3的數(shù)字字段:int(3)并讓它每個(gè)記錄自動(dòng)加一:auto_incre

30、ment并不能為空:not null而且讓他成為主字段primary key（2）將NAME設(shè)為長度為10的字符字段（3）將ADDRESS設(shè)為長度50的字符字段，而且缺省值為深圳。varchar和char有什么區(qū)別呢，只有等以后的文章再說了。（4）將YEAR設(shè)為日期字段。如果你在mysql提示符鍵入上面的命令也可以，但不方便調(diào)試。你可以將以上命令原樣寫入一個(gè)文本文件中假設(shè)為school.sql，然后復(fù)制到c:下，并在DOS狀態(tài)進(jìn)入目錄mysqlbin，然后鍵入以下命令：mysql -uroot -p密碼 < c:school.sql如果成功，空出一行無任何顯示；如有錯(cuò)誤，會(huì)有提示。（以上

31、命令已經(jīng)調(diào)試，你只要將/的注釋去掉即可使用）。四、將文本數(shù)據(jù)轉(zhuǎn)到數(shù)據(jù)庫中1、文本數(shù)據(jù)應(yīng)符合的格式：字段數(shù)據(jù)之間用tab鍵隔開，null值用n來代替.例：3 rose 深圳二中 1976-10-104 mike 深圳一中 1975-12-232、數(shù)據(jù)傳入命令 load data local infile "文件名" into table 表名;注意：你最好將文件復(fù)制到mysqlbin目錄下，并且要先用use命令打表所在的庫。五、備份數(shù)據(jù)庫：（命令在DOS的mysqlbin目錄下執(zhí)行）mysqldump -opt school>school.bbb注釋:將數(shù)據(jù)庫schoo

32、l備份到school.bbb文件，school.bbb是一個(gè)文本文件，文件名任取，打開看看你會(huì)有新發(fā)現(xiàn)。MYSQL常用命令 (2006-10-08 21:03:13)轉(zhuǎn)載1.下載后設(shè)置環(huán)境變量； 2.在cmd中啟動(dòng)mysql服務(wù)：mysqld-nt -uroot 3.進(jìn)入mysql：mysql -uroot -p 4.修改密碼:mysqladmin -u用戶名 -p舊密碼 password 新密碼   例1：給root加個(gè)密碼ab12。首先在DOS下進(jìn)入目錄mysqlbin，然后鍵入以下命令mysqladmin -uroot -password ab12注：因?yàn)殚_始時(shí)root沒有密碼，所以-p舊密碼一項(xiàng)就可以省略了。   例2：再將root的密碼改為djg345。mysqladmin -uroot -pab12 password djg345 5.增加新用戶（注意：和上面不同，下面的因?yàn)槭荕YSQL環(huán)境中的命令，所以后面都帶一個(gè)分號(hào)作為命令結(jié)束符） :grant select on 數(shù)據(jù)庫.* to 用戶名登錄主機(jī) identified by &quo

溫馨提示

  • 1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲(chǔ)空間，僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請(qǐng)與我們聯(lián)系，我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論