Vagner Nunes

Olá amigos, Hoje gostaria de fazer um pedido atípico aos senhores. Tenho um bloco de nota fiscal, e está anota está com a data vencido, impossibilitando de estar emitindo está nota. O problema é que fiz um serviço para um cliente de otimização do site dele, que tenho desde 2010, e sempre passo a nota para ele, só que não tinha reparado nesta data vencida, pensei que estava para 2013 o seu vencimento ainda. O meu cliente até já me pagou, o valor de R$500,00, estou em uma situação ruim com ele devido a este problema, então gostaria de saber se alguém teria Nota Fiscal Eletrônica, para poder repassar para meu cliente. Daí repassaria os impostos da nota, para que me ajudasse neste sentido. Caso alguém poder me ajudar, passo posteriormente os dados para emissão, meu e-mail é vagnerngoulart@hotmail.com, gouarts@gouarts.com Sds, Vagner Nunes

Prezados, meu Windows está com alguns problemas, acredito que seja vírus, pois resolvo o problema, e depois quando o micro é iniciado novamente, volta tudo de novo. Apresenta problemas mais nos navegadores, trazendo até páginas do Hotmail e Facebook falsas. Log - HijackThis Logfile of Trend Micro HijackThis v2.0.4 Scan saved at 13:20:58, on 18/1/2012 Platform: Windows XP SP3 (WinNT 5.01.2600) MSIE: Internet Explorer v8.00 (8.00.6001.18702) Boot mode: Normal Running processes: C:\WINDOWS\System32\smss.exe C:\WINDOWS\system32\csrss.exe C:\WINDOWS\system32\winlogon.exe C:\WINDOWS\system32\services.exe C:\WINDOWS\system32\lsass.exe C:\ARQUIV~1\GbPlugin\GbpSv.exe C:\WINDOWS\system32\svchost.exe C:\WINDOWS\system32\svchost.exe C:\WINDOWS\System32\svchost.exe C:\WINDOWS\system32\svchost.exe C:\WINDOWS\system32\svchost.exe C:\Arquivos de programas\Alwil Software\Avast5\AvastSvc.exe C:\WINDOWS\system32\spoolsv.exe C:\Arquivos de programas\Avira\AntiVir Desktop\sched.exe C:\WINDOWS\system32\svchost.exe C:\Arquivos de programas\Firebird\Firebird_2_1\bin\fbguard.exe C:\Arquivos de programas\LogMeIn Hamachi\hamachi-2.exe C:\Arquivos de programas\Java\jre6\bin\jqs.exe C:\Arquivos de programas\MagicTune Premium\MagicTuneEngine.exe C:\Arquivos de programas\Microsoft SQL Server\MSSQL10.SQLEXPRESS\MSSQL\Binn\sqlservr.exe C:\Arquivos de programas\Nero\Update\NASvc.exe C:\Arquivos de programas\CDBurnerXP\NMSAccessU.exe c:\Arquivos de programas\Arquivos comuns\Protexis\License Service\PsiService_2.exe C:\Arquivos de programas\Microsoft SQL Server\90\Shared\sqlwriter.exe C:\WINDOWS\system32\svchost.exe C:\WINDOWS\Explorer.EXE C:\Arquivos de programas\TortoiseSVN\bin\TSVNCache.exe C:\WINDOWS\RTHDCPL.EXE C:\WINDOWS\system32\igfxtray.exe C:\WINDOWS\system32\hkcmd.exe C:\WINDOWS\system32\igfxpers.exe C:\ARQUIV~1\ALWILS~1\Avast5\avastUI.exe C:\WINDOWS\system32\igfxsrvc.exe C:\Arquivos de programas\Adobe\Acrobat 9.0\Acrobat\Acrotray.exe C:\WINDOWS\Twain_32\Fjscan32\SOP\FtLnSOP.exe C:\WINDOWS\Twain_32\fjscan32\FjtwSetup.exe C:\Arquivos de programas\Arquivos comuns\Java\Java Update\jusched.exe C:\Arquivos de programas\LogMeIn Hamachi\hamachi-2-ui.exe C:\WINDOWS\system32\ctfmon.exe C:\Arquivos de programas\Messenger\msmsgs.exe C:\WINDOWS\reader.exe C:\Arquivos de programas\PFU\Error Recovery Guide\FTErGuid.exe C:\Arquivos de programas\MagicTune Premium\GammaTray.exe C:\Arquivos de programas\Firebird\Firebird_2_1\bin\fbserver.exe C:\WINDOWS\system32\wscntfy.exe C:\WINDOWS\System32\alg.exe C:\Arquivos de programas\MagicTune Premium\MagicTune.exe C:\Tecsystem\Tecsystem Support\SUPPORT.exe C:\Arquivos de programas\Adobe\Adobe Dreamweaver CS4\Dreamweaver.exe C:\Arquivos de programas\Arquivos comuns\Macrovision Shared\FLEXnet Publisher\FNPLicensingService.exe C:\Arquivos de programas\Arquivos comuns\Java\Java Update\jucheck.exe C:\Arquivos de programas\IObit\Advanced SystemCare 5\ASCService.exe C:\Arquivos de programas\IObit\Advanced SystemCare 5\ASC.exe C:\Arquivos de programas\IObit\Advanced SystemCare 5\ASCTray.exe C:\Arquivos de programas\FileZilla FTP Client\filezilla.exe C:\WINDOWS\system32\dllhost.exe C:\WINDOWS\system32\msdtc.exe C:\WINDOWS\system32\inetsrv\inetinfo.exe C:\WINDOWS\Microsoft.NET\Framework\v4.0.30319\mscorsvw.exe C:\WINDOWS\system32\dllhost.exe C:\Documents and Settings\Franklin\Configurações locais\Dados de aplicativos\Google\Chrome\Application\chrome.exe C:\Documents and Settings\Franklin\Configurações locais\Dados de aplicativos\Google\Chrome\Application\chrome.exe C:\Documents and Settings\Franklin\Configurações locais\Dados de aplicativos\Google\Chrome\Application\chrome.exe C:\Documents and Settings\Franklin\Configurações locais\Dados de aplicativos\Google\Chrome\Application\chrome.exe C:\Documents and Settings\Franklin\Configurações locais\Dados de aplicativos\Google\Chrome\Application\chrome.exe C:\Arquivos de programas\Internet Explorer\iexplore.exe C:\WINDOWS\system32\notepad.exe C:\Arquivos de programas\Internet Explorer\iexplore.exe C:\Documents and Settings\Franklin\Configurações locais\Dados de aplicativos\Google\Chrome\Application\chrome.exe C:\Documents and Settings\Franklin\Configurações locais\Dados de aplicativos\Google\Chrome\Application\chrome.exe C:\Arquivos de programas\Mozilla Firefox\firefox.exe C:\Arquivos de programas\Mozilla Firefox\plugin-container.exe C:\Arquivos de programas\IObit\Advanced SystemCare 5\DiskScan.exe C:\Documents and Settings\Franklin\Desktop\HijackThis.exe C:\WINDOWS\system32\wbem\wmiprvse.exe R1 - HKCU\Software\Microsoft\Internet Explorer\Main,Search Page = &http://home.microsoft.com/intl/br/access/allinone.asp R0 - HKCU\Software\Microsoft\Internet Explorer\Main,Start Page = R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Default_Page_URL = http://go.microsoft.com/fwlink/?LinkId=69157 R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Default_Search_URL = http://go.microsoft.com/fwlink/?LinkId=54896 R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Search Page = http://go.microsoft.com/fwlink/?LinkId=54896 R0 - HKLM\Software\Microsoft\Internet Explorer\Main,Start Page = http://go.microsoft.com/fwlink/?LinkId=69157 R1 - HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings,ProxyOverride = local O2 - BHO: Adobe PDF Reader Link Helper - {06849E9F-C8D7-4D59-B87D-784B7D6BE0B3} - C:\Arquivos de programas\Arquivos comuns\Adobe\Acrobat\ActiveX\AcroIEHelper.dll O2 - BHO: AcroIEHelperStub - {18DF081C-E8AD-4283-A596-FA578C2EBDC3} - C:\Arquivos de programas\Arquivos comuns\Adobe\Acrobat\ActiveX\AcroIEHelperShim.dll O2 - BHO: Adobe PDF Conversion Toolbar Helper - {AE7CD045-E861-484f-8273-0445EE161910} - C:\Arquivos de programas\Arquivos comuns\Adobe\Acrobat\ActiveX\AcroIEFavClient.dll O2 - BHO: G-Buster Browser Defense - {C41A1C0E-EA6C-11D4-B1B8-444553540000} - C:\ARQUIVOS DE PROGRAMAS\GBPLUGIN\gbieh.dll O2 - BHO: G-Buster Browser Defense BANESTES - {C41A1C0E-EA6C-11D4-B1B8-444553540017} - C:\Arquivos de programas\GbPlugin\gbiehbnt.dll O2 - BHO: Java Plug-In 2 SSV Helper - {DBC80044-A445-435b-BC74-9C25C1C588A9} - C:\Arquivos de programas\Java\jre6\bin\jp2ssv.dll O2 - BHO: Microsoft Web Test Recorder 10.0 Helper - {DDA57003-0068-4ed2-9D32-4D1EC707D94D} - C:\Arquivos de programas\Microsoft Visual Studio 10.0\Common7\IDE\PrivateAssemblies\Microsoft.VisualStudio.QualityTools.RecorderBarBHO100.dll O2 - BHO: JQSIEStartDetectorImpl - {E7E6F031-17CE-4C07-BC86-EABFE594F69C} - C:\Arquivos de programas\Java\jre6\lib\deploy\jqs\ie\jqs_plugin.dll O2 - BHO: SmartSelect - {F4971EE7-DAA0-4053-9964-665D8EE6A077} - C:\Arquivos de programas\Arquivos comuns\Adobe\Acrobat\ActiveX\AcroIEFavClient.dll O3 - Toolbar: Adobe PDF - {47833539-D0C5-4125-9FA8-0819E2EAAC93} - C:\Arquivos de programas\Arquivos comuns\Adobe\Acrobat\ActiveX\AcroIEFavClient.dll O3 - Toolbar: DAEMON Tools Toolbar - {32099AAC-C132-4136-9E9A-4E364A424E17} - C:\Arquivos de programas\DAEMON Tools Toolbar\DTToolbar.dll O3 - Toolbar: &Save Flash - {4064EA35-578D-4073-A834-C96D82CBCF40} - C:\Arquivos de programas\Save Flash\SaveFlash.dll O4 - HKLM\..\Run: [RTHDCPL] RTHDCPL.EXE O4 - HKLM\..\Run: [igfxTray] C:\WINDOWS\system32\igfxtray.exe O4 - HKLM\..\Run: [HotKeysCmds] C:\WINDOWS\system32\hkcmd.exe O4 - HKLM\..\Run: [Persistence] C:\WINDOWS\system32\igfxpers.exe O4 - HKLM\..\Run: [Adobe Reader Speed Launcher] "C:\Arquivos de programas\Adobe\Reader 8.0\Reader\Reader_sl.exe" O4 - HKLM\..\Run: [avast5] C:\ARQUIV~1\ALWILS~1\Avast5\avastUI.exe /nogui O4 - HKLM\..\Run: [AdobeCS4ServiceManager] "C:\Arquivos de programas\Arquivos comuns\Adobe\CS4ServiceManager\CS4ServiceManager.exe" -launchedbylogin O4 - HKLM\..\Run: [Adobe Acrobat Speed Launcher] "C:\Arquivos de programas\Adobe\Acrobat 9.0\Acrobat\Acrobat_sl.exe" O4 - HKLM\..\Run: [Acrobat Assistant 8.0] "C:\Arquivos de programas\Adobe\Acrobat 9.0\Acrobat\Acrotray.exe" O4 - HKLM\..\Run: [CloneCDTray] "C:\Arquivos de programas\SlySoft\CloneCD\CloneCDTray.exe" /s O4 - HKLM\..\Run: [FtLnSOP_setup] C:\WINDOWS\Twain_32\Fjscan32\SOP\FtLnSOP.exe O4 - HKLM\..\Run: [FJTWAIN Setup] C:\WINDOWS\Twain_32\fjscan32\FjtwSetup.exe /Station O4 - HKLM\..\Run: [sunJavaUpdateSched] "C:\Arquivos de programas\Arquivos comuns\Java\Java Update\jusched.exe" O4 - HKLM\..\Run: [LogMeIn Hamachi Ui] "C:\Arquivos de programas\LogMeIn Hamachi\hamachi-2-ui.exe" --auto-start O4 - HKLM\..\RunOnce: [KB2492386] rundll32.exe apphelp.dll,ShimFlushCache O4 - HKCU\..\Run: [CTFMON.EXE] C:\WINDOWS\system32\ctfmon.exe O4 - HKCU\..\Run: [Google Update] "C:\Documents and Settings\Franklin\Configurações locais\Dados de aplicativos\Google\Update\GoogleUpdate.exe" /c O4 - HKCU\..\Run: [MSMSGS] "C:\Arquivos de programas\Messenger\msmsgs.exe" /background O4 - HKCU\..\Run: [winstep] C:\WINDOWS\reader.exe O4 - HKCU\..\Run: [Advanced SystemCare 5] "C:\Arquivos de programas\IObit\Advanced SystemCare 5\ASCTray.exe" /AutoStart O4 - HKUS\S-1-5-19\..\Run: [CTFMON.EXE] C:\WINDOWS\system32\CTFMON.EXE (User 'LOCAL SERVICE') O4 - HKUS\S-1-5-20\..\Run: [CTFMON.EXE] C:\WINDOWS\system32\CTFMON.EXE (User 'NETWORK SERVICE') O4 - HKUS\S-1-5-21-1708537768-220523388-725345543-1019\..\Run: [CTFMON.EXE] C:\WINDOWS\system32\CTFMON.EXE (User '?') O4 - HKUS\S-1-5-18\..\Run: [CTFMON.EXE] C:\WINDOWS\system32\CTFMON.EXE (User 'SYSTEM') O4 - HKUS\.DEFAULT\..\Run: [CTFMON.EXE] C:\WINDOWS\system32\CTFMON.EXE (User 'Default user') O4 - Global Startup: Error Recovery Guide.lnk = ? O4 - Global Startup: GammaTray.lnk = ? O9 - Extra button: Pesquisar - {92780B25-18CC-41C8-B9BE-3C9C571A8263} - C:\ARQUIV~1\MICROS~2\OFFICE11\REFIEBAR.DLL O9 - Extra button: (no name) - {e2e2dd38-d088-4134-82b7-f2ba38496583} - C:\WINDOWS\Network Diagnostic\xpnetdiag.exe O9 - Extra 'Tools' menuitem: @xpsp3res.dll,-20001 - {e2e2dd38-d088-4134-82b7-f2ba38496583} - C:\WINDOWS\Network Diagnostic\xpnetdiag.exe O9 - Extra button: Messenger - {FB5F1910-F110-11d2-BB9E-00C04F795683} - C:\Arquivos de programas\Messenger\msmsgs.exe O9 - Extra 'Tools' menuitem: Windows Messenger - {FB5F1910-F110-11d2-BB9E-00C04F795683} - C:\Arquivos de programas\Messenger\msmsgs.exe O14 - IERESET.INF: SEARCH_PAGE_URL=&http://home.microsoft.com/intl/br/access/allinone.asp O15 - Trusted Zone: http://www.banestes.com.br O16 - DPF: {DB6BF2CD-4F59-4F1C-AA9C-D08C0B61A931} (GbpDistObj Class) - https://seg.banestes.com.br/plugin/GbpDist.cab O17 - HKLM\System\CCS\Services\Tcpip\..\{AC895F7D-76D0-4195-8831-2B71C8053877}: NameServer = 10.3.129.1,10.3.129.2 O20 - Winlogon Notify: GbPluginBb - C:\Arquivos de programas\GbPlugin\gbieh.dll O20 - Winlogon Notify: GbPluginBnt - C:\Arquivos de programas\GbPlugin\gbiehBnt.dll O22 - SharedTaskScheduler: Pré-carregador Browseui - {438755C2-A8BA-11D1-B96B-00A0C90312E1} - C:\WINDOWS\system32\browseui.dll O22 - SharedTaskScheduler: Daemon de cache de categorias de componente - {8C7461EF-2B13-11d2-BE35-3078302C2030} - C:\WINDOWS\system32\browseui.dll O23 - Service: Advanced SystemCare Service 5 (AdvancedSystemCareService5) - IObit - C:\Arquivos de programas\IObit\Advanced SystemCare 5\ASCService.exe O23 - Service: Avira AntiVir Programador (AntiVirSchedulerService) - Avira GmbH - C:\Arquivos de programas\Avira\AntiVir Desktop\sched.exe O23 - Service: avast! Antivirus - AVAST Software - C:\Arquivos de programas\Alwil Software\Avast5\AvastSvc.exe O23 - Service: avast! Mail Scanner - AVAST Software - C:\Arquivos de programas\Alwil Software\Avast5\AvastSvc.exe O23 - Service: avast! Web Scanner - AVAST Software - C:\Arquivos de programas\Alwil Software\Avast5\AvastSvc.exe O23 - Service: Firebird Guardian - DefaultInstance (FirebirdGuardianDefaultInstance) - Firebird Project - C:\Arquivos de programas\Firebird\Firebird_2_1\bin\fbguard.exe O23 - Service: Firebird Server - DefaultInstance (FirebirdServerDefaultInstance) - Firebird Project - C:\Arquivos de programas\Firebird\Firebird_2_1\bin\fbserver.exe O23 - Service: FLEXnet Licensing Service - Acresso Software Inc. - C:\Arquivos de programas\Arquivos comuns\Macrovision Shared\FLEXnet Publisher\FNPLicensingService.exe O23 - Service: Gbp Service (GbpSv) - - C:\ARQUIV~1\GbPlugin\GbpSv.exe O23 - Service: Google Update Service (gupdate) (gupdate) - Google Inc. - C:\Arquivos de programas\Google\Update\GoogleUpdate.exe O23 - Service: Serviço do Google Update (gupdatem) (gupdatem) - Google Inc. - C:\Arquivos de programas\Google\Update\GoogleUpdate.exe O23 - Service: LogMeIn Hamachi Tunneling Engine (Hamachi2Svc) - LogMeIn Inc. - C:\Arquivos de programas\LogMeIn Hamachi\hamachi-2.exe O23 - Service: Java Quick Starter (JavaQuickStarterService) - Sun Microsystems, Inc. - C:\Arquivos de programas\Java\jre6\bin\jqs.exe O23 - Service: MagicTuneEngine - Unknown owner - C:\Arquivos de programas\MagicTune Premium\MagicTuneEngine.exe O23 - Service: @C:\Arquivos de programas\Nero\Update\NASvc.exe,-200 (NAUpdate) - Nero AG - C:\Arquivos de programas\Nero\Update\NASvc.exe O23 - Service: NMSAccess - Unknown owner - C:\Arquivos de programas\CDBurnerXP\NMSAccessU.exe O23 - Service: Protexis Licensing V2 (PSI_SVC_2) - Protexis Inc. - c:\Arquivos de programas\Arquivos comuns\Protexis\License Service\PsiService_2.exe -- End of file - 13023 bytes

