|
|

|
Patents
Research form |
<%@ LANGUAGE="VBSCRIPT" %>
Base de données de brevet
<%
Set DataConn = Server.CreateObject("ADODB.Connection")
DataConn.ConnectionTimeout = 600000
DataConn.CommandTimeout = 600000
DataConn.Open "DSN=Inorpi", "admin", ""
Set cmdTemp = Server.CreateObject("ADODB.Command")
Set DataCommand1 = Server.CreateObject("ADODB.Recordset")
cmdTemp.CommandText = "SELECT Cntry_ID, Cntry_Name FROM Country"
cmdTemp.CommandType = 1
Set cmdTemp.ActiveConnection = DataConn
DataCommand1.Open cmdTemp, , 0, 1
%>
|
|
|
|
| |
 |
| |
|
| |
|
|
|