asp数据库模板_ASP网页模板和数据库搭建问题急！！！！

A. asp网页中把access数据库中的信息填写到word模板中去

以下是vb操作word的例子 ,至于access可以用ado,,odbc去访问

Set wordapp = CreateObject("Word.Application") '创建word对象
Call wordapp.documents.Add("c:\mytmp.dot") '按查处创建文档
Set worddoc = wordapp.activedocument '获取活动文档句柄
wordapp.Visible = False

'打开数据库，数据表代码略，假设 rs为记录集

wordapp.activedocument.bookmarks("标签1").Select '定位插入点到“标签1”位置
wordapp.wordbasic.Insert (rs("字段名落")) '写入数据
worddoc.Saveas "c:\a.doc" '保存文档
worddoc.Close '关闭文档
Set worddoc = Nothing
wordapp.quit '关闭word
Set wordapp = Nothing

B. ASP网页模板和数据库搭建问题急！！！！

先由设计师设计网页，在设计图上标注相关信息（比如说颜色，有些颜色肉眼分辨不太清楚。）
再接下来是前台制作，由网页制作人员完成，这里要注意以下几点：
1、拿到设计稿后不要直接切割，然后到DW里直接敲代码，首先要认真研究，把握大致的框架图，做到心里有一个整体的构思，其中还可以揣摩一些设计的风格，有兴趣的朋友完全可以让自己走上设计的道路。（设计人员比制作人员工资高多了呀！无奈！）
2、用PS或者FW等绘图软件做一些实体的框架图，这个框架的目的是让你在制作的过程中能够快速而准确的进行制作和在以后的修改工作中能够高效，所以框架图要具体的标示出块状的id号或者类名，父与子的层次关系等。
3、接下来就是进行重要的一项----制作，也就是敲那该死的代码，在制作过程时，就要体现你对技术的熟练程度和技巧运用了，比如css的架构搭建，类名的选择和用CSS的简写达到高效的目的等技巧。
4、制作完成后，就是自己的检验了，争取做到制作出的网页同设计师给出的设计稿如出一辙。最后让自己的工作得到他们的肯定，当然改是难免的，不要急躁。（有些设计师太麻烦，总觉得你做出来的东西和他们的设计稿不符合！这时候你可以无视他们，直接找设计组的组长评理！还有一点就是向为网页制作人员应该和设计师搞好关系，不然工作中会遇到很多麻烦！汗一记！）

制作完成后就是程序员的工作了，制作后台程序，以方便管理网站！如果你在设计的时候用的id,name等都是乱起名字的，这时候可能需要你和程序员进行沟通，告诉他们这个id是什么，这个name是什么，麻烦！所以良好的命名习惯是必不可少的！
后台的页面设计没有什么讲究，越简单越好，当然简单不等于简陋。

这就是一个网站制作的流程！（当然，在设计之前要听取客户的意见，整个网站在表现什么风格，比如说：体现严谨，高科技，时尚等元素，这样设计师可以通过颜色表现这种风格！在设计稿定稿前要给客户过目，客户认可了才能进行制作！）
附：
CSS的命名规则
头：header
内容：content/containe
尾：footer
导航：nav
侧栏：sidebar
栏目：column
页面外围控制整体布局宽度：wrapper
左右中：left right center
登录条：loginbar
标志：logo
广告：banner
页面主体：main
热点：hot
新闻：news
下载：download
子导航：subnav
菜单：menu
子菜单：submenu
搜索：search
友情链接：friendlink
页脚：footer
版权：right
滚动：scroll
内容：content
标签页：tab
文章列表：list
提示信息：msg
小技巧：tips
栏目标题：title
加入：joinus
指南：guild
服务：service
注册：regsiter
状态：status
投票：vote
合作伙伴：partner

