databases_edit.aspx

在线SQL数据库企业管理器在线SQL数据库企业管理器

<!--#include file="includes/topnav.aspx"-->

<%

	if request("Save") <> "" and request("DatabaseName") <> "" then
	
		d.execute("CREATE DATABASE [" & request("DatabaseName") & "]")
		
		%>
	
		<script language="Javascript">
			parent.frames["LeftFrame"].location.href='databases.aspx?catalog=<%= request("DatabaseName") %>';
			parent.frames["MainFrame"].location.href='setdatabase.aspx?catalog=<%= request("DatabaseName") %>';
		</script>

	
	
	
		<%
	end if


	Dim Databasename as String = Request("DatabaseName")
	Dim InitialSize as String = iif(request("InitialSize")="", 2, request("InitialSize")) 
	Dim FileGrowth as String = iif(request("FileGrowth")="", 2, request("FileGrowth"))
	Dim MaxSize as String = iif(request("MaxSize")="", 8, request("MaxSize"))
	
	
	With Response
		
		
		.write ("<form action=""databases_edit.aspx"" method=""POST"">")
		.write ("<input type=""hidden"" value=""save"" name=""save"">")
		.write ("<center>")
		.write ("<table class=""TableStyle"" border=""0""  cellspacing=""0"" cellpadding=""2"" width=""370"">")
		.write ("<tr><td class=""WindowHeader"">")
		.write ("Database Properties")
		.write ("</td></tr>")
		
		.write ("<tr><td class=""TableHeader"">")
		
		.write ("<p align=""right"" style=""margin-top: 5px; margin-bottom: 10px; margin-right: 10px;"">")
		.write ("<input type=""submit"" value=""Save Database"">")
		.write ("</p><hr>")
		
		.write ("<table class=""MainStyle"" width=""100%"" border=""0"">")
		.write ("<tr><td valign=""top"" align=""center"">")
		.write ("<img src=""images/large_Icons_Databases.gif"" ALIGN=""LEFT"">")
		.write ("</td><td NOWRAP>")
		.write ("<b>Database Name:</b>&nbsp;")
		.write ("</td><td>")
		.write ("<input type=""text"" name=""DatabaseName"" value=""" & DatabaseName & """ style=""width: 200px;"">")		
		.write ("</td></tr>")
		
		.write ("<tr><td colspan=""4"">")
		.write ("<br></td></tr>")
		
		.write ("<tr><td>Size</td>")
		.write ("<td colspan=""2""><hr></td></tr>")
		
		
		.write ("<tr><td>&nbsp;</td><td>")
		.write ("<b>Initial Size:</b>&nbsp;")
		.write ("</td><td colspan=""2"">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;")
		.write ("<input type=""text"" name=""InitialSize"" value=""" & InitialSize & """ style=""width: 50;"">&nbsp; <big style=""font-FAMILY: Arial Narrow;"">MB</big>")		
		.write ("</td></tr>")
		
		.write ("<tr><td colspan=""2"">")
		.write ("&nbsp;")
		.write ("</td><td>")
		.write ("<input type=""checkbox"" name=""grow"" CHECKED> Automatically grow file")
		.write ("</td></tr>")
		
		.write ("<tr><td colspan=""4"">")
		.write ("<br></td></tr>")
		
		.write ("<tr><td NOWRAP>File Growth</td>")
		.write ("<td colspan=""2""><hr></td></tr>")
		
		.write ("<tr><td>")
		.write ("&nbsp;")
		.write ("</td><td NOWRAP>")
		.write ("<input type=""radio"" CHECKED> in megabytes ")
		.write ("</td><td align=""right"">")
		.write ("<input type=""text"" name=""filegrowth"" size=""4"" value=""" & FileGrowth & """>&nbsp; <big style=""font-FAMILY: Arial Narrow;"">MB</big>")
		.write ("</td></tr>")
		
		.write ("<tr><td colspan=""4"">")
		.write ("<br></td></tr>")
		
		.write ("<tr><td NOWRAP>Max Size</td>")
		.write ("<td colspan=""2""><hr></td></tr>")
		
		.write ("<tr><td>")
		.write ("&nbsp;")
		.write ("</td><td NOWRAP>")
		.write ("<input type=""radio"" CHECKED> restrict file growth")
		.write ("</td><td align=""right"">")
		.write ("<input type=""text"" name=""maxsize"" size=""4"" value=""" & MaxSize & """>&nbsp; <big style=""font-FAMILY: Arial Narrow;"">MB</big>")
		.write ("</td></tr>")
		
	
		.write ("</table>")
		
		.write ("<br><Br><Br>")
		
		.write ("</td></tr>")		
		.write ("</table>")
	
		.write ("</form>")
		.write ("</center>")
	
	
	End With
	

	

%>