1. VisualBasic / Говнокод #3088

    −90

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    ''' Список строк подключения.
	''' 	[Max Pro]	11.04.2007	Created
	Public Enum ConnectString
		Grata
		Grata6
		KuBi
		OneWindow
		OneWindowStat
		OWSite
		Wwwsde
		NoName
		OleGrata
		OleGrata6
		OleKuBi
		OleOneWindow
		OleOneWindowStat
		OleOWSite
		OleWwwsde
		OleNoName
	End Enum
	''' <summary>
	''' Выдаёт ограниченную дату и время для t/sql; tDateTime  ∈ [1900,2078], 
ограничивается только год, остальное остаётся вплоть до миллисекунд; переваривает все типы.
	''' </summary>
	''' <param name="o"></param>
	''' <returns></returns>
	''' <remarks>
	''' </remarks>
	''' <history>
	''' 	[Max Pro]	11.04.2007	Created
	''' 	[Max Pro]	13.04.2007	Улучшил.
	''' 	[Max Pro]	16.04.2007	Изменил наименование tDateTime2Tsql на tDateTsql.
	''' </history>
	''' -----------------------------------------------------------------------------
	Public Function tDateTsql(ByVal o) As Date
		Dim tDate As Date
		If bIsDateNet(o) Then tDate = o
		If Year(tDate) < 1900 Then tDate = New Date(1900, tDate.Month, tDate.Day, tDate.Hour, tDate.Minute, tDate.Second, tDate.Millisecond)
		If Year(tDate) > 2078 Then tDate = New Date(2078, tDate.Month, tDate.Day, tDate.Hour, tDate.Minute, tDate.Second, tDate.Millisecond)
		tDateTsql = tDate
	End Function
	'''

    Енум имени максима прохорова.
    И функция конферта даты. пыгает слово улучшил

    Запостил: ursus, 23 Апреля 2010

    Комментарии (6) RSS

    • ava Говногость 23.04.2010 18:27 # 0

      Запости весь код проекта и не мучайся. :D
      Ответить

      • ava ursus 26.04.2010 08:50 # −3

        вот. скоро выложу несколько сайтов имени максима прохорова с исходниками. договорится бы с говнокодом на домена третьего уровня и выкладывать абсолютное гавно
        Ответить

        • ava xXx_totalwar 26.04.2010 15:10 # 0

          это ты так чсв повышаешь? завидно что ему 90к платили?
          Ответить

          • ava guest 27.04.2010 15:16 # 0

            Он обычный обсосок злопамятный.
            Ответить

            • ava ursus 27.04.2010 16:16 # 0

              максим прохоров детектед
              Ответить

              • ava guest 27.04.2010 21:54 # 0

                Чини детектор. Это ж очевидно, что если человек постит сотни кода, который никому в хуй не дулся и под каждым пишет признание в любви к некоему херу с горы, следовательно, у него баттхёрт на тему того, что такие вот пидорасы хорошо живут. А тут хуй сосать без майонеза.
                Хорошо отомстил, топикстартер? Жертва плачет и выщипывает волосы на лобке?
                Ответить

    Добавить комментарий