当前文件：
14RFAMJDWSL814/add_customfield.aspx[5K，2009-6-12 11:30:42]，
打开代码结构图
1
<%...@ Page language="C#"%>
2
<!--
3Copyright 2002-2005 Corey Trager
4刘岛 汉化于2006年2月
5-->
6<!-- #include file = "inc.aspx" -->
7
8<script language="C#" runat="server">...
9
10int id;
11String sql;
12
13DbUtil dbutil;
14Security security;
15
16
17///////////////////////////////////////////////////////////////////////
18void Page_Load(Object sender, EventArgs e)
19
...{
20
21 Util.do_not_cache(Response);
22 dbutil = new DbUtil();
23 security = new Security();
24 security.check_security(dbutil, Request, Response, Security.MUST_BE_ADMIN);
25
26 msg.InnerText = "";
27
28 if (!IsPostBack)
29 ...{
30 datatype.Items.Insert(0, new ListItem("char", "char"));
31 datatype.Items.Insert(0, new ListItem("datetime", "datetime"));
32 datatype.Items.Insert(0, new ListItem("decimal", "decimal"));
33 datatype.Items.Insert(0, new ListItem("int", "int"));
34 datatype.Items.Insert(0, new ListItem("nchar", "nchar"));
35 datatype.Items.Insert(0, new ListItem("nvarchar", "nvarchar"));
36 datatype.Items.Insert(0, new ListItem("varchar", "varchar"));
37
}
38
39}
40
41void Page_Unload(Object sender, EventArgs e)
42...{
43 if (dbutil != null) ...{dbutil.close();}
44}
45
46///////////////////////////////////////////////////////////////////////
47Boolean validate()
48...{
49
50 Boolean good = true;
51 if (name.Value == "")
52 ...{
53 good = false;
54 name_err.InnerText = "字段名称不能为空！";
55 }
56 else
57 ...{
58 name_err.InnerText = "";
59 }
60
61
62 if (length.Value == "")
63 ...{
64 if (datatype.SelectedItem.Value == "int"
65 || datatype.SelectedItem.Value == "datetime")
66 ...{
67 length_err.InnerText = "";
68 }
69 else
70 ...{
71 good = false;
72 length_err.InnerText = "请设置该字段的长度和精度！";
73 }
74 }
75 else
76 ...{
77 if (datatype.SelectedItem.Value == "int" || datatype.SelectedItem.Value == "datetime")
78 ...{
79 good = false;
80 length_err.InnerText = "该字段的数据类型不能设置长度和精度！";
81 }
82 else
83 ...{
84 length_err.InnerText = "";
85 }
86 }
87
88
89
90 default_err.InnerText = "";
91 if (required.Checked && default_text.Value == "")
92 ...{
93 if (default_text.Value == "")
94 ...{
95 good = false;
96 default_err.InnerText = "如果 \"Required\" 被选择，则默认被选择！";
97 }
98 }
99
100
101 return good;
102}
103
104///////////////////////////////////////////////////////////////////////
105void on_update (Object sender, EventArgs e)
106...{
107
108 Boolean good = validate();
109
110 if (good)
111 ...{
112 sql = "alter table bugs add [$nm] $dt $ln $null $df";
113 sql = sql.Replace("$nm", name.Value);
114 sql = sql.Replace("$dt", datatype.SelectedItem.Value);
115 sql = sql.Replace("$ln", length.Value);
116
117 if (default_text.Value != "")
118 ...{
119 sql = sql.Replace("$df", "DEFAULT " + default_text.Value);
120 }
121 else
122 ...{
123 sql = sql.Replace("$df", "");
124 }
125
126
127 if (required.Checked)
128 ...{
129 sql = sql.Replace("$null", "NOT NULL");
130 }
131 else
132 ...{
133 sql = sql.Replace("$null", "NULL");
134 }
135
136 try
137 ...{
138 dbutil.execute_nonquery(sql);
139 Server.Transfer ("customfields.aspx");
140 }
141 catch (Exception e2)
142 ...{
143 msg.InnerHtml = "SQL无效：<br><br>SQL: " + sql + "<br><br>Error: " + e2.Message;
144 }
145
146 }
147 else
148 ...{
149 msg.InnerText = "自定义字段创建失败！";
150 }
151
152}
153
154</script>
155
156<html>
157<head>
158<title id="title" runat="server">添加数据字段</title>
159<link rel="StyleSheet" href="btnet.css" type="text/css">
160</head>
161<body>
162<%... security.write_menu(Response, "admin"); %>
163
164
165<div class=align><table border=0><tr><td>
166<a href=customfields.aspx>返回自定义字段</a>
167<form class=frm runat="server">
168 <table border=0 width=640>
169
170 <tr>
171 <td class=lbl>字段名称：</td>
172 <td><input runat="server" type=text class=txt id="name" maxlength=30 size=30></td>
173 <td runat="server" class=err id="name_err"> </td>
174 </tr>
175
176 <tr>
177 <td class=lbl>字段类型：</td>
178 <td>
179 <asp:DropDownList id="datatype" runat="server">
180 </asp:DropDownList>
181 </td>
182 <td> </td>
183 </tr>
184<!--
185 <tr>
186 <td colspan=3>
187 <span class=smallnote>
188 <br><br>For char, varchar, etc, specify as (NNN). Don't forget the parenthesis.<br><br>
189 For decimal specify as (A,B) where A is the total number of digits and B is the number of those digits to the right of decimal point. Don't forget the parenthesis.<br><br>
190 </span>
191 </td>
192 </tr>
193-->
194 <tr>
195 <td class=lbl>长度/精度:</td>
196 <td><input runat="server" type=text class=txt id="length" maxlength=6 size=6></td>
197 <td nowrap runat="server" class=err id="length_err"> </td>
198 </tr>
199<!--
200 <tr>
201 <td colspan=3>
202 <span class=smallnote>
203 <br><br>If you specify required, you must supply a default. Don't forget the parenthesis.
204 </span>
205 </td>
206 </tr>
207-->
208 <tr>
209 <td class=lbl>允许空：</td>
210 <td><asp:checkbox runat="server" class=txt id="required"/></td>
211 <td> </td>
212 </tr>
213
214 <tr>
215 <td class=lbl>默认值：</td>
216 <td><input runat="server" type=text class=txt id="default_text" maxlength=30 size=30></td>
217 <td nowrap runat="server" class=err id="default_err"> </td>
218 </tr>
219
220
221 <tr><td colspan=3 align=right>
222 <span runat="server" class=err id="msg"> </span>
223 </td></tr>
224
225 <tr>
226 <td colspan=2 align=center>
227 <input runat="server" class=btn type=submit id="sub" value="创 建" OnServerClick="on_update">
228 <td> </td>
229 </td>
230 </tr>
231 </td></tr></table>
232</form>
233</td></tr></table></div>
234</body>
235</html>
236
237
238
打包下载该项目完整源码：BugTrack51aspx汉化改造版V2.1.7