<%@LANGUAGE='JSCRIPT'%> <% var cmd='nop'; var population=10; var recordsFound=0; var firstRecord=0; //to do: //1. serialize search //2. introduce AND and OR options in title, authors and description: // c[i][1].indexOf(" OR ") || c[i][1].indexOf(" AND ") --> c[i][1].split(" OR ") c[1][1].split (" AND ") //3. search tips //4. submit form //5. submission management interface function getCriteria () { var c=Request.Form.Count; var r=new Array(); var k; var v; for (var i=1;i<=c;i++) { k=Request.Form.Key(i); if (k!='cmd') { v=Request.Form(k)(1); if (v!='') {r[r.length]=[k,v];} } } return r; } function formCriteria (c) { //needs to be adjusted to specific criteria var s=""; var tflag=false; for (var i=0;i NTUA Maritime Transport - SSS-CA Database
Maritime Transport

 

<% if (cmd=='nop') {%> SSS-CA DATABASE SEARCH ENGINE UNDER TECHNICAL UPGRADE, CURRENTLY UNAVAILABLE. FOR MORE INFO INCLUDING THE ENTIRE CONTENTS OF THE DATABASE PLEASE GO HERE
SSS-CA Database Search Criteria: (fill in the desired categories) search tips    about the database

Title:
Authors:
Description: 

Code: Type:
Sponsor: Source: 
Country: Date:
Language: Status:

 
Subject
Areas
 
S
h
i
p
s
C
a
r
g
o
P
o
r
t
s
N
e
t
w
o
r
k
s
T
e
l
e
m
a
t
i
c
s
 Engineering
 Economics/Logistics
 Business/Management 
 Regulatory/Policy
 Environment/Safety

To submit data to the database please press here.
<%}%> <% if (cmd=='search') {%>
Search Results


<% var dt = Server.CreateObject("ADODB.Connection"); dt.Open ("sssca","sa",""); var rs=dt.Execute("SELECT code,title,authors,description,type,sponsor,source,country,date,language,status FROM refs WHERE "+searchString); var n=firstRecord; var i=0; while (!rs.eof) { i++; if (i<=population) { n++; %>
<%=n%>.  Title: <%=rs.Fields("title")%>
Authors: <%=rs.Fields("authors")%>

Type: <%=rs.Fields("type")%>   Source: <%=rs.Fields("source")%>   Country: <%=rs.Fields("country")%>   Language: <%=rs.Fields("language")%>   Sponsor: <%=rs.Fields("sponsor")%>   Date: <%=rs.Fields("date")%>   Status: <%=rs.Fields("status")%>

<%=rs.Fields("description")%>
Code: <%=rs.Fields("code")%>

<% } rs.MoveNext(); } recordsFound=i; dt.Close(); %>

<%=recordsFound%> entries found - (page 1) <% if (n next page > <%}%>

<%}%> <% if (cmd=='state') {%>
Search Results


<% var dt = Server.CreateObject("ADODB.Connection"); dt.Open ("sssca","sa",""); var rs=dt.Execute("SELECT code,title,authors,description,type,sponsor,source,country,date,language,status FROM refs WHERE "+searchString); var n=0; while (n
<%=n%>.  Title: <%=rs.Fields("title")%>
Authors: <%=rs.Fields("authors")%>

Type: <%=rs.Fields("type")%>   Source: <%=rs.Fields("source")%>   Country: <%=rs.Fields("country")%>   Language: <%=rs.Fields("language")%>   Sponsor: <%=rs.Fields("sponsor")%>   Date: <%=rs.Fields("date")%>   Status: <%=rs.Fields("status")%>

<%=rs.Fields("description")%>
Code: <%=rs.Fields("code")%>

<% rs.MoveNext(); } dt.Close(); %>

<%=recordsFound%> entries found - (page <%=pageNumber%>) <% if(firstRecord>0) {%> < previous page    <%}%> <% if (n next page > <%}%>

<%}%>


Home   |   News & Events   |   Educational   |   Research   |   Resources   |   Staff   |   Links   |   E-mail


© 2006 NTUA  -  Terms of use