Valeu... Obrigado pelas dicas. Vou tentar aqui uma outra forma...

Não possibilidade dele identificar um IP de Rede, e permitir a gravação.

Prezados, Baixei um script de Enquete e fiz uma modificação nele.Esse sistema funciona direitinho, ele cadastra um log com o IP do cara e data, etc. Porém, quando existe uma Rede de Computadores, por exemplo, se eu votar, ou meu colega, não pode mais votar, porque, eu já votei. Tem como adaptar esse código para saber diferenciar IP e IP de Rede? Uma forma que dois ou mais coputadores, consiga votar normalmente? Segue código: <% Function String_GetFullPath( strVirtualPath ) String_GetFullPath = Server.MapPath( strVirtualPath ) String_GetFullPath = Replace(String_GetFullPath,"/","\") End Function Function PollMentor_GetDatabaseConn() Dim oRet Dim strDSN strDSN = "Driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("dados/enquete.mdb") Set oRet = Server.CreateObject ("ADODB.Connection") oRet.Open strDSN Set PollMentor_GetDatabaseConn = oRet End Function Function PollMentor_GetTitle() PollMentor_GetTitle = "Enquete" End Function Function PollMentor_TryToVote( sID, nNumber ) Dim sRet, strSQL Dim oConn Set oConn = PollMentor_GetDatabaseConn() 'Get real id... Dim oRS If sID = -1 Then Set oRS = oConn.Execute("select id from poll where active=true") sID = oRS("id").Value oRS.Close Set oRS= Nothing End If If PollMentor_CanUserVote( oConn, sID ) = False Then sRet = "Você já votou nesta enquete. Não é possível votar novamente." Else strSQL = "update poll set count" & nNumber & " = count" & nNumber & " +1 where " If nNumber =-1 Then strSQL = strSQL & " active=true" Else strSQL = strSQL & " id=" & sID End If oConn.Execute strSQL oConn.Execute "insert into votelog(poll_id, ip) values(" & sID & ",'" & Request.ServerVariables( "REMOTE_ADDR" ) & "')" sRet = "Obrigado por participar." End If oConn.Close Set oConn = Nothing PollMentor_TryToVote=sRet End Function Function PollMentor_CanUserVote( oConn, sID ) ' 'Check of user already has voted within 24 hours? 'If so then no voting can be done... ' Here's your chance to display some other content '1. Check IP address Dim strSQL, sTime, oRS sTime = DateAdd( "d", -Request.Form("time"), now() ) strSQL = "select id from votelog where poll_id=" & sID & " AND datum < #"&sTime & "# AND ip='" & Request.ServerVariables( "REMOTE_ADDR" ) & "'" Set oRS = oConn.Execute(strSQL) If oRS.EOF Then PollMentor_CanUserVote = True Else PollMentor_CanUserVote = False End If oRS.Close Set oRS = Nothing End Function Function PollMentor_GetPollInfo ( ByVal nID, ByRef sTitle, ByRef sQuestion, ByRef vAnswers, ByRef vCount ) Dim sRet, strSQL Dim oConn, oRS, nCount Set oConn = PollMentor_GetDatabaseConn() strSQL = "select * from poll where " If nID = -1 Then strSQL = strSQL & " active=true" Else strSQL = strSQL & " id=" & nID End If Set oRS = oConn.Execute(strSQL) If oRS.EOF Then PollMentor_GetPollInfo = False Else sTitle=PollMentor_GetTitle() sQuestion=oRS("question") For nCount=1 To 8 vAnswers(nCount)=oRS("answer" & CStr(nCount)) vCount(nCount)=oRS("count" & CStr(nCount)) Next PollMentor_GetPollInfo = True End If oRS.Close Set oRS = Nothing oConn.Close Set oConn = Nothing End Function %> Abraços pessoal, Valeu, Sds, Vagner Nunes

Prezados, a máquina de um cliente, está reiniciando sozinho, apresentando erros inesperados, segue abaixo LOG para análise. Logfile of Trend Micro HijackThis v2.0.4 Scan saved at 10:28:29, on 02/04/2011 Platform: Windows 7 (WinNT 6.00.3504) MSIE: Internet Explorer v8.00 (8.00.7600.16722) Boot mode: Normal Running processes: C:\Windows\system32\Dwm.exe C:\Windows\Explorer.EXE C:\Windows\system32\taskhost.exe C:\Program Files\Avira\AntiVir Desktop\avgnt.exe C:\Windows\Vm_sti.exe C:\Program Files\Common Files\Java\Java Update\jusched.exe C:\Program Files\DAEMON Tools Lite\DTLite.exe C:\Users\Welington\AppData\Roaming\Octoshape\Octoshape Streaming Services\OctoshapeClient.exe C:\Users\Welington\AppData\Local\Google\Update\GoogleUpdate.exe C:\Program Files\Microsoft Office\Office14\ONENOTEM.EXE C:\Program Files\Internet Explorer\iexplore.exe C:\Program Files\Internet Explorer\iexplore.exe C:\Program Files\Microsoft\Search Enhancement Pack\SCServer\SCServer.exe C:\Windows\system32\Macromed\Flash\FlashUtil10o_ActiveX.exe C:\Program Files\Avira\AntiVir Desktop\avcenter.exe C:\Windows\system32\taskmgr.exe C:\Program Files\Internet Explorer\iexplore.exe C:\Program Files\Windows Live\Messenger\msnmsgr.exe C:\HijackThis\HijackThis.exe R0 - HKCU\Software\Microsoft\Internet Explorer\Main,Start Page = http://search.conduit.com?SearchSource=10&ctid=CT2903601 R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Default_Page_URL = http://go.microsoft.com/fwlink/?LinkId=69157 R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Default_Search_URL = http://search.minilua.com/ R1 - HKLM\Software\Microsoft\Internet Explorer\Main,Search Page = http://search.minilua.com/ R0 - HKLM\Software\Microsoft\Internet Explorer\Main,Start Page = http://home.sweetim.com R1 - HKLM\Software\Microsoft\Internet Explorer\Search,Default_Search_URL = http://search.minilua.com/ R0 - HKLM\Software\Microsoft\Internet Explorer\Search,SearchAssistant = R1 - HKCU\Software\Microsoft\Internet Explorer\SearchURL,(Default) = http://search.minilua.com/q/%s R0 - HKCU\Software\Microsoft\Internet Explorer\Toolbar,LinksFolderName = R3 - URLSearchHook: TV Bar 1.3 Toolbar - {71e2a01d-715c-4c08-963a-c0b84fedadf8} - C:\Program Files\TV_Bar_1.3\prxtbTV_2.dll R3 - URLSearchHook: Productivity 2.2 Toolbar - {e84cc2c1-b722-48fc-a39c-edb8b525c777} - C:\Program Files\Productivity_2.2\prxtbPro0.dll O2 - BHO: Conduit Engine - {30F9B915-B755-4826-820B-08FBA6BD249D} - C:\Program Files\ConduitEngine\prxConduitEngin0.dll O2 - BHO: (no name) - {5C255C8A-E604-49b4-9D64-90988571CECB} - (no file) O2 - BHO: Search Helper - {6EBF7485-159F-4bff-A14F-B9E3AAC4465B} - C:\Program Files\Microsoft\Search Enhancement Pack\Search Helper\SEPsearchhelperie.dll O2 - BHO: TV Bar 1.3 - {71e2a01d-715c-4c08-963a-c0b84fedadf8} - C:\Program Files\TV_Bar_1.3\prxtbTV_2.dll O2 - BHO: Groove GFS Browser Helper - {72853161-30C5-4D22-B7F9-0BBC1D38A37E} - C:\PROGRA~1\MICROS~2\Office14\GROOVEEX.DLL O2 - BHO: Auxiliar de Conexão do Windows Live - {9030D464-4C02-4ABF-8ECC-5164760863C6} - C:\Program Files\Common Files\Microsoft Shared\Windows Live\WindowsLiveLogin.dll O2 - BHO: SkypeIEPluginBHO - {AE805869-2E5C-4ED4-8F7B-F1F7851A4497} - C:\Program Files\Skype\Toolbars\Internet Explorer\skypeieplugin.dll O2 - BHO: URLRedirectionBHO - {B4F3A835-0E21-4959-BA22-42B3008E02FF} - C:\PROGRA~1\MICROS~2\Office14\URLREDIR.DLL O2 - BHO: Bing Bar BHO - {d2ce3e00-f94a-4740-988e-03dc2f38c34f} - C:\Program Files\MSN Toolbar\Platform\6.3.2322.0\npwinext.dll O2 - BHO: Java Plug-In 2 SSV Helper - {DBC80044-A445-435b-BC74-9C25C1C588A9} - C:\Program Files\Java\jre6\bin\jp2ssv.dll O2 - BHO: Windows Live Toolbar Helper - {E15A8DC0-8516-42A1-81EA-DC94EC1ACF10} - C:\Program Files\Windows Live\Toolbar\wltcore.dll O2 - BHO: Productivity 2.2 - {e84cc2c1-b722-48fc-a39c-edb8b525c777} - C:\Program Files\Productivity_2.2\prxtbPro0.dll O3 - Toolbar: TV Bar 1.3 Toolbar - {71e2a01d-715c-4c08-963a-c0b84fedadf8} - C:\Program Files\TV_Bar_1.3\prxtbTV_2.dll O3 - Toolbar: @C:\Program Files\MSN Toolbar\Platform\6.3.2322.0\npwinext.dll,-100 - {8dcb7100-df86-4384-8842-8fa844297b3f} - C:\Program Files\MSN Toolbar\Platform\6.3.2322.0\npwinext.dll O3 - Toolbar: Productivity 2.2 Toolbar - {e84cc2c1-b722-48fc-a39c-edb8b525c777} - C:\Program Files\Productivity_2.2\prxtbPro0.dll O3 - Toolbar: Conduit Engine - {30F9B915-B755-4826-820B-08FBA6BD249D} - C:\Program Files\ConduitEngine\prxConduitEngin0.dll O3 - Toolbar: &Windows Live Toolbar - {21FA44EF-376D-4D53-9B0F-8A89D3229068} - C:\Program Files\Windows Live\Toolbar\wltcore.dll O4 - HKLM\..\Run: [bCSSync] "C:\Program Files\Microsoft Office\Office14\BCSSync.exe" /DelayServices O4 - HKLM\..\Run: [avgnt] "C:\Program Files\Avira\AntiVir Desktop\avgnt.exe" /min O4 - HKLM\..\Run: [bigDogPath] C:\Windows\VM_STI.EXE VIMICRO USB PC Camera O4 - HKLM\..\Run: [sunJavaUpdateSched] "C:\Program Files\Common Files\Java\Java Update\jusched.exe" O4 - HKCU\..\Run: [DAEMON Tools Lite] "C:\Program Files\DAEMON Tools Lite\DTLite.exe" -autorun O4 - HKCU\..\Run: [Octoshape Streaming Services] "C:\Users\Welington\AppData\Roaming\Octoshape\Octoshape Streaming Services\OctoshapeClient.exe" -inv:bootrun O4 - HKCU\..\Run: [cacaoweb] "C:\Users\Welington\AppData\Roaming\cacaoweb\cacaoweb.exe" -noplayer O4 - HKCU\..\Run: [Google Update] "C:\Users\Welington\AppData\Local\Google\Update\GoogleUpdate.exe" /c O4 - Startup: OneNote 2010 Screen Clipper and Launcher.lnk = C:\Program Files\Microsoft Office\Office14\ONENOTEM.EXE O9 - Extra button: Incluir no Blog - {219C3416-8CB2-491a-A3C7-D9FCDDC9D600} - C:\Program Files\Windows Live\Writer\WriterBrowserExtension.dll O9 - Extra 'Tools' menuitem: &Incluir no Blog no Windows Live Writer - {219C3416-8CB2-491a-A3C7-D9FCDDC9D600} - C:\Program Files\Windows Live\Writer\WriterBrowserExtension.dll O9 - Extra button: Skype Plug-In - {898EA8C8-E7FF-479B-8935-AEC46303B9E5} - C:\Program Files\Skype\Toolbars\Internet Explorer\skypeieplugin.dll O9 - Extra 'Tools' menuitem: Skype Plug-In - {898EA8C8-E7FF-479B-8935-AEC46303B9E5} - C:\Program Files\Skype\Toolbars\Internet Explorer\skypeieplugin.dll O16 - DPF: {D27CDB6E-AE6D-11CF-96B8-444553540000} (Shockwave Flash Object) - http://fpdownload2.macromedia.com/get/shoc...ash/swflash.cab O17 - HKLM\System\CCS\Services\Tcpip\..\{6C45FDB1-D11D-4A50-A19F-E0035BDDE8BD}: NameServer = 4.2.2.2,4.2.2.3 O17 - HKLM\System\CS1\Services\Tcpip\..\{6C45FDB1-D11D-4A50-A19F-E0035BDDE8BD}: NameServer = 4.2.2.2,4.2.2.3 O17 - HKLM\System\CS2\Services\Tcpip\..\{6C45FDB1-D11D-4A50-A19F-E0035BDDE8BD}: NameServer = 4.2.2.2,4.2.2.3 O18 - Protocol: skype-ie-addon-data - {91774881-D725-4E58-B298-07617B9B86A8} - C:\Program Files\Skype\Toolbars\Internet Explorer\skypeieplugin.dll O18 - Protocol: skype4com - {FFC8B962-9B40-4DFF-9458-1830C7DD7F5D} - C:\PROGRA~1\COMMON~1\Skype\SKYPE4~1.DLL O18 - Filter hijack: text/xml - {807573E5-5146-11D5-A672-00B0D022E945} - C:\Program Files\Common Files\Microsoft Shared\OFFICE14\MSOXMLMF.DLL O23 - Service: Avira AntiVir Programador (AntiVirSchedulerService) - Avira GmbH - C:\Program Files\Avira\AntiVir Desktop\sched.exe O23 - Service: Avira AntiVir Guard (AntiVirService) - Avira GmbH - C:\Program Files\Avira\AntiVir Desktop\avguard.exe O23 - Service: Google Update Service (gupdate) (gupdate) - Google Inc. - C:\Program Files\Google\Update\GoogleUpdate.exe O23 - Service: KMService - Unknown owner - C:\Windows\system32\srvany.exe O23 - Service: NVIDIA Display Driver Service (nvsvc) - NVIDIA Corporation - C:\Windows\system32\nvvsvc.exe O23 - Service: PunkBuster (PnkBstrA) - Unknown owner - C:\Program Files\Electronic Arts\Medal of Honor Airborne\UnrealEngine3\MOHAGame\pb\PnkBstrA.exe O23 - Service: NVIDIA Stereoscopic 3D Driver Service (Stereo Service) - NVIDIA Corporation - C:\Program Files\NVIDIA Corporation\3D Vision\nvSCPAPISvr.exe -- End of file - 7827 bytes Abraços a todos

Prezados, Bom dia. Tenho aqui comigo, um cadastro de notícias, está funcionando certinho. Agora o cliente está querendo, uma opção que ao cadastrar a notícia, existe uma opção de enviar essa notícia recém cadastrada para usuários cadastrados no site. Se não selecionar essa opção de envio, não disparar os e-mail com a notícia recém cadastrada. Sds, Vagner Nunes

Valeu Bareta, vou usar sua sugestão. o Addthis.com

Prezados, Tenho aqui um banco de notícias, onde as notícias são gravadas, e abre uma página de detalhe da notícia, buscando pelo ID. Gostaria de inserir aqueles botões de compartilhar em Redes Sociais (Twitter, Facebook e Orkut), já inserir as variáveus para buscar títulos e links da noticia, mas o problema que quando clicar no botão que redireciona o site, ele abrir no Twitter e Facebook, todo desconfigurado, não aceita acentuação. O que posso fazer neste caso? Queria fazer o compatilhamento igual ao G1. http://g1.globo.com/revolta-arabe/noticia/...de-misrata.html Valeu pessoal, Sds, Vagner Nunes

Perfeito... Valeu Bareta. Funcionou corretamente aqui.

Malwarebytes Anti-Malware: LOG HijackThis

Prezados, Bom dia. Minha máquina está muito lenda, já passei antivírus, Desfragmentador, etc. Passei o HijackThis v2.0.4 e abaixo está o LOG para análise. Sds, Vagner Nunes

Prezados, Segue abaixo, o meu código que faz a inserção, gostaria que quando ao clicar Cadastrar no form, faça o INSERT, porém exclua o registro mais antigo. <% Dim conexao, titulo, video, audio, data titulo = Request.form("titulo") video = Request.form("video") audio = Request.form("audio") data = Request.form("data") Set Conexao= Server.CreateObject("ADODB.Connection") Conexao.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\teste1\banco.mdb;" Conexao.execute "INSERT INTO videos (titulo, video, audio, data) values ('"&titulo&"','"&video&"','"&audio&"','"&data&"')" Response.write("Vídeo cadastrado com sucesso") Conexao.close %> Queria fazer este procedimento.... Obrigado pessoal....

Prezados, Boa tarde. Gostaria de saber como posso fazer para limitar um cadastro em banco, e quanto atingir a quantidade estabelecida, o próximo registro, excluir o mais antigo. Ex.: Tenho no banco e uma tabela que possui 5 registros, e quando alguém fazer o cadastro do 6º registro, automaticamente, excluir o registro mais antigo, por exemplo o 1º. Como posso fazer isso? Obrigado pessoal.... Sds, Vagner Nunes

Achei um site completinho do que estava querendo. Alguém conhece algum sistema similar, ou me ajudaria a desenvolver algo parecido? http://www.eyercize.com/practice/bm_read/

Prezados, Em relação a esse sistema de Leitura dinâmica, que estava querendo, achei um JavaScript que seria mais ou menos o que estou querendo, mas o problema é que ele seleciona grupo de palavras, mas gostaria que ele selecionasse um grupo por linha, e não continuasse a seleção na linha de baixo. E também tem como fazer ele funciona sem ser em um Textarea. Veja: http://www.gouarts.com/Scripts/ditador.htm Segue arquivos: Página <!DOCTYPE HTML PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"><head> <meta http-equiv="content-type" content="text/html; charset=ISO-8859-1"> <title>Leitura Dinamica</title> <link rel="stylesheet" href="ditador_arquivos/style.css"> <script src="ditador_arquivos/jquery.js"></script> <script src="ditador_arquivos/jquery-ui-slider.js"></script> <script type="text/javascript" src="ditador_arquivos/jscolor.js"></script> <script src="ditador_arquivos/rsvp.js"></script> <script src="ditador_arquivos/pagespecific.js"></script> <link type="text/css" href="ditador_arquivos/style_002.css" rel="stylesheet"> <script src="ditador_arquivos/script.js" type="text/javascript"></script> <script type="text/javascript"> function submitRating(evt) { var tmp = evt.target.getAttribute('id').substr(5); var widgetId = tmp.substr(0, tmp.indexOf('_')); var starNbr = tmp.substr(tmp.indexOf('_')+1); $.get("./feedback.php", { ratingID: widgetId, ratingValue: starNbr}, function(data){ $(".rating_stars").html("Thank you!"); } ); } function jqueryInit() { init_rating(); $('span.rating_stars img').bind('click', submitRating); } $(document).ready(jqueryInit); function openFeedbackForm(){ $("#feedback_div").show(); } function hideFeedbackForm(){ $("#feedback_div").hide(); } function submitFeedback(){ $.get("./feedback.php", { feedback: $("#feedback_text").val() }, function(data){ $("#feedback_div").html("Thank you for your comment."); setTimeout(function(){ $("#feedback_div").hide('slow'); }, 2000); } ); } </script> </head><body> <h2><noscript> </noscript> </h2> <div style="margin: 0px 0px 15px 15px;"></div> <div id="feedback_div" style="margin: 0px 0px 15px 15px; display: none;"><form action="./feedback.php" method="get"><textarea id="feedback_text" rows="3" cols="40"></textarea><br><input value="Send comment" onclick="submitFeedback()" type="button"><input value="Hide form" onclick="hideFeedbackForm()" type="button"></form></div> <div id="tabs"> <ul id="tabs_ul"> <li id="textinput_tab"> <a href="#" id="current" onclick="showtab(1); return false;"> Escreva um texto </a> </li> <li id="playback_tab"> <a id="" href="#" onclick="showtab(2); return false;"> Visualizar </a> </li> <li id="info_tab"></li> </ul> </div> <div style="display: block;" id="textinput_pane" class="tab_pane"> <div id="input_text"> Para teste escreva um texto aqui!<br>&nbsp;<br> <textarea id="input_text_ta" cols="70" rows="10">A maioria das pessoas, quando perguntada, diz que não gosta de ler, porque isto lhe dá sono. Na verdade, não é a leitura que dá sono, e sim o modo como ela é realizada. Devido ao modo como aprendemos a ler, as pessoas ficam com hábitos prejudiciais de leitura , tais como: 1) Sub-vocalização(leitura como os lábios ou com a garganta) 2) Leitura Linear (palavra por palavra) 3) Leitura desatenta (com constantes re-leituras do mesmo trecho, e uma baixa retenção do conteúdo lido) Também em razão deste tipo de leitura, as pessoas acostumam-se a ler pouco, o que acarreta na maioria dos casos num pequeno repertório de palavras. Assim, qualquer palavra que desconheçam (devido a pouca leitura) provoca-lhe um desconforto interno incosciente, que elas (as pessoas) procuram justificar-se dizendo para si próprio e para os outros que não gosta muito de ler. Existem, então, dois motivos básicos pelos quais você lê errado: 1) o modo como aprendeu a ler. 2) ler de modo inconstante. Na verdade, um decorre do outro: você lê pouco, devido ao modo como aprendeu a ler. É claro que isto não significa que não saiba ler; isto significa apenas que, em sua aprendizagem, foi imposto um limite à sua velocidade de leitura, limite este que você jamais tentou superar. Quando se ensina uma pessoa a ler, as palavras são divididas em sílabas, para facilitar a aprendizagem da leitura. Além disso, as palavras são lidas em voz alta, sílaba por sílaba. Infelizmente, depois de aprendida a leitura, as pessoas continuam a ler fazendo esta vocalização das palavras; mesmo que silenciosamente. Na verdade, este é o maior obstáculo à leitura rápida. Para aprender a ler dinamicamente, de um modo veloz e produtivo, você deve mudar o seu método de leitura, o que se pode conseguir com um treinamento especial. Primeiro, você deve perder o hábito de sub-vocalizar as palavras. depois, deve habituar-se a enxergar o conjunto de palavras, ao invés das palavras isoladas. À medida que progredir nos exercícios, você conseguirá enxergar blocos cada vez maiores de palavras de uma só vez. Com o exercícios, você conseguirá enxergar blocos cada vez maiores de palavras de um só vez. Com os exercícios de atenção, aprenderá a aumentar a sua atenção durante a leitura, o que fará que retenha cada vez mais o conteúdo do que ler. A velocidade que conseguir atingir, a par desta retenção de conteúdo, darão um prazer cada vez maior às suas leituras. Faço os seus exercícios progressivamente, sem pressa e sem pular nenhum, de modo persistente. Escolha um lugar sossegado, e procure colocar-se de modo relaxado e receptivo, confiando que irá conseguir o que deseja. </textarea> <br>&nbsp;<br> <a href="#" onclick="startNewPlayback(); return false;" title="Começar" onmouseover="$(this).find('img').attr('src', 'ditador_arquivos/playthattext2.jpg'); return false;" onmouseout="$(this).find('img').attr('src', 'ditador_arquivos/playthattext.jpg'); return false;"><img src="ditador_arquivos/playthattext.jpg"></a> </div> </div> <div style="display: none;" id="playback_pane" class="tab_pane"> <div id="display">input some text <br>and click "Play <br></div> <div id="viewerTa_div" class="controls_div"> <div style="margin-bottom: 8px;"><a href="#" onclick="$('#viewer_ta').toggle();" style="text-decoration: none;"><b>Ocultar/Mostrar Scroller</b></a>. <small>(Esse recurso só funciona no Firefox e no Internet Explorer - A rolagem não aparece em outros navegadores!)</small></div> <textarea id="viewer_ta" rows="5" cols="70"></textarea> </div> <div id="playback_controls" class="controls_div"> <table id="controls_table"> <tbody><tr> <td> <a href="#" onclick="playButtonCallback(); return false;" class="playback_control_a"><img src="ditador_arquivos/play.gif"></a> <a href="#" onclick="pauseButtonCallback(); return false;" class="playback_control_a"><img src="ditador_arquivos/pause.gif"></a> <a href="#" onclick="rewindButtonCallback(); return false;" class="playback_control_a"><img src="ditador_arquivos/rewind.gif"></a> </td> <td> <div class="ui-slider" id="slider_div"> <a href="#" style="border: medium none; outline-color: -moz-use-text-color; outline-style: none; outline-width: medium;"><div style="left: 70.07px;" class="ui-slider-handle"></div></a> </div> </td> </tr> </tbody></table> </div> <div id="settings" class="controls_div"> <table id="settings_table"> <tbody> <tr> <td>Números de Linhas (A): <input size="3" id="numLines" value="2" onchange="recomputeWpm()" type="text">&nbsp;&nbsp;</td> <td>Palavras por linha (B): <input size="3" id="wordsPerLine" value="3" onchange="recomputeWpm()" type="text"></td> </tr> <tr> <td>Grupos por minutos(C): <input size="3" id="groupsPerMinute" value="100" onchange="recomputeWpm()" type="text">&nbsp;&nbsp;</td> <td>(Calculo) Palavras por minutos (A*B*C): <input size="3" value="600" id="wordsPerMinute" onchange="recomputeWpm()" disabled="true" type="text"></td> </tr> <tr> <td style="text-align: left; font-weight: bold; font-size: 10pt;"> Você também pode pressionar para cima / baixo nas setas do teclado <br> para aumentar / diminuir a velocidade. </td> <td style="text-align: right;"> <input value="Salvar Modificações" onclick="changeSettingsButtonCallback();" type="button"> </td> </tr> </tbody> </table> </div> <div id="colors_div" class="controls_div" style="padding: 5px 0pt;"> Cor de Fundo: <input style="background-color: #FFFFFF; color: rgb(0, 0, 0);" autocomplete="off" class="color" id="bg_color" size="6" value="#FFFFFF"> &nbsp;&nbsp;&nbsp;Cor do Texto: <input style="background-color: rgb(0, 0, 0); color: rgb(255, 255, 255);" autocomplete="off" class="color" id="text_color" size="6" value="000000"> </div> </div> <div style="display: none;" id="info_pane" class="tab_pane"> <h3>&nbsp;</h3> </body></html> pagespecific.js // --------------------------------------------------------------------------- // Functions that bind the UI to the Rsvp object function extractSettings(){ return { 'numLines': parseInt($('#numLines').val()), 'wordsPerLine': parseInt($('#wordsPerLine').val()), 'groupsPerMinute': parseInt($('#groupsPerMinute').val()) }; } function changeSettingsButtonCallback(){ var newSettings = extractSettings(); if($("#display").data('rsvpInstance')) $("#display").data('rsvpInstance').changeSettings(newSettings); recomputeWpm(); } function recomputeWpm(){ var newSettings = extractSettings(); $("#wordsPerMinute").val( newSettings.numLines * newSettings.wordsPerLine * newSettings.groupsPerMinute); } function _incrementSpeed(wpm_plus){ var rsvpInstance = $("#display").data('rsvpInstance'); if(rsvpInstance){ newGpm = rsvpInstance.incrementSpeed(wpm_plus); $('#groupsPerMinute').val(newGpm); recomputeWpm(); } } function startNewPlayback(){ showtab(2); var oldInstance = $("#display").data( 'rsvpInstance'); if(oldInstance){ oldInstance.destroy(); } $('#viewer_ta').val($('#input_text_ta').val()); var rsvpInstance = new Rsvp( $("#input_text_ta").val(), $('#display'), extractSettings(), $('#slider_div'), $('#viewer_ta') ); $("#display").data( 'rsvpInstance', rsvpInstance ); rsvpInstance.start(); } function handleSlideEvent(e, ui){ var newValue = ui.value; var rsvpInstance = $("#display").data('rsvpInstance'); if(rsvpInstance){ if(!rsvpInstance.sliderEventDisabled){ rsvpInstance.moveToPercentage(newValue / 200); } } } function playButtonCallback(){ var rsvpInstance = $("#display").data('rsvpInstance'); if(rsvpInstance){ rsvpInstance.playOrResume(); } } function pauseButtonCallback(){ var rsvpInstance = $("#display").data('rsvpInstance'); if(rsvpInstance){ rsvpInstance.pause(); } } function rewindButtonCallback(){ var rsvpInstance = $("#display").data('rsvpInstance'); if(rsvpInstance){ rsvpInstance.rewind(); } } $(function(){ $('#slider_div').slider({ min: 0, max: 200, startValue: 0, slide: handleSlideEvent }); }); // --------------------------------------------------------------------------- // Tabs and cosmetic code, unrelated to the Rsvp object function _hideAllTabs(tabnum){ $('#textinput_tab a').attr('id', ''); $('#playback_tab a').attr('id', ''); $('#info_tab a').attr('id', ''); $('#textinput_pane').hide(); $('#playback_pane').hide(); $('#info_pane').hide(); } function _getTab(tabnum){ switch(tabnum){ case 1: return $('#textinput_tab a'); case 2: return $('#playback_tab a'); case 3: return $('#info_tab a'); } } function _getPane(tabnum){ switch(tabnum){ case 1: return $('#textinput_pane'); case 2: return $('#playback_pane'); case 3: return $('#info_pane'); } } function _showOneTab(tabnum){ var tab = _getTab(tabnum); var pane = _getPane(tabnum); tab.attr('id', 'current'); pane.show(); } function showtab(tabnum){ _hideAllTabs(); _showOneTab(tabnum); } function _keyupHandler(event){ keycode = event.keyCode; if(keycode == 38){ // up key _incrementSpeed(10) }else if(keycode == 40){ // down key _incrementSpeed(-10) } return false; } function _setBgColor(color){ $("#display").css("background-color", "#"+color); $("#viewer_ta").css("background-color", "#"+color); } function _setFgColor(color){ $("#display").css("color", "#"+color); $("#viewer_ta").css("color", "#"+color); } $(function(){ // To use the text given by the bookmarklet var qs = window.location.search; if(qs && qs.length > 1){ $('#input_text_ta').val(decodeURIComponent(qs.substring(1))); } showtab(1); $(".playback_control_a img") .mouseover(function(){ $(this).css('background-color', '#888'); }) .mouseout(function(){ $(this).css('background-color', '#aaa'); }); $(document).keyup(_keyupHandler); $("#bg_color").change( function(){ _setBgColor( $("#bg_color").val() ); } ); $("#text_color").change( function(){ _setFgColor( $("#text_color").val() ); } ); $("#viewer_ta").keydown(_keyupHandler); }); rsvp.js function Rsvp(text, targetDiv, settings, slider, viewerTa){ this._text = text; this._targetDiv = targetDiv; this._slider = slider; this._viewerTa = viewerTa; this.changeSettings(settings); this._initializeFromText(text); this._nextWordIndex = 0; this._curTimeout = null; this.sliderEventDisabled = false; this._playing = false; this._destroyed = false; } Rsvp.fn = Rsvp.prototype; Rsvp.fn._initializeFromText = function(text){ // match a word and a bunch of non-word-stuff // "g" is important if we want lastIndex to be remembered in match object var regex = new RegExp("([^\\s]+)\\s+", "mg"); this._words = []; this._wordPositions = []; var match = null; var i = 0; var lastLastIndex = 0; while((match = regex.exec(text)) != null){ this._words[i] = match[1]; this._wordPositions[i] = lastLastIndex; lastLastIndex = regex.lastIndex; i++; } // last word if there's some text remaining this._words[i] = text.substring(lastLastIndex); this._wordPositions[i] = lastLastIndex; i++; // To make the final iteration in selectRange work this._wordPositions[i] = text.length-1; } Rsvp.fn.destroy = function(){ this.pause(); this._destroyed = true; } Rsvp.fn.changeSettings = function(settings){ this._numLines = settings.numLines; this._wordsPerLine = settings.wordsPerLine; this._groupsPerMinute = settings.groupsPerMinute; this._wordsPerGroup = this._numLines * this._wordsPerLine; this._msPerGroup = 60 * 1000 / this._groupsPerMinute; } Rsvp.fn.incrementSpeed = function(wpm_plus){ this._groupsPerMinute += wpm_plus; if(this._groupsPerMinute < 1){ alert("Minimum at 1 group per minute"); this._groupsPerMinute = 1; } this._msPerGroup = 60 * 1000 / this._groupsPerMinute; return this._groupsPerMinute; } Rsvp.fn.start = function(){ this._playing = true; this.nextFrame(); } Rsvp.fn.nextFrame = function(){ this.showTextRange(); // Adjust slider this.sliderEventDisabled = true; var pos = (this._nextWordIndex - this._wordsPerGroup) / (this._words.length - this._wordsPerGroup) * 200; $(this._slider).slider("moveTo", Math.round(pos), 0); this.sliderEventDisabled = false; // Timer for next frame if(this._playing && this._nextWordIndex < this._words.length){ this.setTimeout(); } } Rsvp.fn.moveToPercentage = function(percent){ var startWord = Math.floor(percent * this._words.length); // Round to correct start word (ie. if wordsPerGroup = 4, // we want groups to start at 0, 4, 8, ...) startWord -= startWord % this._wordsPerGroup; this.showTextRange(startWord); } Rsvp.fn.showTextRange = function(firstWordIndex){ if(firstWordIndex === undefined) firstWordIndex = this._nextWordIndex; this._nextWordIndex = firstWordIndex; var resHtml = ""; var firstWordBeginPos = this._wordPositions[firstWordIndex]; for(var i=0; i<this._numLines; i++){ for(var j=0; j<this._wordsPerLine; j++){ if(this._nextWordIndex >= this._words.length){ this._playing = false; break; } resHtml += this._words[this._nextWordIndex] + " "; this._nextWordIndex++; } if(this._nextWordIndex >= this._words.length){ this._playing = false; break; } resHtml += "<br/>"; } var lastWordEndPos = this._wordPositions[this._nextWordIndex]; this.selectRangeInViewer(firstWordBeginPos, lastWordEndPos); $(this._targetDiv).html(resHtml); } Rsvp.fn.setTimeout = function(){ if(this._destroyed) // no more setting of timeout after this point... // otherwise it might conflict with another object return; // make sure the old timeout is cleared, otherwise timers compete if(this._curTimeout) clearTimeout(this._curTimeout); var self = this; this._curTimeout = setTimeout( function(){ self.nextFrame(); }, this._msPerGroup ); } Rsvp.fn.pause = function(){ clearTimeout(this._curTimeout); this._playing = false; } Rsvp.fn.playOrResume = function(){ this._playing = true; this.setTimeout(); } Rsvp.fn.rewind = function(){ this._nextWordIndex = 0; this.nextFrame(); } Rsvp.fn.selectRangeInViewer = function(start, end){ var ta = $(this._viewerTa).get(0); if(!$(this._viewerTa).is(":visible")){ return; } if (ta.createTextRange) { var oRange = ta.createTextRange(); oRange.collapse(true); oRange.moveStart("character", start); oRange.moveEnd("character", end-start); oRange.select(); } else if (ta.setSelectionRange) { ta.setSelectionRange(start,start+1); // causes scrolling to caret position in IE, seen there: // http://bytes.com/forum/thread496726.html // Only works in Firefox... Opera and Safari won't collaborate if(window.KeyEvent){ var ev = document.createEvent ('KeyEvents'); ev.initKeyEvent('keypress', true, true, window, false, false, false, false, 0, ta.value.charCodeAt(start)); ta.dispatchEvent(ev); } ta.setSelectionRange(start, end); } //$(this._viewerTa).blur(); } Sds, Vagner Nunes

Prezados, Uma boa tarde a todos... Estou desenvolvendo um site para um cliente, e ele me solicitou, uma forma de quando uma pessoa abrir um artigo grande para leitura, e de acordo que a página é aberta, e em fração de segundos, e destacando em amarelo o texto, em três grupos de palavras, até o final do artigo. Ex.: A página abrirá um texto gravado no banco MySQL (já está pronto) e ao abrir destacando as palavras em grupo de três palavras. E se possível, ter uma forma de aumentar a velocidade desta marcação para a pessoa desenvolver a leitura com uma maior velocidade. Não sei se posso fazer isso é PHP ou Javascript, alguém poderia me ajudar neste sentindo. Sds, Vagner Nunes

Olá, é isso mesmo, porém como faço para implementar o caso abaixo também. <% dim mostrar1 mostrar1=resultado_total IF mostrar1 => 60 then Response.Write "Aprovado" ELSEIF mostrar1 < 60 then Response.Write "Recuperação" ELSE END IF %> Como posso fazer para implementar o SELECT Case na situação acima, gostaria de, que quando for preenchido o campo situacao, o resultado_total, mostrar o CASE que estiver no banco, TE = Transferido, caso não tenha nada no campo situação, mostrar o IF acima. Há como? <% Select Case resultado_total Case TE response.write("Transferido") Case RP response.write("Remanejado") Case DE response.write("Desistente") Case EV response.write("Evadido") End Select %> Sds, Vagner Nunes

Prezados, Preciso da ajuda dos senhores mais uma vez. Tenho uma tabela chamada NOTAS, nesta tabela existem um campo chamado situação. Gostaria de saber como posso fazer fazer para mostrar quando tiver alguma informação neste campo. Está assim atualmente: <% dim mostrar1 mostrar1=resultado_total IF mostrar1 => 60 then Response.Write "Aprovado" ELSEIF mostrar1 < 60 then Response.Write "Recuperação" ELSE END IF %> Mas queria que se tivesse algo no campo, em vez de aparecer Aprovado ou Recuperação, mostrar o que está no campo. No campo a as seguintes situação: TE = Transferido RP = Remanejado DE = Desistente EV = Evadido No banco é gravado só a sigla, mas gostaria de fosse mostrado e inscrição do que é: Obrigado, Vagner Nunes

Prezado, Consegui resolver aqui, criei uma funcao e cada funcao uma variavel, daí fiz uma outra funcao somandos todas as variáveis, ficou legal, funcionou beleza. Valeu aí. Sds, Vagner Nunes

Prezados, Bom dia. Estou com um problemão aqui. Tenho uma tabela chamada notas, onde é cadastrado, todo tipo de informação, referentes a notas faltas, etc, de cada aluno. nesta tabela existe um campo chamado faltas e trimestre, e preciso somar os valores deste campo. Ex.: ID Codigo Aluno ... Faltas Trimestre 1 1 Fulano de tal 10 1º TRIMESTRE 2 1 Fulano de tal 10 2º TRIMESTRE 3 1 Fulano de tal 10 3º TRIMESTRE Daí para aparecer na ficha da turma, fiz três SELECTs para cada Trimestre, então, tenho que somar os três trimestres, porém aparece o erro: Estou utilizando o seguinte código para somar os valores, porém esse código funciona com três SELECT também, mas na tabela notas não está atendendo. <% dim aulas_dadas1, aulas_dadas2, aulas_dadas3, aulas_dadas_total aulas_dadas1=(Diario.Fields.Item("aulas").Value) aulas_dadas2=(Diario2.Fields.Item("aulas").Value) aulas_dadas3=(Diario3.Fields.Item("aulas").Value) aulas_dadas_total = Cint(aulas_dadas1) + Cint(aulas_dadas2) + Cint(aulas_dadas3) Response.Write aulas_dadas_total %> Obrigado, Sds, Vagner Nunes

Prezados, Boa noite. Estou prestes a pegar a administração de Rede de uma empresa que possui 15 computadores e 3 impressoras, gostaria de saber quanto posso cobrar para administrar essa rede para fazer uma visita uma vez na semana, e ficar a disposição para eventuais falhas,dentre outros para esse cliente. Gostaria de fazer uma contrato mensal. Gostaria de saber também com os senhores no Windows Server 2003, há possibilidade de gerar algum relatório de acessos das estações de trabalho, como acesso, dia, hora, etc.? Obrigado, Sds, Vagner Nunes

Prezados, Estou desenvolvendo uma intranet para professores de uma instituição de ensino, então, cheguei em uma parte, agora que ficou meio complicado, que é o diário de Classe ou Pauta. Onde os professores assinala o controle de Faltas, com presença e faltas com F. Segue modelo abaixo. Para começar a minha primeira dúvida é a seguinte! Como posso fazer a estrutura de tabelas, estou utilizando o Access. Pauta Modelo Obrigado, Sds, Vagner Nunes

Prezados, Problema resolvido, utilizei a situação abaixo: total1 = Cint((percent2 * 100) / total) & "%"

Prezados, Como posso fazer o cálculo da porcentagem de dois valores impresso. Código abaixo: <% dim percent1, percent2, total, total1 'Recebe os 2 valores cadastrado no banco percent1 = total_matricula percent2 = alunos_transf 'Calculando as variáveis... total = Cint(percent1) + Cint(percent2) total1 = Cint(percent2 / total * 100) & "%" Response.Write(total1) %> Em um exemplo, no banco existe um total de 20 matriculas, em outro campos é digitado o valor de 10 alunos em Transferências, sendo assim, teria que me dar o resultado de 50%, pois é metade de 20, é o código acima, está mostrando 33%. Como posso fazer neste caso descrito acima. Abraços a todos aí! Sds, Vagner Nunes