X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=web%2Fhtdocs%2Fdetails%2Fadd.mc;fp=web%2Fhtdocs%2Fdetails%2Fadd.mc;h=07bb609e846fe0ca0d25bdf38d172d81fefa0ad9;hb=2368b6b457f7051d15e54e6785c77f9f0cefe0db;hp=0000000000000000000000000000000000000000;hpb=8086fc365e7dfd123d0c0a675af5e1e92543fbc5;p=irspy-moved-to-github.git

diff --git a/web/htdocs/details/add.mc b/web/htdocs/details/add.mc
new file mode 100644
index 0000000..07bb609
--- /dev/null
+++ b/web/htdocs/details/add.mc
@@ -0,0 +1,37 @@
+%# $Id: add.mc,v 1.1 2006-09-20 16:49:46 mike Exp $
+<%perl>
+if ($r->param("_add")) {
+    my $host = $r->param("net.host");
+    my $port = $r->param("net.port");
+    my $db = $r->param("net.path");
+    my $id = "$host:$port/$db";
+    $r->param(id => $id);
+    $m->comp("check.mc");
+} else {
+</%perl>
+     <p>
+      Enter the connection details of the target you wish to add,
+      then press the <b>Add</b> button.
+     </p>
+     <form>
+      <table class="searchform">
+       <tr>
+        <th>Host</th>
+	<td><input type="text" name="net.host" size="40"/></td>
+       </tr>
+       <tr>
+        <th>Port</th>
+	<td><input type="text" name="net.port" size="5"/></td>
+       </tr>
+       <tr>
+        <th>Database</th>
+	<td><input type="text" name="net.path" size="20"/></td>
+       </tr>
+       <tr><td colspan="2">&nbsp;</td></tr>
+       <tr>
+        <th/>
+        <th><input type="submit" name="_add" value="Add"/></th>
+       </tr>
+      </table>
+     </form>
+% }