|
||||||
|
Html tag replace to Asp merhaba arkadaşalr sizlere ençok kullanılan html tag replace komutundan bir örnek paylaşmak istedim kod gayet açık. t = Replace(t,” “,chr(9)) t = Replace(t,” ”,” ”) t = Replace(t,”<”,”<”) t = Replace(t,”>”,”>”) t = Replace(t,”<br>”,Chr(13)) yazitext = t t = Replace(t,chr(9),” “) t = Replace(t,” ”,” ”) t <% Dim objXmlHttp Dim strHTML Set objXmlHttp = Server.CreateObject(“Msxml2.ServerXMLHTTP”) objXmlHttp.open “GET”, “http://www.asp101.com/samples/httpsamp.asp“, False objXmlHttp.send ‘ Response.Write “Status: ” & objXmlHttp.status & ” ” _ ‘ & objXmlHttp.statusText & “<br />” strHTML = objXmlHttp.responseText Set objXmlHttp = Nothing %> <%= strHTML %> <%= Server.HTMLEncode(strHTML) %> <% Function RemoveHTML( strText ) Dim TAGLIST TAGLIST = ";!--;!DOCTYPE;A;ACRONYM;ADDRESS;APPLET;AREA;B;BASE;BASEFONT;" &_ "BGSOUND;BIG;BLOCKQUOTE;BODY;BR;BUTTON;CAPTION;CENTER;CITE;CODE;" &_ "COL;COLGROUP;COMMENT;DD;DEL;DFN;DIR;DIV;DL;DT;EM;EMBED;FIELDSET;" &_ "FONT;FORM;FRAME;FRAMESET;HEAD;H1;H2;H3;H4;H5;H6;HR;HTML;I;IFRAME;IMG;" &_ "INPUT;INS;ISINDEX;KBD;LABEL;LAYER;LAGEND;LI;LINK;LISTING;MAP;MARQUEE;" &_ "MENU;META;NOBR;NOFRAMES;NOSCRIPT;SELECT;OBJECT;OL;OPTION;P;PARAM;PLAINTEXT;" &_ "PRE;Q;S;SAMP;SCRIPT;SMALL;SPAN;STRIKE;STRONG;STYLE;SUB;SUP;" &_ "TABLE;TBODY;TD;TEXTAREA;TFOOT;TH;THEAD;TITLE;TR;TT;U;UL;VAR;WBR;XMP;" Const BLOCKTAGLIST = ";APPLET;EMBED;FRAMESET;HEAD;NOFRAMES;NOSCRIPT;OBJECT;SCRIPT;STYLE;" Dim nPos1 Dim nPos2 Dim nPos3 Dim strResult Dim strTagName Dim bRemove Dim bSearchForBlock nPos1 = InStr(strText, "<") Do While nPos1 > 0 <% ' yahoo hava durumu ' Yahoo Weather sisteminden asp ile havadurumu göstermek. Public Function VeriAl(strGelen) Set objVeriAl = Server.CreateObject("Microsoft.XMLHTTP" ) objVeriAl.Open "GET" , strGelen, FALSE objVeriAl.sEnd VeriAl = objVeriAl.Responsetext SET objVeriAl = Nothing End Function sehir = "TUXX0029 asp ile case işlemleri <% dim degisken Select Case degisken case 1 case2 case3 ....... ........ end select %> Asp de değişkenlerin diğer dillerde olduğu gibi türleri vardır integer sayısal değişkenler string kelime değişkenleri char karakterikesel değişkenler Vs. Ama bunların türlerini belirlememize gerek yoktur Asp bunu karşılaştırıken String mi integermi olduğunu anlar. (dim degisken = interger böyle bir tip tanımlaması yoktur) Dim asp fonksiyonu ile beraber değişkenler tanımlanır. örnek olarak; dim degisken dim Asp yazmak için Notepad bile yeterlidir. ben bu işe notepadle başladım diyebilirim. Daha gelişmiş bir editör için FrontPage 2003 şiddetle önerilir. Yapılması gereken kodlar notepad veya başka bir editörde yazıldıktan sonra wwwroot klasörüne yani localhost ‘un IIS den gösterdigi dizine x.asp olarak kaydedilmesi yeterli olacaktır. (x = dosya adı) Asp Programlama dili <% ASP Nedir ? |
Uzaktan Destek-Yardım |
||||
|
Copyright © 2012 Burhan KARADERE Kişisel Blog Sayfası - All Rights Reserved - 1982- 2010 |
||||||
