"> <% dim rst dim rst1 dim con dim strsql dim farbe set con= server.createobject("ADODB.Connection") set rst = Server.createobject("ADODB.Recordset") set rst1 = server.createobject("ADODB.Recordset") dim rstsub con.open "Provider=SQLOLEDB.1;Server=193.109.140.36;Database=leistungsschau;User ID=cm;Password=cm437w;Connect Timeout=15; " strsql = "SELECT * FROM Branchen order by BBezeichnung" %>
 Formular zur Aufnahme in die Wirtschaftsdatenbank
     
 Firmenname   
 Straße   
 Postleitzahl   
 Ort   
 Telefonnummer   
 Fax-Nummer   
 E-Mail Adresse   
 Internet-Adresse   
 Name des Geschäftsführers   
 Geschäftsbereiche
Bitte definieren Sie Ihre Geschäftsbereiche oder wählen Sie aus der Liste unten		   
 

Mit der Übersendung meiner Daten erkläre ich mich damit einverstanden, dass mir für die Erfassung meiner Daten € 20,- exkl. in Rechnung gestellt wird. Die Jahresgebühr beträgt € 29,-.excl. Dieser Vertrag kann jederzeit schriftlich gekündigt werden, wodurch die Daten aus dem "Regionalen Informationssystem" gelöscht werden.

  Informieren Sie mich über weitere Werbemöglichkeiten auf dem "virtuellen Marktplatz Voitsberg". 
      

Geschäftsbereiche

<% set rst1 = con.execute("select BBezeichnung from Branchen order by BBezeichnung") while not rst1.eof response.write("") rst1.movenext wend %>
 
Branchenbezeichnungen die bereits existieren
") response.write(rst1("BBezeichnung")) response.write("
") response.write("