nicht angemeldet
Hallo Frank,
mittlerweile sieht das aus wie folgt, funktioniert aber immer nocht nicht. Über ein kurzes Debugging wäre ich dankbar...
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<%@ Page Language="VB" ContentType="text/html" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script runat="server"> Dim varFirmentitel As String
Sub Load_Page
Dim strConnect As String = System.Configuration.ConfigurationManager.AppSettings("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\WWW_root\Arzneivergleich\fpdb\adressen.mdb")
Dim objConnect As New OleDbConnection(strConnect)
Dim sqlCheck As String = "SELECT * FROM Stammdaten WHERE Firmentitel=" & Request.QueryString("Firmentitel").ToString()
Dim myCommand As New OleDbCommand(sqlCheck, objConnect)
objConnect.Open()
Dim Data As OleDbDataReader
Data = myCommand.ExecuteReader()
While Data.Read()
varFirmentitel = Data.Item("Firmentitel")
End While
Data.close()
objConnect.close()
objConnect = Nothing
End Sub
</script>
<meta name="keywords" content="">
<title><%= varFirmentitel %></title>
<link rel="stylesheet" type="text/css" href="eislingen.css">
</head>