拡張子:txtvbswsfjsphpjavahtmlutf8sjis
<%
Function require( Url )

	Dim obj,strFunction

	Set obj = Server.CreateObject("Msxml2.ServerXMLHTTP.3.0")
	on error resume next
	Call obj.Open("GET", Url, False )
	if Err.Number <> 0 then
		require = False
		Exit Function
	end if
	on error goto 0
	obj.Send
	strFunction = obj.responseText
	ExecuteGlobal strFunction

	require = True

End Function

require( "http://lightbox.in.coocan.jp/baseFunction.vbs" )

'************************************************************
' 以下で使用されている関数は、baseFunction.vbs の中にあります
'************************************************************

' HTML をそのまま表示
print GetTextFile( Server.MapPath("entry.htm") )

' vbCrLf 付き表示( print2 )
print2 Han2Zen( "ABCDefg" )

print2 GetCpname()

' BR + vbCrLf ( print3 )
print3 WinDir()

print3 IsGroup( "123456", GroupString(1) )

print3 IsGroup( "123A456", GroupString(1) )

%>


リモートのファイルのキャラクタセットは UTF8N で。( 静的ファイルのデフォルト )
拡張子は、.vbs である必要はありません。
サーバーによりますが、どちらかと言えば、.txt のほうが問題が起きないでしょう。