Discussion on the experience of ASP learning Introduction

Source: Internet
Author: User
Tags add object contains end include mdb database variable client
Getting Started Experience | Introduction to VBScript Grammar
VBScript statement is a kind of scripting language based on VB, mainly for Web server-side program development, we
Here are only a few simple statements, mainly the operation of a database of several common statements
Identification of the <1>.vbscript
<%
Statement
......
%>
<2> Define Variable Dim statement
<%
Dim a,b
a=10
b= "ok!"
%>
Note: The defined variable can be a numeric type, or it can be a character or other type of
<3> Simple Control Process statement
1. If Condition 1 Then
Statement 1
ElseIf Condition 2 Then
Statement 2
Else
Statement 3
endif
2.while conditions
Statement
Wend
3.for count=1 to n step m
Statement 1
Exit For
Statement 2
Next
Two. asp database simple Operation tutorial
<1&gt. Database connection (used to separate the connection file conn.asp)
<%
Set conn = Server.CreateObject ("ADODB. Connection ")
Conn. Open "Driver={microsoft Access DRIVER (*.mdb)}; Dbq= "& Server.MapPath (" \bbs\db1\user.mdb ")
%>
(Used to connect the User.mdb database in the bbs\db1\ directory)
<2> displaying database records
Principle: Display the record one by one in the database to the client browser, read out each record in the database in turn
If it's from beginning to end: Use loops and determine whether the pointer is used: not rs.eof
If it's from the end of the head: loop and determine if the pointer is to start using: Not Rs.bof

<!--#include file=conn.asp--> (contains conn.asp to open the User.mdb database in the bbs\db1\ directory)
<%
Set Rs=server. CreateObject ("Adodb.recordset") (Create a Recordset object)
Sqlstr= "SELECT * from"----> (the message is a data table in the database, that is, the data table in which the data you want to display is stored)
Rs.Open sqlstr,conn,1,3----> (indicates how the database is opened)
Rs.movefirst----> (move pointer to first record)
While not rs.eof----> (judging whether the pointer is to the end)
Response.Write (RS ("name"))----> (Display the Name field in the data table message)
Rs.movenext----> (move pointer to next record)
Wend----> (end of Loop)
------------------------------------------------------
Rs.close
Conn.close These sentences are used to close the database
Set rs=nothing
Set conn=nothing
-------------------------------------------------------
%>
Where the response object is the information that the server sends to the client browser
<3> Increase database records
Add database records to rs.addnew,rs.update two functions
<!--#include file=conn.asp--> (contains conn.asp to open the User.mdb database in the bbs\db1\ directory)
<%
Set Rs=server. CreateObject ("Adodb.recordset") (Create a Recordset object)
Sqlstr= "SELECT * from"----> (the message is a data table in the database, that is, the data table in which the data you want to display is stored)
Rs.Open sqlstr,conn,1,3----> (indicates how the database is opened)
Rs.addnew Add a new record
RS ("name") = "XX" passes the value of XX to the Name field
Rs.update Refresh the database
------------------------------------------------------
Rs.close
Conn.close These sentences are used to close the database
Set rs=nothing
Set conn=nothing
-------------------------------------------------------

%>
<4> Delete a record
Deleting database records is mainly used to rs.delete,rs.update
<!--#include file=conn.asp--> (contains conn.asp to open the User.mdb database in the bbs\db1\ directory)
<%
Dim name
Name= "XX"
Set Rs=server. CreateObject ("Adodb.recordset") (Create a Recordset object)
Sqlstr= "SELECT * from"----> (the message is a data table in the database, that is, the data table in which the data you want to display is stored)
Rs.Open sqlstr,conn,1,3----> (indicates how the database is opened)
-------------------------------------------------------
While not rs.eof
If Rs. ("name") =name Then
Rs.delete
Rs.update query whether the value of the Name field in the datasheet equals the value of the variable name "

[1] [2] [3] Next page



Related Article

Contact Us

The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion; products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the content of the page makes you feel confusing, please write us an email, we will handle the problem within 5 days after receiving your email.

If you find any instances of plagiarism from the community, please send an email to: info-contact@alibabacloud.com and provide relevant evidence. A staff member will contact you within 5 working days.

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.