Jump to content

Msn 9 Katılımsız Yapma


Mehmet
 Share

Recommended Posts

arkadaşlar msn kurulumda şu yola [b]C:\Program Files\Common Files\Windows Live\.cache[/b]
bir kaç tane klasör içinde msi dosyası atıyor ben sadece [b]Messenger.msi[/b] katılımsız yapsam ilerde sorun olurmu acaba
çünki bilmediğim birsürü msi var diğerleri gereksiz değilmi sizce
[b]birde bunlar nedir tam olarak ne işe yarar katılımsız kurulumda sırası ile kurdurtmakmı lazım[/b]
wllogin.msi
dw20shared.msi
wlc.msi
choiceguard.msi
Contacts.msi
RichUpload.msi
crt.msi
WLXSuite.msi

[b]Edit:[/b]
birşeyler buldum ama bu bilginide pek bana yeteceğini sanmıyorum :)
Windows Live Messenger 2009
|
ekstra
| | ___ Choiceguard.msi (Choice Guard Installer)
| | ___ Contacts.msi (Windows Live Contacts kurulum paketi)
| | ___ Crt.msi (MSVCRT)
| | ___ RichUpload.msi (Windows Live Karşıya Yukleme Aracı)
| | ___ SegoeFont.msi (Segoe UI)
| | ___ Wlc.msi (Windows Live Call)
| | ___ Wllogin.msi (Windows Live OTURUM Açma Yardımcısı)
| | ___ WLXSuite.msi (Windows Live Installer)
|
Messenger.msi (Windows Live Messenger kurulum paketi)

Edited by MeHMeTBeN
Link to comment
Share on other sites

@blackman12
senin konuya ve çalışmana baktım birazda ordan faydalandım ve sonuç olarak msn bu şekilde katılımsız yaptım kaynak kodlarını vereyim katılımsız yapacak arkadaşlar faydalansın
önce msi dosyalarını bu yöntemle exe formatına çevirdim.
sadece mssenger.msi örneği versem yeterli diğer msi dosyalarıda aynı şekilde arasında fark olmadan sorunsuz exe formatına çevirebilirsiniz.
[b]FileInstall("Messenger.msi",$Program) değiştirmeniz yeterli[/b]
[codebox]
Global $Program = _TempFile(@TempDir,".msi")
Global $Parametre = "/qn"
FileInstall("Messenger.msi",$Program)
ShellExecuteWait($Program,$Parametre)
Sleep(1000)
FileDelete($Program)
Sleep(1000)
Func _TempFile($s_DirectoryName = @TempDir, $s_FileExtension = ".msi", $s_FilePrefix = "~", $i_RandomLength = 7)
Local $s_TempName
If StringRight($s_DirectoryName, 1) <> "\" Then $s_DirectoryName = $s_DirectoryName & "\"
Do
$s_TempName = ""
While StringLen($s_TempName) < $i_RandomLength
$s_TempName = $s_TempName & Chr(Random(97, 122, 1))
WEnd
$s_TempName = $s_DirectoryName & $s_FilePrefix & $s_TempName & $s_FileExtension
Until Not FileExists($s_TempName)
Return ($s_TempName)
EndFunc;==>_TempFile
[/codebox]
[b]sonrada[/b]
[codebox]
Opt("TrayMenuMode", 1)
TrayTip(".::MeHMeT::.UYARI!", "Windowslive messenger Yüklenirken lütfen bekleyiniz", 30, 4)
Sleep(3000)
_msnexe_FILE_INSTALL(@TempDir & "\")
Func _msnexe_FILE_INSTALL($NEREYE = @TEMPDIR,$UZERINI_YAZ = 1)
If StringRight($NEREYE, 1) <> "\" Then $NEREYE &= "\"
If $UZERINI_YAZ > 1 Or $UZERINI_YAZ < 0 Then $UZERINI_YAZ = 1
DirCreate($NEREYE & "msnexe")
FileInstall("msnexe\crtmsi.exe",$NEREYE & "msnexe\crtmsi.exe",$UZERINI_YAZ)
FileInstall("msnexe\messengermsi.exe",$NEREYE & "msnexe\messengermsi.exe",$UZERINI_YAZ)
FileInstall("msnexe\Contactsmsi.exe",$NEREYE & "msnexe\Contactsmsi.exe",$UZERINI_YAZ)
FileInstall("msnexe\wlloginmsi.exe",$NEREYE & "msnexe\wlloginmsi.exe",$UZERINI_YAZ)
FileInstall("msnexe\wlcmsi.exe",$NEREYE & "msnexe\wlcmsi.exe",$UZERINI_YAZ)

FileInstall("msnexe\dw20sharedmsi.exe",$NEREYE & "msnexe\dw20sharedmsi.exe",$UZERINI_YAZ)
FileInstall("msnexe\RichUploadmsi.exe",$NEREYE & "msnexe\RichUploadmsi.exe",$UZERINI_YAZ)
FileInstall("msnexe\SegoeFontmsi.exe",$NEREYE & "msnexe\SegoeFontmsi.exe",$UZERINI_YAZ)
FileInstall("msnexe\WLXSuitemsi.exe",$NEREYE & "msnexe\WLXSuitemsi.exe",$UZERINI_YAZ)
EndFunc
RunWait(@TempDir & "\msnexe\crtmsi.exe")
RunWait(@TempDir & "\msnexe\messengermsi.exe")
RunWait(@TempDir & "\msnexe\Contactsmsi.exe")
RunWait(@TempDir & "\msnexe\wlloginmsi.exe")
RunWait(@TempDir & "\msnexe\wlcmsi.exe")

RunWait(@TempDir & "\msnexe\dw20sharedmsi.exe")
RunWait(@TempDir & "\msnexe\RichUploadmsi.exe")
RunWait(@TempDir & "\msnexe\SegoeFontmsi.exe")
RunWait(@TempDir & "\msnexe\WLXSuitemsi.exe")
RegWrite('HKLM\SOFTWARE\Microsoft\Windows Live\Messenger', 'MultipleInstances', 'REG_DWORD', '1')
FileCreateShortcut(@ProgramFilesDir & "\Windows Live\Messenger\msnmsgr.exe",@DesktopDir & "\Windows Live Messenger",@ProgramFilesDir & "\Windows Live\Messenger")
DirRemove(@TempDir & "\msnexe" ,1)
TrayTip(".::MeHMeT::.", "Windowslive messenger Başarıyla Yüklendi", 10, 4)
Sleep(3000)
[/codebox]
[b][color="#FF0000"]Edit:Buda olmadı ama dikkatımı çeken bişiler buldum katılımsız yapan arkadaşların winrarla kapattıkları içeriğe baktığım zaman PFiles diye bir klasör görüyorum sanırım sorun bu olsa gerek[/color][/b]

Edited by MeHMeTBeN
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...