Artikel ini akan membagikan kepada Anda beberapa kode sumber yang sering digunakan dalam pemrograman ASP. Cocok untuk dibaca oleh pemula. Saya harap ini akan membantu Anda, mari kita lihat bersama!
ASP adalah singkatan dari halaman server aktif, yang berarti halaman server dinamis. ASP adalah aplikasi yang dikembangkan oleh Microsoft untuk menggantikan program skrip CGI. Dilanjutkan dengan artikel sebelumnya >> http://www.vevb.com/kaifa/asp/70602.html
11. Akses Database Koneksi:
- <%
- OptionExplicit
- Dimstartime, Endtime, Conn, Connstr, DB
- startTime = timer ()
- 'Ubah nama database
- db = data/dvbbs5.mdb
- SetConn = server.CreateObject (adodb.connection)
- connstr = provider = microsoft.jet.oledb.4.0; DataSource = & server.mappath (db)
- 'Jika server Anda menggunakan versi driver akses yang lebih lama, silakan gunakan metode koneksi berikut
- 'connstr = driver = {microsoft accessDriver (*. mdb)}; dbq = & server.mappath (db)
- Conn.openconnstr
- functionclosedatabase
- Conn.Close
- SetConn = tidak ada
- Fungsi endfungsi
- %>
12.SQL Database Connection:
- <%
- OptionExplicit
- Dimstartime, Endtime, Conn, Connstr, DB
- startTime = timer ()
- connstr = driver = {sqlserver}; server = hudenq-n11t33nb; uid = sa; pwd = xsfeihu; database = dvbbs
- SetConn = server.CreateObject (adodb.connection)
- Conn.openconnstr
- functionclosedatabase
- Conn.Close
- SetConn = tidak ada
- Fungsi endfungsi
- %>
13. Buka kode halaman web dengan keyboard:
- <ScriptLanguage = JavaScript>
- functionctlent (EventObject)
- {
- if ((event.ctrlkey && window.event.keycode == 13) || (event.altkey & window.event.keycode == 83)))
- {
- window.open ('situs web', '', '')
- }
- }
- </script>
Berikut adalah kode Ctrl+Enter dan Alt+S sendiri dan kemudian ubah.
14. Buat lapisan tidak ditimpa oleh kode kontrol:
- <Divz-Index: 2> <ObjectXXX> </POMPOBSE> </SEV> #FRONT
- <Divz-index: 1> <ObjectXXX> </POMPOBSE> </SEV> #back
- <Divid = Layer2Style = Posisi: Absolute; Top: 40; Lebar: 400px; Tinggi: 95px; z-index: 2>
- <TableHeight = 100%Lebar = 100%BGColor =#FF0000> <TR>
- <tdHeight = 100%lebar = 100%> </td> </tr> </bojle> <iframewidth = 0Height = 0> </iframe> </div>
- <Divid = Layer1Style = Posisi: Absolute; Top: 50; Lebar: 200px; Tinggi: 115px; z-index: 1>
- <iframeHeight = 100%lebar = 100%> </iframe> </div>
15.Dongwang Flash Code Iklan:
- <ObjectClassID = CLSID: D27CDB6E-AE6D-11CF-96B8-444553540000
- codeBase = http: //download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0
- Lebar = 468Height = 60>
- <paramname = movievalue = gambar/yj16d.swf>
- <paramname = kualitasvalue = tinggi>
- <embedsrc = gambar/dvbanner.swfquality = tinggi
- pluginspage = http: //www.macromedia.com/shockwave/download/index.cgi? p1_prod_version = shockwaveflash;
- ;;;;;;;;;;;;;
16.VBS Kode Jendela Popup:
- <scriptLanguage = vbscript>
- msgbox Anda belum mendaftar atau masuk ke forum, 0, forum butik
- location.href = login.asp
- </script>
17. Gunakan FSO untuk memodifikasi fungsi konten khusus file:
- functionFsoChange (nama file, target, string)
- DimoBjfso, objcountfile, filetempdata
- SetObjfso = server.createObject (scripting.filesystemObject)
- Setobjcountfile = objfso.opentextFile (server.mappath (nama file), 1, true)
- FiletempData = objcountfile.readall
- objcountfile.close
- FiletempData = ganti (filetempdata, target, string)
- Setobjcountfile = objfso.createTextFile (server.mappath (nama file), true)
- objcountfile.writeFiletempData
- objcountfile.close
- Setobjcountfile = tidak ada
- Setobjfso = tidak ada
- Fungsi endfungsi
18. Fungsi yang menggunakan FSO untuk membaca konten file:
- functionFsofileread (nama file)
- DimoBjfso, objcountfile, filetempdata
- SetObjfso = server.createObject (scripting.filesystemObject)
- Setobjcountfile = objfso.opentextFile (server.mappath (nama file), 1, true)
- Fsofileread = objcountfile.readall
- objcountfile.close
- Setobjcountfile = tidak ada
- Setobjfso = tidak ada
- Fungsi endfungsi
19. Fungsi yang menggunakan FSO untuk membaca baris file tertentu:
- functionfsolinedit (nama file, linenum)
- iflinenum <1thenexitfunction
- Dimfso, F, Temparray, Tempcnt
- setFSO = server.CreateObject (scripting.filesystemObject)
- IFNOTFSO.FileExists (Server.Mappath (fileName)) kemudian ExtFunction
- setf = fso.opentextFile (server.mappath (fileName), 1)
- IFNOTF.ATENDOFSTREAMTHEN
- tempcnt = f.readall
- f.close
- setf = tidak ada
- template = split (tempcnt, chr (13) & chr (10))
- iflinenum> ubund (temparray)+1then
- fungsi keluar
- kalau tidak
- Fsolinedit = temparray (linenum-1)
- endif
- endif
- fungsi endfungsi
20. Fungsi yang memodifikasi konten spesifik file menggunakan FSO:
- functionFsoChange (nama file, target, string)
- DimoBjfso, objcountfile, filetempdata
- SetObjfso = server.createObject (scripting.filesystemObject)
- Setobjcountfile = objfso.opentextFile (server.mappath (nama file), 1, true)
- FiletempData = objcountfile.readall
- objcountfile.close
- FiletempData = ganti (filetempdata, target, string)
- Setobjcountfile = objfso.createTextFile (server.mappath (nama file), true)
- objcountfile.writeFiletempData
- objcountfile.close
- Setobjcountfile = tidak ada
- Setobjfso = tidak ada
- Fungsi endfungsi
21. Fungsi yang menggunakan FSO untuk membaca konten file
:
- functionFsofileread (nama file)
- DimoBjfso, objcountfile, filetempdata
- SetObjfso = server.createObject (scripting.filesystemObject)
- Setobjcountfile = objfso.opentextFile (server.mappath (nama file), 1, true)
- Fsofileread = objcountfile.readall
- objcountfile.close
- Setobjcountfile = tidak ada
- Setobjfso = tidak ada
- Fungsi endfungsi
22. Fungsi yang menggunakan FSO untuk membaca baris file tertentu:
- functionfsolinedit (nama file, linenum)
- iflinenum <1thenexitfunction
- Dimfso, F, Temparray, Tempcnt
- setFSO = server.CreateObject (scripting.filesystemObject)
- IFNOTFSO.FileExists (Server.Mappath (fileName)) kemudian ExtFunction
- setf = fso.opentextFile (server.mappath (fileName), 1)
- IFNOTF.ATENDOFSTREAMTHEN
- tempcnt = f.readall
- f.close
- setf = tidak ada
- template = split (tempcnt, chr (13) & chr (10))
- iflinenum> ubund (temparray)+1then
- fungsi keluar
- kalau tidak
- Fsolinedit = temparray (linenum-1)
- endif
- endif
- fungsi endfungsi
Pada titik ini, saya akan memperkenalkannya kepada Anda dalam ringkasan kode ASP yang umum digunakan.