XHTML文件中id的命名
(1)页面结构
容器: container
页头：header
内容：content/container
页面主体：main
页尾：footer
导航：nav
侧栏：sidebar
栏目：column
页面外围控制整体布局宽度：wrapper
左右中：left right center
(2)导航
导航：nav
主导航：mainbav
子导航：subnav
顶导航：topnav
边导航：sidebar
左导航：leftsidebar
右导航：rightsidebar
菜单：menu
子菜单：submenu
标题: title
摘要: summary
(3)功能
标志：logo
广告：banner
登陆：login
登录条：loginbar
注册：regsiter
搜索：search
功能区：shop
标题：title
加入：joinus
状态：status
按钮：btn
滚动：scroll
标签页：tab
文章列表：list
提示信息：msg
当前的: current
小技巧：tips
图标: icon
注释：note
指南：guild
服务：service
热点：hot
新闻：news
下载：download
投票：vote
合作伙伴：partner
友情链接：link
版权：right

个人整理，希望对你有点用！

C. 下载了个asp.net的模板，mssql2005的，怎么使用呢

首先要看你的asp.net模板是在.net Framework那个版本上运行的，如果是2.0的，可以再windowsxp、windows2000和windows2003上运行，XP系统的话，需要自己去下载一个名为IIS的系统组件并且安装，现在装机的XP系统使用的.net Framework一般是1.1版本的，需要手动升级到2.0版本，去下载一个安装上即可，至于IIS怎么配置，网络一下又很多详细答案。
至于数据库的话，首先需要去下载mssql2005安装，无论你使用的是什么系统，都需要安装，然后如何配置sql2005同样也可以网络。
通常情况下，模板要连接sql的话，会提供sql的脚本文件，sql脚本文件一般使用.sql结尾，在你的sql server中执行sql脚本，创建模板需要的数据库和表，最后就是看看你的模板中有没有一个名为web.config的文件，用记事本打开，找到sql server用户名和密码以及数据库配置的地方，然后将你配置好的数据库用户名、密码和数据库名称填到相应的位置，尝试打开网页。
（PS：最后在web.config文件中配置的这个我只是猜测，模板不一定是这样做的，或许你需要写到代码中去也是有可能的，没看到你的模板，不知道具体是怎么配置）

D. 请问asp模板，带后台的，是 Access数据库，怎么在本地测试呀

搭建IIS，在iis中测试，要不你使用ASP专业调试工具.exe，到网上下载。

E. 创建一个数据库,用ASP怎么写

