<%@ Language=VBScript %>
<%
Option Explicit
Response.Expires = 0
On Error Resume Next

'Kein Resultat

'*****************************************************************
'Anfang <html>
%>

<!--#include virtual="asppages/silvi/_include/preheader.inc" -->
<html>
  <head>
    <title>ASP Diverses: Aufruf einer selbsterstellten Komponente </title>
<!--#include virtual="asppages/silvi/_include/header.inc" -->
  </head>
<body>
Diese Seite funktioniert nicht, sie zeigt nur die Syntax für den Aufruf
von selbst erzeugten Komponenten
<%
'*****************************************************************
'Code innerhalb der HTML-Seite
Dim objcomimagedb, objrsdata
Dim intreturnvalue, strerrmsg, strsqlsel

Set objcomimagedb = Server.CreateObject("imagedb.dbaccess")
objcomimagedb.ReadDb objrsdata, intreturnvalue, strerrmsg, strsqlsel
%>

<!--#include virtual="asppages/silvi/_include/inchtmlnachspann.asp" -->
</body>
</html>


Letzter Update: 26.12.2021 16:48

Zurück zur Liste mit ASP-Beispielen auf  www.ecotronics.ch