Evet arkadaşlar. Vmware için size vereceğim bu kodlarla VDS lerinizi start stop veya listeleme yapabilirsiniz.
Kodlar ASP Scripttir. Linux Serverlarda Çalışmaz.
VDS Ana makinadaki VDS leri listeleme Kodu.

    Set Baglanti = CreateObject("VmCOM.VmConnectParams")
    Baglanti.hostname = "127.0.0.1"
    Baglanti.port = 902
    Baglanti.username = "Administrator"
    Baglanti.password = "sifre"
    set VmSunucusu = CreateObject("VmCOM.VmServerCtl")
    VmSunucusu.Connect Baglanti
    set vmlist = VmSunucusu.RegisteredVmNames
    for each config in vmlist
      Set vm = CreateObject("VmCOM.VmCtl")
      vm.Connect Baglanti, config      
	 Response.Write vm.Config("displayName")
	 Response.Write config
	 Response.Write vm.ExecutionState
	 Response.Write Vm.Uptime
	 Response.Write vm.Config("memsize")
      Set vm = Nothing
    next
    set VmSunucusu = Nothing
    set Baglanti = Nothing

VMware Sunucu VDS'leri açmak kapatmak Restart etmek için

	Function  VmWareIslem(VmxPath,Durum,VmIp, VmUser, VmPass, VmPort)
  	On Error Resume Next
  	Set Baglanti = CreateObject("VmCOM.VmConnectParams")
    	Baglanti.hostname = VmIp
    	Baglanti.username = VmUser
    	Baglanti.password = VmPass
    	Baglanti.port = VmPort
  	Set vm = CreateObject("VmCOM.VmCtl")
  	vm.Connect Baglanti, VmxPath
  		select case Durum
  		case "UP"
  			vm.Start(1)			
  		case "DOWN"
  			vm.Stop(1)
  		case "RESET"
  			vm.Reset(1)
  		case "SUSPEND"
  			vm.Suspent(1)
  		case else
  			VmWareIslem = 1
  			Exit Function
  		end select  
  	Set vm = Nothing
  	Set Baglanti = Nothing
  	if Err.Number = 0 Then
    		Islem = 0  
  	Else  
    		Islem = 1
    		Err.Clear  
  	End if
	End Function

VDS ana sunucuya buradaki eklentileri kurmanız gerekiyor ama.
Download VMware SDK & API - VMware
Son olarakta herkes faydalansın. VMWare Açık kaynak kodlu ücretsiz. Panelinide parayla almaktansa kendiniz yazın ve geliştirin. bizde sizlere yardımcı olalım. Sormak istediğiniz konu yada bişey olur ise. gelin seve seve yardımcı olurum. Üstelik parada almadan...