Programy rabatowe - DER-MED

Der Med to zaproszenie do sieci Centrum Kosmetyczno - Dermatologicznych zlokalizowanych w trzech największych miastach południa Polski: Krakowie, Wrocławiu i Katowicach.
Od 1999r grono lekarzy, kosmetologów, kosmetyczek i fizjoterapeutów dba o urodę i dobre samopoczucie naszych Klientów. Nasi specjaliści pomagają ustalić i usunąć przyczyny zaistniałych problemów i zmian, oraz udzielają wskazówek na przyszłość.
Dzięki współpracy ze znanymi na świecie klinikami oraz najlepszymi producentami sprzętu medycznego i kosmetycznego, możemy zaproponować Państwu kompleksowe programy leczenia i dbania o swoja urodę z zakresu: laseroterapii, medycyny estetycznej, dermatologii, kosmetyki pielęgnacyjnej twarzy i ciała.

Adresy:
Centrum Kosmetyczno -Dermatologiczne
DER-MED
ul. św. Tomasza 30 / 3
31-027 Kraków
tel. (012) 292 03 03
e-mail: gabinet@dermed.pl
Poniedziałek - Piątek: 8.00 - 20.00
Sobota: 8.00 - 15.00

Centrum Kosmetyczno -Dermatologiczne
DER-MED
Al. W. Korfantego 70 / 7
40-161 Katowice
tel. (032) 201 02 65
e-mail: gabinet.katowice@dermed.pl
Poniedziałek - Piątek: 8.00 - 20.00
Sobota: 9.00 - 14.00

Centrum Kosmetyczno -Dermatologiczne
DER-MED
ul. Armii Krajowej 12/3
kompleks AB
50-541 Wrocław
tel. (071) 796 46 36
fax (071) 796 46 26
e-mail: gabinet.wroclaw@dermed.pl
Poniedziałek - Piątek: 8.00 - 20.00
Sobota: 9.00 - 14.00

http://www.dermed.pl

poleć znajomemu drukuj

Zostań partnerem
w programie rabatowym
pobierz pdf

<% Const SXH_OPTION_IGNORE_SERVER_SSL_CERT_ERROR_FLAGS = 2 Const SXH_OPTION_SELECT_CLIENT_SSL_CERT = 3 Const SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056 Dim objSrvHTTP Set objSrvHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP") 'objSrvHTTP.setTimeouts 5000,5000,5000,5000 On Error Resume Next urlAddress = "https://10.2.1.12/kartyid/idesign-idsl-visa_credit_classic.html?" If "tduid" <> "" And Request.Cookies("tduid") <> "" Then urlAddress = urlAddress & "tduid=" & Request.Cookies("tduid") End If byteCount = Request.TotalBytes If byteCount > 0 Then postData = Request.BinaryRead(byteCount) Else postData = "" End If With objSrvHTTP .open "POST", urlAddress, false .setOption SXH_OPTION_IGNORE_SERVER_SSL_CERT_ERROR_FLAGS, SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS If "" <> "" Then .setOption SXH_OPTION_SELECT_CLIENT_SSL_CERT, "" End If .setRequestHeader "Content-Type","application/x-www-form-urlencoded" .send postData reqStatus = .status If err.number <> 0 Or reqStatus <> 200 Then zm = 1 sForm = "

Formularz chwilowo niedostępny.

Prosimy spróbować później.

" Else sForm = .responseBody zm = 0 End If End With set objSrvHTTP = Nothing %>

<% If zm <> 0 Then Response.Write sForm Else Response.BinaryWrite sForm End If %>