本文目录一览：

• 1、怎样做一个简单的带数据库的网站？
• 2、怎样制作一个有后台数据库的简单网站
• 3、如何制作带有数据库的网页

怎样做一个简单的带数据库的网站？

最简单的连接access数据库的方式

%

db="db.mdb" '数据库名字

Set Conn = Server.CreateObject("ADODB.Connection")

Connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Server.MapPath(db)

Conn.Open Connstr

%

然后建立一个html页，把需要提交的东西通过表单提交到处理页面，添加的书据库，就可以了。

怎样制作一个有后台数据库的简单网站

连接access数据库的方式

%

db="db.mdb" '数据库名字

Set Conn = Server.CreateObject("ADODB.Connection")

Connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Server.MapPath(db)

Conn.Open Connstr

%然后建立一个html页，把需要提交的东西通过表单提交到处理页面，添加的书据库，就可以了。

如何制作带有数据库的网页

这个问题问得有点雷人

首先要建立数据库

再要写打数据库的程序

比如:

%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%

%Session.CodePage=65001%

%

dim conn

dim connstr

dim db:db="db\31231123.mdb"

dim dbset:setdb = 1

Set conn = Server.CreateObject("ADODB.Connection")

select case setdb

case "1"

connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Server.MapPath(""db"")

case "2"

connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" Server.MapPath(""db"")

case "3"

connstr="driver={SQL Server};server=localhost;UID=sa;PWD=123;database=PW_SYS_data"

case else

connstr= "Dns=PW_SYS_Data"

end select

if err.number0 then

err.clear

set conn=nothing

response.write "wrong"

Response.End

else

conn.open connstr

if err then

err.clear

set conn=nothing

response.write "wrong"

Response.End

end if

end if

sub CloseConn()

conn.close

set conn=nothing

end sub

%

然后再写对数据进行操作的程序