1.������վԴ��
2.给个ASP网站整站系统下载地址,宾馆要带机票和酒店的...
3.急求pb考勤管理系统(pb+access)论文
4.如何找到软件的源代码
������վԴ��
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "">demo@demo.com</a></p>
</div>
</div>
</body>
</html>
css为:
body{
background-color:#c6;
margin: 0px;
padding:0px;
text-align:center;
font-size:px;
font-family:Arial, Helvetica, sans-serif;
}
#container{
position:relative;
margin:0px auto 0px auto;
width:px;
text-align:left;
}
div br{
display:none;
}
#globallink{
margin:0px; padding:0px;
}
#globallink ul{
list-style:none;
padding:0px; margin:0px;
}
#globallink li{
float:left;
text-align:center;
width:px;
}
#globallink a{
display:block;
padding:9px 6px px 6px;
background:url(button1.jpg) no-repeat;
margin:0px;
}
#globallink a:link, #globallink a:visited{
color:#a;
text-decoration:underline;
}
#globallink a:hover{
color:#FFFFFF;
text-decoration:underline;
background:url(button1_bg.jpg) no-repeat;
}
#left{
float:left;
width:px;
background-color:#FFFFFF;
margin:0px;
padding:0px 0px 5px 0px;
color:#d8ecff;
}
#left div{
background-color:#5ea6eb;
margin:0px 5px 0px 5px;
}
#weather{
background:url(weather.jpg) no-repeat -5px 0px;
margin:0px 5px 0px 5px;
background-color:#5ea6eb;
}
div#left #weather h3{
font-size:px;
padding:px 0px 0px px;
color:#FFFFFF;
background:none;
margin:0px;
}
div#weather ul{
margin:8px 5px 0px 5px;
padding:px 0px 8px 5px;
list-style:none;
}
#weather ul li{
background:url(icon1.gif) no-repeat 0px 6px;
padding:1px 0px 0px px;
}
#left div h3{
font-size:px;
padding:4px 0px 2px px;
color:#;
margin:0px 0px 5px 0px;
background:#bbddff url(icon2.gif) no-repeat 5px 7px;
}
#today{
padding:0px 0px px 0px;
}
#today ul{
list-style:none;
margin:-5px 0px 0px 0px;
padding:0px;
}
#today ul li{
text-align:center;
}
#today ul li img{
border:1px solid #FFFFFF;
margin:8px 0px 0px 0px;
}
#today ul li a:link, #today ul li a:visited{
color:#d8ecff;
text-decoration:none;
}
#today ul li a:hover{
color:#FFFF;
text-decoration:underline;
}
#middle{
background-color:#FFFFFF;
margin:0px 0px 0px 2px;
padding:5px 0px 0px 0px;
width:px; float:left;
}
#middle div{
margin-left:5px;
margin-right:5px;
position:relative;
}
#middle h3{
margin:0px; padding:0px;
height:px;
}
#middle h3 span{
display:none; /* 文字去掉,换成 */
}
#beauty{
margin:px 0px 0px 0px;
padding:0px;
}
#beauty h3{
background:url(picture_h1.gif) no-repeat;
}
#beauty ul,网站网站 #route ul{
list-style:none;
margin:8px 1px 0px 1px;
padding:0px;
}
#beauty ul li{
float:left;
width:px;
text-align:center;
}
#beauty ul li img{
border:1px solid #4ab0ff;
}
#route{
clear:both; margin:0px;
padding:5px 0px px 0px;
}
#route h3{
background:url(route_h1.gif) no-repeat;
}
#route ul li{
padding:3px 0px 0px px;
background:url(icon1.gif) no-repeat px 7px;
}
#route ul li a:link, #route ul li a:visited{
color:#e8a;
text-decoration:none;
}
#route ul li a:hover{
color:#;
text-decoration:underline;
}
#right{
float:left;
margin:0px 0px 1px 2px;
width:px;
background-color:#FFFFFF;
color:#d8ecff;
}
#right div{
position:relative;
margin-left:5px;
margin-right:5px;
background-color:#5ea6eb;
}
#right div h3{
font-size:px;
padding:4px 0px 2px px;
color:#;
margin:0px 0px 5px 0px;
background:#bbddff url(icon2.gif) no-repeat 5px 7px;
}
#map{
margin-top:5px;
}
#map p{
text-align:center;
margin:0px;
padding:2px 0px 5px 0px;
}
#map p img{
border:1px solid #FFFFFF;
}
#food{
padding-top:px;
}
#food ul, #life ul{
list-style:none;
padding:0px 0px px 0px;
margin:px px 0px px;
}
#food ul li, #life ul li{
background:url(icon1.gif) no-repeat 3px 9px;
padding:3px 0px 3px px;
border-bottom:1px dashed #EEEEEE;
}
#food ul li a:link, #food ul li a:visited, #life ul li a:link, #life ul li a:visited{
color:#d8ecff;
text-decoration:none;
}
#food ul li a:hover, #life ul li a:hover{
color:#;
text-decoration:none;
}
#life{
padding-top:px;
padding-bottom:5px;
margin-bottom:5px;
}
#footer{
background-color:#FFFFFF;
margin:1px 0px 0px 0px;
clear:both;
position:relative;
padding:1px 0px 1px 0px;
}
#footer p{
text-align:center;
padding:0px;
margin:4px 5px 4px 5px;
background-color:#5ea6eb;
}
#footer p a{
color:#FFFFFF;
text-decoration:none;
}
给个ASP网站整站系统下载地址,要带机票和酒店的...
网域旅游旅行社网站管理系统V.1 正式版
网域旅游旅行社网站管理系统,是一套适合各大中小型旅行社公司的asp全站程序源码,免费提供下载。正式版为成千上万的源码旅行社所接受,建立起安全,酒店稳定,模板适合的宾馆ano 飞控源码专业旅行社网站整站程序代码。旅行社网站必须有的网站网站旅游线路预订,宾馆酒店预订,源码火车票预订,酒店飞机票预订,模板旅游租车预订几大功能,宾馆是网站网站sscli源码旅行社网站的核心程序。旅游旅行社管理系统,源码如关于我社,详细介绍旅行社,最新动态发布有旅行社的最新旅游动态新闻,旅游预订线路,为旅行社网站实现电子商务化的重要功能,全后台添加管理旅游线路预订,线路搜索是网站程序方便游客搜索旅游线路。同时酒店预定系统,酒店详细介绍旅行社合作的宾馆酒店详细情况,并方便游客在网上远程预订.旅行社票务系统,有飞机票,模板火车票预订,实现网站电子售票。出租车,自驾车实现展示,预订旅行社的租车业务,免费下载本网站程序,其中本社导游,文字介绍旅行社的encryption源码各位导游形象,资料。旅行社网站程序的一个重要方面是景点介绍,本系统的景点风光,有旅行社所推出的旅游线路各个景色的详细介绍,图文并茂,使游客,在网站提前了解欣赏,游客在旅游中选择,其在网站后台,全智能管理。
急求pb考勤管理系统(pb+access)论文
文字自己想办法
一:变量说明
1:application :
test
2:窗体
login:登陆窗口
w_main:考勤管理系统的blog 源码主界面,选择操作
w_chuli:个人考勤记录处理
w_shengding:缺勤类型设定
w_tongji:员工考勤统计
w_yuangong:员工基本信息
3:数据窗口
dw_chuli1:个人考勤记录处理
dw_shengding:缺勤类型设定
dw_chuli:员工考勤统计
w_yuangong:员工基本信息
二:函数说明
一:application test中的函数
1. 函数名:test::open( )
作用:将test这个数据库注册为当前机器的用户的数据源
代码:
String ls_odbc //数据库名
String currdir = Space(), key//数据库“test”的完整路径
Environment env
string gs_currdir = GetCurrentDirectory()//得到运行程序的当前路径
GetEnvironment(env)
ls_odbc = "test"//数据库名为“test”
currdir=GetCurrentDirectory() + "\" + ls_odbc + ".mdb"//当前运行程序路径加上数据库名就是数据库“test”的完整路径
RegistryGet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources", ls_odbc, RegString!, key)
if key="" then
CHOOSE CASE env.OSType//判断操作系统的类型,注册响应的数据源的驱动
CASE Windows!//为Windows
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources", ls_odbc, RegString!, "Microsoft Access Driver (*.mdb)")
CASE WindowsNT!//为WindowsNT
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources", ls_odbc, RegString!, "Driver do Microsoft Access (*.mdb)")
CASE ELSE
END CHOOSE
// 将数据库test注册为用户的数据源
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "", RegString!, "")
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "DBQ", RegString!, "" + currdir )
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "Driver", RegString!, "odbcjt.dll")
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "DriverId" , ReguLong!, )
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "FIL" , RegString!, "MS Access;" )
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "SafeTransactions", RegString!, "0" )
RegistrySet("HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\" + ls_odbc, "UID" , RegString!, "" )
end if
open(login)// 打开登陆窗口
二:登陆窗口中的函数
1:函数名:login.open()
作用:连接到本机器数据源为test的数据库
代码:
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=test;UID=;PWD='"
connect;
if sqlca.sqlcode<>0 then
Messagebox("错误!,无法连接数据库:",sqlca.sqlerrtext)
halt close
end if
2:函数名:cb1。Clicked() 即点击登陆按钮的事件
作用:当用户输入帐号和密码后,判断是否在“操作员表”中 ,存在就打开考勤管理系统主界面
代码:
//定义两个变量
string password,usename
// 数据库连接参数
//检索用户名和密码记录
SELECT 操作员表.用户名,
操作员表.密码
INTO :usename,
:password
FROM 操作员表
WHERE 操作员表.用户名 = :sle_1.text ;
//判断用户输入的用户名是否正确
if sle_1.text="" or sle_2.text="" then
messagebox("错误!","用户名或密码不能为空!",exclamation!,ok!,2)
else
if usename=sle_1.text and password=sle_2.text then
messagebox("通过验证!","用户名和密码正确,欢迎您使用本系统!",Information!,ok!,2)
open(w_main)// 打开考勤管理系统主界面
close(parent)
else
messagebox("错误!",筹码 源码"用户名或密码错误,请重新输入!",exclamation!,ok!,2)
end if
end if
3:函数名:cb2。Clicked() 即点击取消按钮的事件
作用:关闭窗口
代码:
close(parent)
二:主窗口中的函数
1:函数名:rb_1。Clicked()
作用:关闭当前窗口,打开员工基本信息窗口
代码:open(w_yuangong)
close(parent)
2:函数名:rb_2。Clicked()
作用:关闭当前窗口,打开考勤信息处理窗口
代码:open(w_chuli)
close(parent)
3:函数名:rb_3。Clicked()
作用:关闭当前窗口,打开缺勤类型设定窗口
代码:open(w_shengding)
close(parent)
4:函数名:rb_4。Clicked()
作用:关闭当前窗口,打开员工考勤统计窗口
代码:open(w_tongji)
close(parent)
5:函数名:pb_1。Clicked()
作用:关闭当前窗口
代码:close(parent)
三:考勤信息处理窗口中的函数
1:函数名:open( )
作用:将数据窗口和数据库连接,并且显示数据库存在的数据
代码:dw_1.settransobject(sqlca)
dw_1.retrieve()
2:函数名:pb_1。Clicked()
作用:插入一条新记录
代码:dw_1.insertrow(0)
3:函数名:pb_2。Clicked()
作用:删除一条当前记录
代码:dw_1.deleterow(0)
4:函数名:pb_3。Clicked()
作用:向数据库提交插入,删除和修改的操作,如果成功就发到数据库
代码:
integer returncode
returncode=dw_1.update()
if returncode>0 then
commit using sqlca;
else
rollback using sqlca;
end if
4:函数名:pb_4。Clicked()
作用:关闭当前窗口,回到主界面
代码:
open(w_main)
close(parent)
四:缺勤类型设定窗口中的函数
1:函数名:open( )
作用:将数据窗口和数据库连接,并且显示数据库存在的数据
代码:dw_1.settransobject(sqlca)
dw_1.retrieve()
2:函数名:pb_1。Clicked()
作用:插入一条新记录
代码:dw_1.insertrow(0)
3:函数名:pb_2。Clicked()
作用:删除一条当前记录
代码:dw_1.deleterow(0)
4:函数名:pb_3。Clicked()
作用:向数据库提交插入,删除和修改的操作,如果成功就发到数据库
代码:
integer returncode
returncode=dw_1.update()
if returncode>0 then
commit using sqlca;
else
rollback using sqlca;
end if
4:函数名:pb_4。Clicked()
作用:关闭当前窗口,回到主界面
代码:
open(w_main)
close(parent)
五:员工基本信息窗口中的函数
1:函数名:open( )
作用:将数据窗口和数据库连接,并且显示数据库存在的数据
代码:dw_1.settransobject(sqlca)
dw_1.retrieve()
2:函数名:pb_1。Clicked()
作用:插入一条新记录
代码:dw_1.insertrow(0)
3:函数名:pb_2。Clicked()
作用:删除一条当前记录
代码:dw_1.deleterow(0)
4:函数名:pb_3。Clicked()
作用:向数据库提交插入,删除和修改的操作,如果成功就发到数据库
代码:
integer returncode
returncode=dw_1.update()
if returncode>0 then
commit using sqlca;
else
rollback using sqlca;
end if
4:函数名:pb_4。Clicked()
作用:关闭当前窗口,回到主界面
代码:
open(w_main)
close(parent)
六:员工考勤统计窗口中的函数
1:函数名:open( )
作用:将数据窗口和数据库连接,并且显示数据库存在的数据
代码:dw_1.settransobject(sqlca)
dw_1.retrieve()
2:函数名:ddlb_1。Selectchange()
作用: 改变数据窗口中数据的大小
代码:dw_1.modify('DataWindow.Zoom = '+ trim(ddlb_1.text))
3:函数名:cb1。Clicked()
作用: 回到数据窗口中上一页
代码:dw_1.scrollpriorpage()
4:函数名:cb2。Clicked()
作用: 回到数据窗口中下一页
代码:dw_1.scrollnextpage()
5:函数名:cb3。Clicked()
作用: 打印数据窗口
代码:dw_1.print()
6:函数名:cb4。Clicked()
作用: 打印设置
代码:printsetup()
7:函数名:cb5。Clicked()
作用: 打印预览
代码:
dw_1.Modify("DataWindow.Print.Orientation = '1'") //横向
dw_1.Modify("DataWindow.Print.Orientation = '2'") //纵向
dw_1.Modify("DataWindow.Print.Preview = yes")
dw_1.Modify("DataWindow.Print.Preview.Rulers = yes")
dw_1.modify('DataWindow.Print.Preview.Zoom = '+ trim(ddlb_1.text))
8:函数名:cb5。Clicked()
作用: 打印预览
9:函数名:ddlb_2。Selectchange()
作用: 改变打印预览窗口的大小
代码:
dw_1.modify('DataWindow.Print.Preview.Zoom = '+ trim(ddlb_2.text))
:函数名:cb6。Clicked()
作用: 将数据窗口中的数据保存为表格形式的文件
代码:string ls_path, ls_file
int li_rc
ls_path = sle_1.Text
li_rc = GetFileSaveName ( "Select File", ls_path, ls_file, "xls", "*.xls,*.xls" )
//得到路径名
IF li_rc = 1 Then
OLEObject ole_object , ole_workbooks
ole_object = CREATE OLEObject
//创建Excel对象
IF ole_object.ConnectToNewObject("Excel.Application") <> 0 THEN
MessageBox('OLE错误','OLE无法连接!')
return
END IF
ole_object.workbooks.add
ole_object.Visible = True
ole_workbooks = ole_object.Worksheets(1)
ole_workbooks.cells(1,1).value="员工号"
ole_workbooks.cells(1,2).value="时间"
ole_workbooks.cells(1,3).value="天数"
ole_workbooks.cells(1,4).value="类型"
ole_workbooks.cells(1,5).value="原因"
long l_row
for l_row = 2 to dw_1.rowcount()+1
ole_workbooks.cells(l_row,1).value=dw_1.getitemstring(l_row - 1,1)
ole_workbooks.cells(l_row,2).value=dw_1.getitemstring(l_row - 1,2)
ole_workbooks.cells(l_row,3).value=dw_1.getitemstring(l_row - 1,3)
ole_workbooks.cells(l_row,4).value=dw_1.getitemstring(l_row - 1,4)
ole_workbooks.cells(l_row,5).value=dw_1.getitemstring(l_row - 1,5)
next
ole_workbooks.SaveAs ( ls_path)
ole_object.quit()
Ole_Object.DisConnectObject()
Destroy Ole_Object
destroy ole_workbooks
messagebox("!","文件保存到"+ ls_path)
End If
:函数名:sel。modify()
作用: 将数据窗口中的数据按输入的员工号显示
代码:
string emp_no
string condition
if sle_1.text <> "" then
emp_no=trim(sle_1.text)
condition="emp_no="+"'"+ emp_no+"'"
dw_1.setfilter( condition)
filter(dw_1)
dw_1.retrieve()
end if
如何找到软件的源代码
源码就是指编写的最原始程序的代码。运行的软件是要经过编写的,程序员编写程序的过程中需要他们的“语言”。音乐家用五线谱和音符,建筑师用图纸和笔,那程序员的工作的语言就是“源码”了。
人们平时使用软件时就是程序把“源码”翻译成我们可直观的形式表现出来供我们使用的。[1]
任何一个网站页面,换成源码就是一堆按一定格式书写的文字和符号,但我们的浏览器帮我们翻译成眼前的模样了