ASP内用SQL语句创建一个带密码的ACCESS数据库
纯编码实现Access数据库的建立或压缩
 <%
 '#######以下是一个类文件，下面的注解是调用类的方法################################################
 '# 注意：如果系统不支持建立Scripting.FileSystemObject对象，那么数据库压缩功能将无法使用
 '# Access 数据库类
 '# CreateDbFile 建立一个Access 数据库文件
 '# CompactDatabase 压缩一个Access 数据库文件
 '# 建立对象方法:
 '# Set a = New DatabaseTools
 '# by (萧寒雪) s.f.
 '#########################################################################################
 
 Class DatabaseTools
 
 Public function CreateDBfile(byVal dbFileName,byVal DbVer,byVal SavePath)
 '建立数据库文件
 'If DbVer is 0 Then Create Access97 dbFile
 'If DbVer is 1 Then Create Access2000 dbFile
 On error resume Next
 If Right(SavePath,1)<>"\" Or Right(SavePath,1)<>"/" Then SavePath = Trim(SavePath) & "\"
 If Left(dbFileName,1)="\" Or Left(dbFileName,1)="/" Then dbFileName = Trim(Mid(dbFileName,2,Len(dbFileName)))
 If DbExists(SavePath & dbFileName) Then
 Response.Write ("对不起，该数据库已经存在!")
 CreateDBfile = False
 Else
 Dim Ca
 Set Ca = Server.CreateObject("ADOX.Catalog")
 If Err.number<>0 Then
 Response.Write ("无法建立，请检查错误信息
 " & Err.number & "
 " & Err.Description)
 Err.Clear
 Exit function
 End If
 If DbVer=0 Then
 call Ca.Create("Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & SavePath & dbFileName)
 Else
 call Ca.Create("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & SavePath & dbFileName)
 End If
 Set Ca = Nothing
 CreateDBfile = True
 End If
 End function
 
 Public function CompactDatabase(byVal dbFileName,byVal DbVer,byVal SavePath)
 '压缩数据库文件
 '0 为access 97
 '1 为access 2000
 On Error resume next
 If Right(SavePath,1)<>"\" Or Right(SavePath,1)<>"/" Then SavePath = Trim(SavePath) & "\"
 If Left(dbFileName,1)="\" Or Left(dbFileName,1)="/" Then dbFileName = Trim(Mid(dbFileName,2,Len(dbFileName)))
 If DbExists(SavePath & dbFileName) Then
 Response.Write ("对不起，该数据库已经存在!")
 CompactDatabase = False
 Else
 Dim Cd
 Set Cd =Server.CreateObject("JRO.JetEngine")
 If Err.number<>0 Then
 Response.Write ("无法压缩，请检查错误信息
 " & Err.number & "
 " & Err.Description)
 Err.Clear
 Exit function
 End If
 If DbVer=0 Then
 call Cd.CompactDatabase("Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & SavePath & dbFileName,"Provider=Microsoft.Jet.OLEDB.3.51;Data
 Source=" & SavePath & dbFileName & ".bak.mdb;Jet OLEDB;Encrypt Database=True")
 Else
 call Cd.CompactDatabase("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
 SavePath & dbFileName,"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
 SavePath & dbFileName & ".bak.mdb;Jet OLEDB;Encrypt Database=True")
 End If
 '删除旧的数据库文件
 call DeleteFile(SavePath & dbFileName)
 '将压缩后的数据库文件还原
 call RenameFile(SavePath & dbFileName & ".bak.mdb",SavePath & dbFileName)
 Set Cd = False
 CompactDatabase = True
 End If
 end function
 
 Public function DbExists(byVal dbPath)
 '查找数据库文件是否存在
 On Error resume Next
 Dim c
 Set c = Server.CreateObject("ADODB.Connection")
 c.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbPath
 If Err.number<>0 Then
 Err.Clear
 DbExists = false
 else
 DbExists = True
 End If
 set c = nothing
 End function
 
 Public function AppPath()
 '取当前真实路径
 AppPath = Server.MapPath("./")
 End function
 
 Public function AppName()
 '取当前程序名称
 AppName = Mid(Request.ServerVariables("SCRIPT_NAME"),(InStrRev(Request.ServerVariables("SCRIPT_NAME") ,"/",-1,1))+1,Len(Request.ServerVariables("SCRIPT_NAME")))
 End Function
 
 Public function DeleteFile(filespec)
 '删除一个文件
 Dim fso
 Set fso = CreateObject("Scripting.FileSystemObject")
 If Err.number<>0 Then
 Response.Write("删除文件发生错误!请查看错误信息
 " & Err.number & "
 " & Err.Description)
 Err.Clear
 DeleteFile = False
 End If
 call fso.DeleteFile(filespec)
 Set fso = Nothing
 DeleteFile = True
 End function
 
 Public function RenameFile(filespec1,filespec2)
 '修改一个文件
 Dim fso
 Set fso = CreateObject("Scripting.FileSystemObject")
 If Err.number<>0 Then
 Response.Write("修改文件名时发生错误!请查看错误信息
 " & Err.number & "
 " & Err.Description)
 Err.Clear
 RenameFile = False
 End If
 call fso.CopyFile(filespec1,filespec2,True)
 call fso.DeleteFile(filespec1)
 Set fso = Nothing
 RenameFile = True
 End function
 
 End Class
 %>
 
 现在已可以压缩有密码的数据库，代码如下，但是压缩之后的数据库密码就没有了！如何解决？
 
 <%
 Const JET_3X = 4
 
 Function CompactDB(dbPath, boolIs97)
 Dim fso, Engine, strDBPath
 strDBPath = left(dbPath,instrrev(DBPath,"\"))
 Set fso = CreateObject("Scripting.FileSystemObject")
 
 If fso.FileExists(dbPath) Then
 Set Engine = CreateObject("JRO.JetEngine")
 
 If boolIs97 = "True" Then
 Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbpath, _
 "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password='XXXXXXXX';Data Source=" & strDBPath & "temp.mdb;" _
 & "Jet OLEDB:Engine Type=" & JET_3X
 Else
 Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password='XXXXXXXX';Data Source=" & dbpath, _
 "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & "temp.mdb"
 End If
 
 fso.CopyFile strDBPath & "temp.mdb",dbpath
 fso.DeleteFile(strDBPath & "temp.mdb")
 Set fso = nothing
 Set Engine = nothing
 
 CompactDB = "你的数据库, " & dbpath & ", 已经压缩成功!" & vbCrLf
 
 Else
 CompactDB = "数据库名称或路径不正确. 请重试!" & vbCrLf
 End If
 
 End Function
 %>

F. 怎么在asp一个页面完成数据库的初始化

01
新建网站双击桌面上的vs图标，打开软件。点击菜单栏中的【文件】---【新建】---在弹出的【新建网站】中，选择【.NET Framewordk 4】最高版本，【模板】选择【Visual C#】，【ASP.NET空网站】，然后点击【确定】按钮即可。
End

G. asp模板做的网页和数据库的问题

是啊,心急吃不了热豆腐,慢慢学吧,最起码要先了解和掌握最基本的东西.
你下载的源码文件不全,conn.asp一般是数据库连接文件. 要改asp网站,ACCESS还是装上的好,不然修改起来很不方便的,呵呵!

H. 服务器上如何设置才能使用ASP代码模板总是出现数据库连接错误。还要设置SQL吗

看一下ASP模板里的代码。连接的数据库地址，端口，库名和你的数据库是否一致

I. ASP.NET Datalist 模板下<asp:checkbox> （数据库取值为1）附上选中状态

下面方法稍微笨点，肯定可行，不知有没有简洁的办法：
假设你的数据库表中有一个用户权限表，设计如下
username(用户名) permissionname(权限名) value(1/0表示是否有该权限)
wnaggang add 0
wanggang view 1
wanggang delete 0
Liqiang add 0
Liqiang view 1
Liqiang delete 0

//当绑定DataList1中的每一项时的处理方法
protected void DataList1_ItemDataBound(objectsender,DataListItemEventArgse)
{
string username = Request.QueryString("Username");
DataTable UserPermissionDT = GetUserPermission(username);
foreach(DataRow row in UserPermissionDT.Rows)
{
string permissionname = row["permissionname"].ToString();
for(int i=0; i<DataList1.Items[i].Count;i++)
{
//遍历每个CheckBox, 注意CheckBox的命名要遵循 CheckBox0, CheckBox1 ....,
//每个CheckBox的文本内容要保持和数据库中权限名一致，也可以自己进行一致性映射
Checkbox cb = DataList1.Items[i].FindControl("CheckBox" + i.ToString) as CheckBox;
if(checkbox != null)
{
if(cb.Text==permissionname)
cb.Checked = (bool)(int.parse(row["Value"].ToString()));
}

}
}
}
///<summary>
///获取当前用户权限列表
///</summary>
///<paramname="usename">用户名</param>
///<returns></returns>
private DataTable GetUserPermission(string username)
{
//设置数据库连接串，可以从自己网站的DataSource读取
SqlConnectionconnection=newSqlConnection("DataSource=(local);InitialCatalog=AspNetStudy;PersistSecurityInfo=True;UserID=sa;Password=sa");
SqlCommandcommand=newSqlCommand("select username, permissionname, [value] from username where user name = @User");
command.Parameters.AddWithValue("@User",username);//添加SqlParameter参数
SqlDataAdapter adapter=newSqlDataAdapter(command);
DataTable data=newDataTable();
adapter.Fill(data);
return data;
}

asp数据库模板

与asp数据库模板相关的内容