%@LANGUAGE="VBSCRIPT"%> <%Response.Expires=0%> <% set conn = server.createobject("ADODB.Connection") 'conn.open "driver={microsoft access driver (*.mdb)}; dbq=" & server.mappath("w05a0201_db\stellen.mdb") conn.open = vn_Stellenboerse_STRING %>
|
Stellenangebote und Stellengesuche |
|
Die Vereinigung der Deutschen Medizinischen Fach- und Standespresse e. V. bietet Mitgliedern und Nichtmitgliedern die Möglichkeit, hier Stellengesuche und -angebote zu veröffentlichen. Auf Wunsch kann dies auch anonym vorgenommen werden. Der Kontakt wird in diesem Fall über die Geschäftsstelle hergestellt. Bitte schicken Sie Ihre Ausschreibung an uns. Eine Haftung für die Angaben wird durch die Vereinigung der Deutschen Medizinischen Fach- und Standespresse e. V. nicht übernommen. |
|
|
Stellenangebote |
|
<% REM sql = "SELECT strStellenangebot, strAnford, strAbsender, strEmail, dtmDatum FROM tblAngebot" sql = "SELECT strStellenangebot, strAnford, strAbsender, strEmail, dtmDatum FROM tblAngebot WHERE Now()<=DateAdd('m',3,[tblAngebot].[dtmDatum])ORDER BY dtmDatum DESC" set rs = conn.execute(sql) %> <% if rs.eof then response.write("Zur Zeit liegen keine Stellenangebote vor.")%> <% end if while not rs.eof %>
<% rs.movenext wend rs.close set rs = nothing %> |
|
|
Stellengesuche |
|
<% REM sql = "SELECT strProfil, strOrt, strAngaben, strAbsender, strEmail, Anonym, dtmDatum FROM tblGesuch" sql = "SELECT strProfil, strOrt, strAngaben, strAbsender, strEmail, Anonym, dtmDatum FROM tblGesuch WHERE Now()<=DateAdd('m',3,[tblGesuch].[dtmDatum]) ORDER BY tblGesuch.dtmDatum DESC" set rs = conn.execute(sql) %> <% if rs.eof then response.write("Zur Zeit liegen keine Stellengesuche vor.")%> <% end if while not rs.eof %>
<% rs.movenext wend rs.close set rs = nothing %>
|
|