⑴ asp网站源代码
在局域网里搭建一个web服务器,固定该机的内网IP,要win2003系统,XP的不行,因为IIS连接数有限制,搭建好,把版程序放上去,其权他电脑直接输入这台服务器的IP地址就可以访问了。如果要外网登陆,要先把局域网的路由器映射到这台服务器上,一般是在路由器里设置DMZ主机,然后填上服务器的内网IP。外网访问时是要输入外网的IP,可以上IP138查询到。如果你们宽带是固定IP的话申请个域名指向这个IP就行了,如果不是固定IP,就需要使用动态域名,现在常用的是 “花生壳”
⑵ 求一套最简单的ASP 购物网站源代码!!!
哇,我正好有个简单的,要的话HI我.
⑶ 求一个用ASP做出来的简单的网页源代码,急!!!!!!
如果user表存在并且设计好。假设字段分别为id,name,classname那么如下代码即可。name=request("name")classname=request("classname")set rs=server.createobject("adodb.recordset")rs.open "select * from user",conn,1,3rs.addnewrs("name")=namers("classname")=classnamers.updaters.closehtml的表单部分,用你的那2个文本框来输入就可以了。name和classname可以根据你自己的需要来改名。多动手,祝你成功。
⑷ 如何复制一个简单的企业网站(asp)的源码
你要抄静态部分的效果还是连他后袭台文件都要?如果只要静态部分效果,你可以使用“整站下载”这个工具去复制他整个网站的效果如果是连他后台文件,那你就只有入侵他服务器或者入侵他网站才行了否则没办法,但不建议做非法的事 你可以去网上去下一下开源的源码,自己改改
⑸ ASP网站源码怎么在本地测试
在本地搭建服务器就可以了。IIS搭建好就可以测试了。我也有一款小软件可以介绍你。只要和源文件同一个目录下,你双击就可以看到源码的运行效果!
⑹ 求一个简洁漂亮的asp源码网站程序
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="admin.aspx.vb" Inherits="Mboard.admin"%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"><HTML> <HEAD> <title>留言管理</title> <meta content="Microsoft Visual Studio .NET 7.1" name="GENERATOR"> <meta content="Visual Basic .NET 7.1" name="CODE_LANGUAGE"> <meta content="JavaScript" name="vs_defaultClientScript"> <meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema"> <SCRIPT language="JavaScript"> //展开和关闭时候显示/隐藏子表信息 function showDiv(img,div) { var picName = img.src; picName = picName.substring(picName.lastIndexOf("/")+1); if (picName.toLowerCase() == "open.gif") { div.style.display ="block"; img.src = "image/close.gif"; } else { div.style.display ="none"; img.src = "image/open.gif"; } } function AddRemoveValues(oChk) { //在处理这个地方需要注意的是:你保存的值应该具有唯一性,这样才能不会替换错误的项。 if(oChk.checked) Form1.HdnSelectedValues.value += "," + oChk.value; else Form1.HdnSelectedValues.value = Form1.HdnSelectedValues.value.replace("," + oChk.value,""); } </SCRIPT> </HEAD> <body background="image/bookbg.gif" MS_POSITIONING="GridLayout"> <form id="Form1" method="post" runat="server"> <FONT face="宋体"> <TABLE id="Table1" style="Z-INDEX: 101; LEFT: 80px; WIDTH: 797px; POSITION: absolute; TOP: 8px" cellSpacing="0" cellPadding="0" width="797" align="center" border="0"> <TR> <TD style="FONT-SIZE: 20px; COLOR: #505050; HEIGHT: 16px" align="center" vAlign="top"><b>后台管理</b><br> <HR width="100%" color="#000066" SIZE="2"> <TABLE id="Table2" style="WIDTH: 600px; HEIGHT: 16px" cellSpacing="0" cellPadding="0" width="600" border="0"> <TR> <TD align="center"><A href="admin.aspx">留言管理</A> </TD> <TD align="center"><A href="changepsw.aspx">修改密码</A></TD> <TD align="center"><A href="logout.aspx">退出登录</A></TD> </TR> </TABLE> <br> <TABLE id="Table2" cellSpacing="0" cellPadding="0" width="760" border="0"> <TR> <TD vAlign="top" align="center"><asp:datagrid id="dgword" runat="server" Width="656px" AutoGenerateColumns="False" BackColor="#FFFFF6" Height="96px" ShowHeader="False" Font-Size="9pt" AllowPaging="True" OnPageIndexChanged="dgword_SelectedIndexChanged" OnItemCommand="dgword_DeleteComand"> <FooterStyle ForeColor="#000066" BackColor="White"></FooterStyle> <SelectedItemStyle Font-Bold="True" ForeColor="White" BackColor="#669999"></SelectedItemStyle> <ItemStyle ForeColor="#000066"></ItemStyle> <HeaderStyle Font-Bold="True" ForeColor="White" BackColor="#006699"></HeaderStyle> <Columns> <asp:TemplateColumn> <ItemTemplate> <TABLE height="1" width="767" border="0"> <TR> <TD width="30"> <asp:Label id=LblId Font-Size="9pt" Visible="False" Height="4px" text='<%# DataBinder.Eval(Container.DataItem,"id")%>' Runat="server"> </asp:Label> <asp:Image id="ImgOpen" style="CURSOR: hand" open="true" Runat="server" ImageUrl="image/open.gif"></asp:Image></TD> <TD align="left" width="300"> <INPUT type="checkbox" onClick="AddRemoveValues(this)" value='<%#DataBinder.Eval(Container.DataItem,"id")%>' NAME="chkSelect"> <asp:Label id="Label1" runat="server" Font-Size="9pt">留言人:</asp:Label> <asp:Label id=LblName Font-Size="9pt" Text='<%# DataBinder.Eval(Container.DataItem,"Name")%>' Runat="server"> </asp:Label></TD> <TD align="left" width="317"> <asp:Label id="Label3" runat="server" Font-Size="9pt">日期:</asp:Label> <asp:Label id=Label4 runat="server" Font-Size="9pt" Text='<%# DataBinder.Eval(Container.DataItem,"date")%>'>lbltime</asp:Label></TD> <TD align="right" width="120"> <asp:LinkButton id="LbtnDel" Font-Size="9pt" Text="删除" Runat="server" CommandName="Delete"></asp:LinkButton></TD> </TR> <TR> <TD align="center" bgColor="#fefefe" colSpan="4"> <asp:Panel id="PnlContent" style="DISPLAY: none" BackColor="Silver" Border="0" Runat="server"> <table width="660" cellpadding="2" cellspacing="1" border="0" bgcolor="#3a97eb" style="FONT-SIZE: 9pt; WORD-BREAK: break-all"> <tr bgcolor="#ffffff"> <td height="120" width="120" rowspan="2" align="center" valign="top"> <%# DataBinder.Eval(Container.DataItem,"img")%> <br> <br> <%# DataBinder.Eval(Container.DataItem,"name")%> <br> <br> <%# DataBinder.Eval(Container.DataItem,"date")%> </td> <td height="25"> <%# DataBinder.Eval(Container.DataItem,"title")%> </td> </tr> <tr bgcolor="#ffffff"> <td height="95" valign="top" rowspan="1" colspan="1"> <%# DataBinder.Eval(Container.DataItem,"message")%> </td> </tr> </table> </asp:Panel></TD> </TR> </TABLE> </ItemTemplate> </asp:TemplateColumn> </Columns> <PagerStyle HorizontalAlign="Right" ForeColor="#000066" Position="TopAndBottom" BackColor="White" Mode="NumericPages"></PagerStyle> </asp:datagrid> <asp:Button id="btndel" runat="server" Text="删除所选项"></asp:Button></TD> </TR> </TABLE> </TD> </TR> </TABLE> <INPUT id="HdnSelectedValues" type="hidden" name="HdnSelectedValues" runat="server"> </FONT> </form> </body></HTML>
⑺ 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,1session("username")=rsc("username")session("password")=rsc("password")session.Timeout=30set rsc=nothingresponse.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,1nr=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=nothingif nr="" thenresponse.Redirect("index.asp")end ifif strcomp(nr,request.Form("password"))=0 thenresponse.Write("欢迎你!"&request.Form("username"))response.Write("你是在"&vv&"注册的")session("username")=request.Form("username")end ifif session("username")="" thenresponse.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 thenset rs=server.createobject("adodb.recordset")sql="select * from info where username='"&session("username")&"'"rs.open sql,conn,1,3rs("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.updateset rs=nothingresponse.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")="" thenmsg=msg&"<br>"&"用户名不能为空"end ifif strcomp(cstr(request.Form("password")),cstr(request.Form("password2")))<>0 thenmsg=msg&"<br>"&"两次密码输入不同"end ifif len(request.Form("password"))<6 thenmsg=msg&"<br>"&"密码太简单"end ifif strcomp(msg,"注册错误信息")>0 thenresponse.Redirect("reg.asp?msg="&msg)end ifif ac="adser" thenset rsc=server.createobject("adodb.recordset")sql="select * from info where username='"&request.Form("username")&"'"rsc.open sql,conn,1,1ck=rsc("username")set rsc=nothingif ck<>"" thenmsg=msg&"<br>"&"用户名被人注册"response.Redirect("reg.asp?msg="&msg)end ifdsql="select * from info where id is null"set rs=server.createobject("adodb.recordset")rs.open dsql,conn,1,3rs.addnewrs("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")=nowrs.updateset rs=nothing%><center><a href="index.asp" target="_self">注册成功,点击登陆</a></center><%end if%></body></html>6,(conn.asp 数据库连接文件)<%'连接数据库开始dim conn,rs,sqlon error resume nextdbpath=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 文本
⑻ 求一套简单的ASP 购物网站源代码!
asp购物网站 源码都有
⑼ 用Asp.net编写的简单购物网站源代码。急!急!急!
去csdn上下载一个就可以了,这个平台虽然是要分的,但是下载鬼哥网页版平免积分破解器就可以下载上面的资源了。