📄 install.aspx

📁 LiteBlaster 是一款基于 .NET Framework 原创的 ASP.NET 论坛系统。后台程序库采用 C#/VB.NET 编写
💻 ASPX
字号:
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="utf-8" %>
<%@ Import Namespace="Auway.LiteBlaster.Core" %>
<%@ Import Namespace="Auway.LiteBlaster.Enumerations" %>
<%@ Import Namespace="Auway.LiteBlaster.Exceptions" %>
<%@ Import Namespace="Auway.LiteBlaster.Extensions" %>
<%@ Import Namespace="Auway.LiteBlaster.Forum" %>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html><!-- InstanceBegin template="/Templates/setup_main.dwt.aspx" codeOutsideHTMLIsLocked="false" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<!-- InstanceBeginEditable name="doctitle" -->
<title>论坛安装向导</title>
<!-- InstanceEndEditable -->
<link rel="stylesheet" type="text/css" href="../Skins/Styles/main.css" />
<link rel="stylesheet" type="text/css" href="../Skins/Styles/itemList.css" />
<style type="text/css">
	body{
		background:url(../Skins/Images/Setup/background.jpg) repeat-x #DBE4F2 !important;
	}
	.input_text{
		border:#999FFF 1px solid;
		width:90%;
	}
	.input_text_sml{
		border:#999FFF 1px solid;
		width:45%;
	}
	.input_select{
		width:60%;
	}
	
	.section{
		font-weight:bold; font-size:22px; font-family:"华文新魏"; color:#CCCCCC;
	}
	.guide_allow{
		text-indent:2em; font-size:14px;
	}
	.guide_disallow{
		text-indent:2em; font-size:14px; color:gray;
	}
	.guide_info{
		padding-left:4em; font-size:9pt;
	}
</style>
<script language="javascript" type="text/javascript" src="../Lib/sarissa.js"></script>
<script language="javascript" type="text/javascript" src="../Lib/ajax.js"></script>
<script language="javascript" type="text/javascript" src="../Lib/x/x_core.js"></script>
<script language="javascript" type="text/javascript" src="../Lib/x/x_event.js"></script>
<script language="javascript" type="text/javascript" src="../Lib/main.js"></script>
<script runat="server">
	Private Sub CheckIsAdmin()
		Try
			UserInfo.GetCurrentUser().CheckIsAdmin()
		Catch ex As Exception
			ShowError(ex.Message)
		End Try
	End Sub
	Private Sub ShowError(ByVal ErrorMsg As String)
		Response.Write("<strong><u>错误信息</u></strong><br /><br />")
		Response.Write(ErrorMsg)
		Response.End()
	End Sub
	Private Sub CheckPermission()
		If Not Setup.NotInstalled Then
			CheckIsAdmin()
		End If
	End Sub
</script>
<!-- InstanceBeginEditable name="head" -->
<script runat="server">
	Sub Page_Load()
		CheckPermission()
	End Sub
	
	Sub Prepare_Click(ByVal sender As Object, ByVal e As System.EventArgs)
		Try
			Setup.InstallForum(CType(ConnType.SelectedIndex, DBConnectionType), ConnString.Value)
		Catch ex As Exception
			ShowError(ex.Message)
			Exit Sub
		End Try
		Response.Redirect("Default.aspx?frominstall=true")
	End Sub
</script>
<script language="javascript" type="text/javascript">
	function ConnType_onChange(){
		var index = xGetElementById('ConnType').selectedIndex;
		for(var i = 0; i < 3; i ++){
			setElementVisible('DB' + (i + 1).toString(), i == index);
		}
	}
	
	function getText(id, msg){
		var content = xGetElementById(id).value;
		if(msg != null && msg.length > 0 && (content == null || content.length == 0)){
			throw msg;
			return null;
		}
		if(content == null){
			return '';
		}
		return content;
	}
	function prepareSubmit(){
		var connStr;
		try{
			switch(xGetElementById('ConnType').selectedIndex){
				case 0:
					var path = getText('DB1Path', '请输入数据库放置路径。');
					var userid = getText('DB1UserId');
					var password = getText('DB1Password');
					connStr = 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=~\\' + path + ';';
					if(userid.length > 0){
						connStr += 'User Id=' + userid + ';Password=' + password + ';';
					}else if(password.length > 0){
						connStr += 'Jet OLEDB:Database Password=' + password + ';';
					}
					break;
				case 1:
					var datasource = getText('DB2DataSource', '请输入服务器地址。');
					var catalog = getText('DB2Catalog', '请输入数据库名称。');
					connStr = 'Data Source=' + datasource;
					if(xGetElementById('DB2SQLExpress').checked){
						connStr += '/SQLEXPRESS';
					}
					connStr += ';Initial Catalog=' + catalog + ';';
					if(xGetElementById('DB2AuthMode').checked){
						connStr += 'Integrated Security=SSPI;';
					}else{
						var userid = getText('DB2UserId', '请输入用户名。');
						var password = getText('DB2Password');
						connStr += 'User Id=' + userid + ';Password=' + password + ';';
					}
					break;
				case 2:
					var server = getText('DB3Server', '请输入服务器地址。');
					var port = getText('DB3Port');
					var database = getText('DB3Database', '请输入数据库名称。');
					var uid = getText('DB3Uid');
					var pwd = getText('DB3Pwd');
					connStr = 'Server=' + server + ';';
					if(port.length > 0){
						connStr += 'Port=' + parseInt(port) + ';';
					}
					connStr += 'Database=' + database + ';';
					if(uid.length > 0){
						connStr += 'Uid=' + uid + ';Pwd=' + pwd + ';';
					}
					break;
				default:
					return false;
			}
		}catch(ex){
			alert(ex.toString());
			return false;
		}
		xGetElementById('ConnString').value = connStr;
		return true;
	}
