A. www.code123.net这个网址做的不错,源码哪里可以下啊
你说的是这个网站做的不错,还是网站里面的内容呢?
如果是网站做的不错的话,想下载源码这个你就要咨询一下这个网站的负责人咯,也许他会同意你的!
B. asp程序实现简单的注册,登录网页的源代码
1,(index.asp 用户登陆页面)
<!-- #include file="conn.asp" -->
<!-- blog.soowooo.cn 悠悠长假期 -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>会员</title>
<style type="text/css">
<!--
body,td,th {
font-family: 宋体;
font-size: 14px;
}
-->
</style>
</head>
<body>
<center>
<p>会员注册系统</p>
<form name="form1" method="post" action="login.asp">
<table width="34%" border="0">
<tr>
<td width="33%" height="30">用户名:</td>
<td width="67%" height="30"><input name="username" type="text" id="username" size="15"></td>
</tr>
<tr>
<td height="30">密 码:</td>
<td height="30"><input name="password" type="password" id="password" size="15"></td>
</tr>
<tr>
<td colspan="2" align="center"><input type="submit" name="Submit" value="确定">
<input type="reset" name="Submit" value="重置"></td>
</tr>
<tr>
<td colspan="2"><a href="reg.asp" target="_self">注册</a></td>
</tr>
</table>
</form>
</center>
</body>
</html>
2,(login.asp 用户数据处理文件)
<!-- #include file="conn.asp" -->
<%
'打开数据库判断用户是否存在,info为表名,username为字段名
set rsc=server.createobject("adodb.recordset")
sqlc="select * from info where username='"&request.Form("username")&"' and password='"&request.Form("password")&"'"
rsc.open sqlc,conn,1,1
session("username")=rsc("username")
session("password")=rsc("password")
session.Timeout=30
set rsc=nothing
response.Redirect("change.asp")
'如果用户不存在,session("username")为空
%>
3,(change.asp 用户信息修改页面)
<!-- #include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改</title>
<style type="text/css">
<!--
body,td,th {
font-size: 14px;
}
-->
</style></head>
<center>
<body>
<br>
<%
set rsc=server.createobject("adodb.recordset")
sqlc="select * from info where username='"&session("username")&"' and password='"&session("password")&"'"
rsc.open sqlc,conn,1,1
nr=rsc("password")
username=rsc("username")
password=rsc("password")
sex=rsc("sex")
qq=rsc("qq")
mail=rsc("mail")
add=rsc("add")
personalinfo=rsc("personalinfo")
vv=rsc("ntime")
set rsc=nothing
if nr="" then
response.Redirect("index.asp")
end if
if strcomp(nr,request.Form("password"))=0 then
response.Write("欢迎你!"&request.Form("username"))
response.Write("你是在"&vv&"注册的")
session("username")=request.Form("username")
end if
if session("username")="" then
response.Redirect("index.asp")
end if
%>
<form name="form1" method="post" action="change.asp?ac=ch">
<table width="39%" height="105" border="0" >
<tr>
<td width="27%" height="30">用户名:</td>
<td width="73%" height="30"><input name="username" type="text" id="username" value="<%=username%>">
*</td>
</tr>
<tr>
<td height="30">密 码:</td>
<td height="30"><input name="password" type="text" id="password" value="<%=password%>">
*</td>
</tr>
<tr>
<td height="30">性 别:</td>
<td height="30"><input name="sex" type="text" id="sex" value="<%=sex%>"></td>
</tr>
<tr>
<td height="30">QQ:</td>
<td height="30"><input name="qq" type="text" id="qq" value="<%=qq%>"></td>
</tr>
<tr>
<td height="30">Mail:</td>
<td height="30"><input name="mail" type="text" id="mail" value="<%=mail%>"></td>
</tr>
<tr>
<td height="30">地 址:</td>
<td height="30"><input name="add" type="text" id="add" value="<%=add%>"></td>
</tr>
<tr>
<td>介绍</td>
<td><textarea name="personalinfo" cols="30" rows="6" id="personalinfo"><%=personalinfo%></textarea></td>
</tr>
<tr>
<td> </td>
<td><input type="submit" name="Submit" value="修改">
<a href="change.asp?se=y" target="_self">退出系统</a></td>
<% if strcomp(request.QueryString("se"),"y")=0 then
session("username")=""
response.Redirect("index.asp")
end if
%>
</tr>
</table>
</form>
<%
if strcomp(request.QueryString("ac"),"ch")=0 then
set rs=server.createobject("adodb.recordset")
sql="select * from info where username='"&session("username")&"'"
rs.open sql,conn,1,3
rs("username")=request.Form("username")
rs("password")=request.Form("password")
rs("mail")=request.Form("mail")
rs("sex")=request.Form("sex")
rs("qq")=request.Form("qq")
rs("add")=request.Form("add")
rs("personalinfo")=request.Form("personalinfo")
rs.update
set rs=nothing
response.Write("修改完成!")
end if
%>
</body>
</center>
</html>
4,(reg.asp 新用户注册页面)
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>用户注册</title>
<style type="text/css">
<!--
body,td,th {
font-family: 宋体;
font-size: 14px;
}
-->
</style>
</head>
<body>
<center>
用户注册<br>
<%
=request.QueryString("msg")
%>
<form name="form1" method="post" action="addnewdata.asp?ac=adser">
<table width="39%" height="105" border="0" >
<tr>
<td width="27%" height="30">用户名:</td>
<td width="73%" height="30"><input name="username" type="text" id="username">
*</td>
</tr>
<tr>
<td height="30">密码:</td>
<td height="30"><input name="password" type="password" id="password">
*</td>
</tr>
<tr>
<td height="30">确定密码:</td>
<td height="30"><input name="password2" type="password" id="password2">
*</td>
</tr>
<tr>
<td height="30">性别:</td>
<td height="30"><input name="sex" type="text" id="sex"></td>
</tr>
<tr>
<td height="30">QQ:</td>
<td height="30"><input name="qq" type="text" id="qq"></td>
</tr>
<tr>
<td height="30">Mail:</td>
<td height="30"><input name="mail" type="text" id="mail"></td>
</tr>
<tr>
<td height="30">地址:</td>
<td height="30"><input name="add" type="text" id="add"></td>
</tr>
<tr>
<td>个人介绍</td>
<td><textarea name="personalinfo" cols="30" rows="6" id="personalinfo"></textarea></td>
</tr>
<tr>
<td> </td>
<td><input type="submit" name="Submit" value="提交"></td>
</tr>
</table>
</form>
</center>
</body>
</html>
5,(addnewdata.asp 新用户注册数据处理文件)
<!-- #include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>成功</title>
</head>
<body>
<%
ac=request.QueryString("ac")
msg="注册错误信息"
if request.Form("username")="" then
msg=msg&"<br>"&"用户名不能为空"
end if
if strcomp(cstr(request.Form("password")),cstr(request.Form("password2")))<>0 then
msg=msg&"<br>"&"两次密码输入不同"
end if
if len(request.Form("password"))<6 then
msg=msg&"<br>"&"密码太简单"
end if
if strcomp(msg,"注册错误信息")>0 then
response.Redirect("reg.asp?msg="&msg)
end if
if ac="adser" then
set rsc=server.createobject("adodb.recordset")
sql="select * from info where username='"&request.Form("username")&"'"
rsc.open sql,conn,1,1
ck=rsc("username")
set rsc=nothing
if ck<>"" then
msg=msg&"<br>"&"用户名被人注册"
response.Redirect("reg.asp?msg="&msg)
end if
dsql="select * from info where id is null"
set rs=server.createobject("adodb.recordset")
rs.open dsql,conn,1,3
rs.addnew
rs("username")=request.Form("username")
rs("password")=request.Form("password")
rs("mail")=request.Form("mail")
rs("sex")=request.Form("sex")
rs("qq")=request.Form("qq")
rs("add")=request.Form("add")
rs("personalinfo")=request.Form("personalinfo")
rs("ntime")=now
rs.update
set rs=nothing
%>
<center>
<a href="index.asp" target="_self">注册成功,点击登陆</a>
</center>
<%
end if
%>
</body>
</html>
6,(conn.asp 数据库连接文件)
<%
'连接数据库开始
dim conn,rs,sql
on error resume next
dbpath=server.mappath("userinfo.mdb")
set conn=server.createobject("adodb.connection")
conn.open "PROVIDER=Microsoft.jet.OLEDB.4.0;data source="
'创建记录对象
set rs=server.createobject("adodb.recordset")
%>
7,(userinfo.mdb ACCESS 数据库)
在ACCESS中建一个表,然后在这个表中建立字段名称
表名:info
字段名称 数据类型
id 自动编号
username 文本
password 文本
sex 文本
quest 文本
qq 文本
mail 文本
personalinfo 文本
ntime 文本
C. 网上书店系统源码,网上书店 源码 asp,书店源码, 书店asp源码下载,书店网站源码,正在急寻免费正式版
网上书店系统源码,网上书店 源码 asp,书店源码, 书店asp源码下载,书店网站源码,正在急寻免费正式版
搂主放心,我有一套网上书店,非常漂亮的,功能又特别强大的,现免费给网友下载
这是程序说明
软件名称:网上书店asp网站管理系统源码正式版
软件版本:V2008
建议分类:源码下载/ASP源码/电子商务
演示网站:http://www.aspcom.cn/wsgw
电信下载地址:http://www.aspcom.cn/dow/wsgw.rar
软件容量:7000KB
软件类型:简体中文/免费版
应用平台:Win9x/Me/NT/2000/XP/asp+access
界面预览:http://www.aspcom.cn/dow/wsgw.jpg
软件介绍:后台管理: admin/login.asp 帐户/密码:admin/admin
网上书店asp网站管理系统源码正式版(广州购物系统),由专业网上购物公司开发的一套专业网上购物系统,网上开店系统,是中国最具营
销潜力的专业网上购物网站管理系统源码。让客户只需花几百元就可以拥有功能强大的网上购物,是商家开店最佳系统!真正做到只会打字就可
以建立自己独立的网上购物网站。是您网上开店首选购物程序。 轻松使用电子商务网站系统,网上销售购物系统,使创业者成功。开店商城系
统(也称为购物系统,网上商店系统),是方便企业及个人商家在网上产品展示及在线购物电子商务的系统软件。网上购物网站管理系统是书店
企业及个人开展电子商务的一种形式,开店系统则是网上开店及产品展示的良好工具。有了开店商城系统,再加个域名和空间,就可以很方便
地建立属于您自己的网上商店了。网上购物网站系统正式版为客户提供域名注册,空间租用及网站推广等系列电子商务服务,让您无开店之忧
,让您轻松网上开店。本系统适合于如下关键字的人员使用:“网上购物网站管理系统源码,网上购物论坛,网上购物商城,网上购物商城购物系
统,网上购物系统,在线购物系统,购物系统,购物软件,网上购物,网上购物商城,电子购物系统,购物车系统,asp 购物系统,asp,虚拟购物系统,购
物平台,购物系统下载,购物软件下载。网上购物网站系统正式版是基于WEB开发的大型购物系统。它以构建电子商务网站为目标,由前台购物、
后台管理、在线支付三大部分组成。各大部分完美结合,都有着最为完善和强大的功能,最大限度的满足客户在线购物和网站管理员管理的需
求。系统满足各个级别用户购建电子商务平台的需要。是构建各种大中小电子商务购物网站的首选系统!不需要专门编程,半天便能建立门户
级专业电子商务购物网站。购物系统轻松管理维护,经济效率实实在在看得见。如不会本机调试本系统,请查看《IIS安装使用说明书》
网上购物网站管理系统源码前台功能栏目
分类浏览商品或使用搜索工具查找商品;
可按价格、商品分类、关键字搜索商品
可打印订单的详细信息以及电子邮件通知;
保存购物车,查看购物车,清空购物车
查看已经提交的订单;
会员注册、享受会员价格;
会员登录;
市场价,会员价和VIP会员价的比较;
为朋友订购商品(送礼物的好办法哦);
完整的客户服务中心
新品上架展示区,推荐商品展示区,特价商品展示区,销售排行展示区,关注排行展示区
阅读、发表商品评论信息并显示
顾客可选择多种网上支付方式
顾客可选多种运输方式并在结帐时自动加入所需费用
同类商品显示
商品分类的名称及图片显示
显示商品详细介绍以及相关产品
零售价,会员价VIP会员价显示
商品显示可按任何字段排序
查看已经提交的订单
客户留言
网上购物网站管理系统源码后台管理特征:
店主管理--商店管理--强大的后台管理系统
添加、删除、修改,移动商品分类
在线添加、(批量)删除、修改商品
商品价格分市场价格,会员价格和VIP会员价格
在线订单查询,订单处理、发布订单处理跟踪信息
每条订单自动发送电子邮件给顾客和商店管理员
查看、删除、修改会员资料功能
记录会员下单购买情况和登录情况
前台会员分非注册会员、普通会员和VIP会员
管理员分三个不同的权限等级, 使管理商城更加灵活
统计所有分类中商品数,并在前台显示
商场购物卷积分功能
添加修改首页新闻,首页公告
编辑删除商品评论,客户留言
探测远程服务器,空间查看
广告系统管理
管理网站文字友情链接和图片友情链接
在线设定汇款方式、支付方式、购物流程、注册条约、交易条款、常见问题、法律版权信息、运输方式、保密安全、售前售后服务、工作时间
D. 企业网站源码一般都是在哪找的
大多数都是在二当家的素材网上面找的,很齐全的。
做网站就可以到站长网下载源码,网站要推广给客户一定要选择好稳定和快速的空间!
我现在就一直使用速度快的空间,是在(淘003主机)那里买,速度非常快啊。收录排名都是很不错!
数据库不一定在网站目录下.....
W78 cms 很好 建议使用
网上很多好用的网站源码,比如:pageadmin系统、shopex系统、discua系统,这几款网上很多人用的
没有邮箱啊???
比如pageadmin系统、帝国系统、shopex系统这些
网上很多免费的企业网站源码下载的,例如:pageadmin网站管理系统、discuz系统、shopex系统等都不错的,直接下载安装就可以使用了,功能全面,使用没有限制。
安装个wordpress,然后搜一下wordpress企业模板主题,网上一大把,所谓企业网站,很多情况下就是一大幻灯配个新闻列表。
MetInfo企业网站管理系统2.0
专为企业设计的网站管理系统,操作方面快捷
PHP+MYSQL架构,安全高速,完全开源
界面语言完全自定义,可见即可改,支持全球各种语言
灵活的栏目配置功能,可在后台配置自己的个性化网站
内置SEO搜索引擎优化机制,为您打造具有营销力的网站
静态页面生成功能,让您的网站更容易被搜索引擎收录
E. Windows XP系统源码 下载地址
《Windows XP系统》网络网盘免费资源下载
链接:
WindowsXP是微软公司研发的计算机操作系统,于2001年10月25日正式发布。其名字中“XP”的意思来自英文中的“体验(Experience)”。
F. 有哪些值得推荐的源码共享网站
网站源码资源当然首选站长源码下载了,主要源码安全系数要高点,最主要是免费,还有就是一些商业源码分享站了可能会要积分才能下载了,比如商业源码,A5源码,源码...
G. linux系统的源代码哪里可以下载
如果要下载指定版本的内核源代码,就去官网下载,地址:
http://www.kernel.org/
如果要查看本机(某个发行版的内核源代码),可以在目录
/usr/src/kernels下面找到。
如果要查看某些安装文件的源代码,可以使用命令查看该文件
的安装源,以查看cat源码为例,命令:rpm -qif `which cat`
之后会有相关信息打印出来,访问其源码路径,下载即可。
附本人博客“获取Linux命令源代码的方法”链接如下:
http://blog.csdn.net/shallowgrave/article/details/7854548