Common code for ASP programming
1. asp connect with Access database:
Copy Code code as follows:
<%
Dim conn,mdbfile
Mdbfile=server.mappath ("database name. mdb")
Set Conn=server.createobject ("Adodb.connection")
Conn.Open "Driver={microsoft Access Driver (*.mdb)};uid=admin;pwd= database password; dbq=" &mdbfile
%>
The most common string functions for ASP and access connections
Copy Code code as follows:
Call Openconn
Sub Openconn ()
On Error Resume Next
If DatabaseType = 1 Then
connstr= "Provider = SQLOLEDB; User ID = "& Datauser &"; Password = "& DATABASEPSW &"; Initial Catalog = "& DatabaseName &"; Data Source = "& DataServer &";
Else
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & Server.MapPath (DBPath)
End If
Set conn = Server.CreateObject ("ADODB. Connection ")
Conn.Open ConnStr
If ERR Then Err.Clear:Set conn = Nothing:Response.Write database connection error, check the database parameter settings in the Conn.asp file. ": Response.End
Collcetconnstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & Server.MapPath (Collectdbpath)
End Sub
2. asp and SQL database connection:
<%
Dim conn
Set Conn=server.createobject ("Adodb.connection")
Con.open "Provider=sqloledb;data source=sql server name or IP address; Uid=sa; pwd= database password; database= database name
%>
To set up a Recordset object:
Set Rs=server.createobject ("Adodb.recordset")
Rs.Open SQL statement, conn,3,2
3. SQL Common Command use method:
(1) Data record filtering:
Sql= "SELECT * from data table where field name = field value order By field name"
Sql= "SELECT * from data table where field name like '% field value ' Order By field name '
Sql= "SELECT top * from data table where field name order By field name"
Sql= "SELECT * from data table where field name in (' Value 1 ', ' Value 2 ', ' Value 3 ')"
Sql= "SELECT * from data table where field name between value 1 and value 2"
(2) Update data records:
sql= "Update data table set field name = field value where Condition expression"
Sql= Update data Table set field 1= value 1, field 2= value 2 ... field n= value n Where Condition expression "
(3) Delete data records:
Sql= "Delete from data table where condition expression"
Sql= "Delete from data table" (delete all records from datasheet)
(4) Adding data records:
sql= INSERT into Data table (field 1, Field 2, Field 3 ...) valuess (value 1, value 2, value 3 ...)
Sql= INSERT INTO Target datasheet SELECT * from source datasheet (add a record from the source datasheet to the destination datasheet)
(5) Data record statistic function:
AVG (field name) to derive a table column average
Count (*| field name) statistics on the number of data rows or the number of data rows that have a value for a column
Max (field name) gets the maximum value of a table column
Min (field name) gets the smallest value of a table column
sum (field name) adds the value of the data bar
How to reference the above function:
Sql= "Select sum (field name) as Alias from data table where condition expression"
Set Rs=conn.excute (SQL)
Using RS ("Alias") to obtain the value of the unified, other functions using the same.
(5) The establishment and deletion of the data table:
CREATE Table datasheet Name (field 1 type 1 (length), Field 2 type 2 (length) ...)
Example: CREATE TABLE tab01 (name varchar, datetime default Now ())
drop table datasheet name (permanently deletes a data table)
(6) Method of Recordset object:
Rs.movenext moves the record pointer down one row from the current position
Rs.moveprevious move the record pointer up one row from the current position
Rs.movefirst move the record pointer to the first row of the datasheet
Rs.movelast move the record pointer to the last row of the datasheet
Rs.absoluteposition=n move the record pointer to the nth row of the datasheet
Rs.absolutepage=n move the record pointer to the first row of page N
Rs.pagesize=n set every page to N records
Rs.pagecount returns the total number of pages based on pagesize settings
Rs.recordcount returns the total number of records
RS.BOF returns whether the record pointer is over the first end of the datasheet, True indicates Yes, FALSE is no
Rs.eof returns whether the record pointer is over the end of the datasheet, True indicates Yes, FALSE is no
Rs.delete deletes the current record, but the record pointer does not move down
Rs.addnew add records to the end of the datasheet
Rs.update Update datasheet Record
To determine the data is a digital type
If not IsNumeric (Request (field name)) Then
Response.Write "Not Numbers"
Else
Response.Write "Number"
End If
