Where I Am - source code

I cut and pasted most of it. =D (Sorry for the ASP .Net) earth.aspx function getDateVB() getDateVB = int((DateDiff("s", "1 Jan 1970", DateTime.Now) + Timer) * 1000)-(3600000*2) end function Function atan2(ys, xs) ' Given y and x coords returns atan2 ' by Jim Deutch, Syracuse, New York dim theta, pi pi = 3.1415926535897932384626433832795 If xs 0 Then theta = ...

http://sarahs-muse.livejournal.com/673595.html (Cached) 0 links
Published: 3 months, 1 week ago (Mon, 26 May 2008 03:59:46 PDT); 11 Kb

sarahs_muse

FileDownloader 2.0 Completed!

... all accomplished in 108 lines of VB.Net 2003 code: 1 2 3 ... Tmp.StartsWith( "OUTPUTDIR" ) Then Tmp = S.Substring(S.IndexOf( "="c ) + 1).Trim() If... Tmp.StartsWith( "REFERER" ) Then Ref = S.Substring(S.IndexOf( "="c ) + 1).Trim() ...Dim OutFile As String = Path & S.Substring(S.LastIndexOf( "="c ) + 1) If IO...http://www.somedomain.com/some/path/script.php?file=filename.ext and it...

Tags: .net programming visual basic.net

http://echo-8-era.livejournal.com/1949.html (Cached) 0 links
Published: 9 months, 3 weeks ago (Sun, 18 Nov 2007 04:54:51 PST); 16 Kb

echo_8_era

Собственный XML Data Binding для Delphi

... она позволяет создать схему из XML файла, и сгенерировать классы на C#, VB, J#, J#Script, C++ (Pascal в этом списке нет!). xsd.exe .xml [/outputdir:] ... // Делаем первую букву названия модуля заглавной имяМодуля = имяМодуля.Substring(0, 1).ToUpper() + имяМодуля.Substring(1); using ...[i] = 'а') && (str[i] = 1) { letter = letter.Substring(0, 1).ToUpper() + letter.Substring(1); }...

Tags: кодогенерация программирование

http://stden.livejournal.com/319909.html (Cached) 0 links
Published: 1 year, 4 months ago (Sun, 15 Apr 2007 05:55:41 PDT); 50 Kb

stden

	Home \| Journal tools \| Personal search form \| My account \| Bookmark \| FAQ \| Contact

Vb Script Substring

Where I Am - source code

FileDownloader 2.0 Completed!

Собственный XML Data Binding для Delphi