</script>
<!-- InstanceEndEditable -->
</head>

<body>
<table style="width:800px; background:white" align="center"><tbody><tr><td>
	<br /><br /><br />
	<table class="ListBody" align="center"><tbody><tr><td>
		<table class="ListTable"><tbody>
			<tr>
				<td class="txtleft" width="250">
					<img src="../Logos/LiteBlaster.png" alt="LiteBlaster" width="200" />
				</td>
				<td class="txtcenter" valign="middle">
					<span style="font-weight:bold; font-size:26px; font-family:'华文新魏'; color:#999FFF">
						<!-- InstanceBeginEditable name="Title" -->
						安装论坛
						<!-- InstanceEndEditable -->
					</span>
				</td>
			</tr>
		</tbody></table>
		<br /><br />
		<form runat="server">
			<!-- InstanceBeginEditable name="Body" -->
			<table class="ListTable"><tbody>
				<tr><td class="ListHeaderSub">请选择您的数据库类型</td></tr>
				<tr><td class="ListItemsTd ListItemsTd_style1 txtcenter">
					<select id="ConnType" class="input_select" runat="server" onChange="ConnType_onChange();">
						<option selected>MS Access</option>
						<option>MS SQL Server</option>
						<option>MySQL</option>
					</select>
				</td></tr>
			</tbody></table>
			<br />
			<table class="ListTable">
				<tbody>
					<tr><td colspan="2" class="ListHeader">数据库配置</td></tr>
				</tbody>
				<tbody id="DB1">
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">数据库放置相对路径：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB1Path" value="" />
							<br />
							如：Data\bbs.config，..\Data\bbs.config等，建议使用config后缀
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">用户名：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB1UserId" value="" />
							<br />
							如果没有设定，就不用填写（自带的模板默认没有用户名和密码）
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">密码：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB1Password" value="" />
							<br />
							如果没有设定，就不用填写
						</td>
					</tr>
				</tbody>
				<tbody id="DB2" style="display:none">
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">服务器地址：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB2DataSource" value="" />
							<br />
							如果需要使用自定义端口，请在末尾加上“,端口号”
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">数据库名：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB2Catalog" value="" />
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">认证方式：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="checkbox" id="DB2AuthMode" /><label for="DB2AuthMode">采用 Windows 集成验证</label>
							<br />
							如果采用集成验证，则不用填写下面的用户名和密码
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">用户名：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB2UserId" value="" />
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">密码：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB2Password" value="" />
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">杂项：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="checkbox" id="DB2SQLExpress" /><label for="DB2SQLExpress">数据库采用 SQL Server Express</label>
						</td>
					</tr>
				</tbody>
				<tbody id="DB3" style="display:none">
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">服务器地址：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB3Server" value="" />
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">端口：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB3Port" value="" />
							<br />
							不填代表适用默认端口，填写-1代表适用命名管道
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">数据库名：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB3Database" value="" />
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">用户名：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB3Uid" value="" />
							<br />
							如果没有设定，就不用填写
						</td>
					</tr>
					<tr>
						<td class="ListItemsTd ListItemsTd_style2 txtright">密码：</td>
						<td class="ListItemsTd ListItemsTd_style1 txtleft">
							<input type="text" class="input_text" id="DB3Pwd" value="" />
							<br />
							如果没有设定，就不用填写
						</td>
					</tr>
				</tbody>
				<tbody>
					<tr><td colspan="2" class="ListItemsTd ListItemsTd_style3 txtcenter">
						<input type="button" value="确定" onClick="if(!prepareSubmit()) return false;" onServerClick="Prepare_Click" runat="server" />
						<input id="ConnString" type="hidden" value="" runat="server" />
					</td></tr>
				</tbody>
			</table>
			<!-- InstanceEndEditable -->
		</form>
		<br /><br />
	</td></tr></tbody></table>
</td></tr></tbody></table>
</body>
<!-- InstanceEnd --></html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -