Dim WinHttp As Object
Set WinHttp = CreateObject("Winhttp.WinHttpRequest.5.1")
With WinHttp
.Open "Get", URL, True
.Send
.WaitForResponse
origin = .ResponseText
End With
ÀÌ·± ½ÄÀ¸·Î ¹Þ¾Æ¿Ô¾î¿ä.
http://m.novel.naver.com/ncomment/ncommentList.nhn?novelId=409354&volumeNo=32
±Ü¾î¿Ã À¥ ÆäÀÌÁö´Â ¿©±âÀä, ±×³É ¼Ò½ºº¸±â·Î Çϸé [div class="u_comment_box u_comment_v2" id="comment_module"] [/div] ³»ºÎÀÇ ³»¿ëÀÌ ¼Ò½º¿£ ¾È³ª¿É´Ï´Ù. ±Ü¾î¿Â °Íµµ ¸¶Âù°¡Áö·Î ºñ¾îÀÖ´õ¶ó±¸¿ä.
Å©·Ò °³¹ßÀÚ ¸ðµå·Î µé¾î°¡¼ º¸´Â °Íó·³ ¾ÈÂÊÀÇ ³»¿ëÀ» ½Ï ´Ù ±Ü¾î¿Ã¶ó¸é ¾î¶»°Ô Çؾߵɰ¡¿ä.
¼±»ý´Ôµé µµ¿ò! µµ¿ò!
Áú¹® | 1810¸íÀÌ Àоú¾î¿ä. 3.17.154.171