Direkomendasikan: Asp+SQL2000 Prosedur Pagination Contoh 1. Mengembalikan prosedur tersimpan dari jumlah total set catatan: Buat prosedur dbo.recordcount (@tableName nvarchar (100),--database nama tabel @str, nvarchar (500),--Kondisi @Count @Count @Chare @' @ @ @ @£ @ @ @ @ @ @ @ @sheer.
- <%
- '--------------------------------------------------------------------
- 'Pendahuluan Program: Lengkapi penambahan, penghapusan, modifikasi, dan tampilan teks simpul yang ditentukan dalam dokumen XML dengan bahasa ASP
- 'Parameter entri: Tidak ada
- 'Parameter Ekspor: Tidak Ada
- '------------------------------------------------
- 'Nama Fungsi: ConnectXml ()
- 'Parameter Senterminasi: Nama file membutuhkan koneksi atau membuka nama file XML
- 'Parameter Ekspor: Tidak Ada
- 'Nilai Pengembalian: ConnectXml = 0, XMLMornTekDocument adalah objek yang berhasil memuat dokumen XML.
- 'ConnectXml <> 0, cetak strerror pesan kesalahan
- '------------------------------------------------
- Dimxmlmorntekdocument
- FunctionConnectXML (nama file)
- DimstrsourceFile
- strsourceFile = server.mappath (nama file)
- Setxmlmorntekdocument = server.createObject (microsoft.xmldom)
- Xmlmorntekdocument.async = false
- Xmlmorntekdocument.load (strsourceFile)
- ConnectXml = xmlmorntekdocument.parseeRror.ErrorCode
- ifxmlMornTekDocument.parseError.ErrorCode <> 0then
- strerror = <h2> kesalahan & xmlmorntekdocument.parseeRror.errorcode & </h2>
- StrerrorStrerrorStrerRorStrerRorerRor = Strerror & xmlmorntekdocument.parseeRror.reason & <br>
- strerrorStrerrorStrerrorstrerrorerror = strerror & xmlmorntekdocument.parseeRror.url & <br>
- StrerrorStrerrorStrerRorStrerRorerRor = strerror & xmlmorntekdocument.parseeRror.line & <br>
- strerrorStrerrorStrerrorStrerrorerror = strerror & xmlmorntekdocument.parseeRror.filepos & <br>
- StrerrorStrerRorStrerrorStrerrorerror = strerror & xmlmorntekdocument.parseError.srctext & <br>
- Response.WriteStrerror
- endif
- fungsi endfungsi
- '------------------------------------------------
- 'Nama fungsi: closexml ()
- 'Parameter entri: Tidak ada
- 'Parameter Ekspor: Tidak Ada
- '------------------------------------------------
- functionclosexml (xmlmorntekdocument)
- ifisObject (xmlmorntekdocument) lalu
- setxmlmorntekdocument = tidak ada
- endif
- fungsi endfungsi
- '------------------------------------------------
- 'Nama Fungsi: SelectXMLNODETEXT (ElementName)
- 'Parameter Entri: Nama Elemen ElementName
- 'Parameter Ekspor: Tidak Ada
- '------------------------------------------------
- functionsElectXmlnodetext (ElementName)
- ElementName = // & ElementName
- temp = xmlmorntekdocument.selectsinglenode (elementName) .text
- SelectXmLnOdeText = Server.htmlencode (TEMP)
- fungsi endfungsi
- '------------------------------------------------
- 'Nama Fungsi: InsertXMLNODETEXT (BefelementName, ElementName, ElementText)
- 'Parameter Entri: Nama elemen yang dimasukkan oleh elementName
- 'BefelementName memasukkan elemen sebelum nama elemen ini
- 'Teks ElementText dari elemen yang dimasukkan
- 'Parameter Ekspor: Tidak Ada
- '------------------------------------------------
- FunctionInsertXmlnodetext (befelementName, elementName, elementText)
- Dimbefelement, elemen
- setBefeLement = xmlmorntekdocument.selectsinglenode (// & befelementName)
- setelement = xmlmorntekdocument.createelement (elementName)
- Kesalahan
- element.text = elementText
- fungsi endfungsi
- '------------------------------------------------
- 'Fungsi Nama: UpdateXMLnOdeText (ElementName, NewElementText)
- 'Parameter Entri: Nama Elemen ElementName
- Teks baru 'NewElementText Element
- 'Parameter Ekspor: Tidak Ada
- '------------------------------------------------
- FunctionUpdatexMlnodetext (ElementName, NewElementText)
- dimelement
- setelement = xmlmorntekdocument.selectsinglenode (// & elementName)
- element.text = newElementText
- fungsi endfungsi
- '------------------------------------------------
- 'Nama fungsi: deletexmlnodetext (elementName)
- 'Parameter Entri: Nama Elemen ElementName
- 'Parameter Ekspor: Tidak Ada
- '------------------------------------------------
- functionDeletexmlnodetext (elementName)
- Xmlmorntekdocument.selectsinglenode (// & elementName) .text =
- fungsi endfungsi
- %>
Bagikan: ASP Klik untuk menyegarkan kode instance kode verifikasi Sebagian besar kode verifikasi di situs web adalah kode verifikasi gambar, seperti yang di bawah ini http://dwww.cn/books.asp. Pengguna dapat tetap di halaman untuk waktu yang lama, dan kode verifikasi dapat kedaluwarsa ketika pengiriman terakhir akhirnya dikirimkan. Jadi, Anda perlu menambahkan fungsi refresh. Kode Verifikasi: Nama Input = 'CheckImg' Type = 'Text' Class = 'Input' ID = 'Che