frmnetpp.frm

CS Game Server Config Build Tools VB Code

VERSION 5.00
Object = "{971D6962-F2BA-4C34-B141-B390E4AACB68}#3.2#0"; "PowerPlr.dll"
Begin VB.Form frmNetPP 
   Caption         =   "Form2"
   ClientHeight    =   4215
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   6060
   LinkTopic       =   "Form2"
   ScaleHeight     =   4215
   ScaleWidth      =   6060
   StartUpPosition =   3  'Windows Default
   Begin POWERPLRLib.PowerPlr netPP 
      Height          =   3375
      Left            =   180
      TabIndex        =   0
      Top             =   150
      Width           =   5355
      _Version        =   196610
      _ExtentX        =   9446
      _ExtentY        =   5953
      _StockProps     =   0
   End
   Begin VB.CommandButton btnPP 
      Caption         =   "Test"
      Height          =   315
      Left            =   4710
      TabIndex        =   2
      Top             =   3540
      Width           =   885
   End
   Begin VB.TextBox txtURL 
      Height          =   315
      Left            =   180
      TabIndex        =   1
      Top             =   3540
      Width           =   4485
   End
End
Attribute VB_Name = "frmNetPP"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit

Private Sub btnPP_Click()
    netPP.FileName = "0012000396002360039200231003880024000398002500044200285004230028900428002820038100207003590022800407002770042300247003990026000399002770040400258003690019300334002040032700197003280019800320001930031900191003110019300308002020033400212003640023800364002490034300216002760018000289001790028500176002810018200276001770027200178002680016900265001690026100170002560016200253001590024900160002450015500241001620023600158002320014900229001530022400148002200015000216001440021300144002090014300204001380020100146002100015600248001920023900194002450017800209001380024000182002370011700163001690020900114265752446720256362920014529316242813124400137319242451930060001290016900197001640017300096001440009400182001640017500142001050009300105000880009600091000950008500088000860008400080000840007900077000740008400140001310013200225"
    netPP.FlashFile = "http://movie.sun116.com/flash/movie.swf"
    netPP.TestFile = ""
    netPP.FileInfo = "超人归来（TC版） -- 第1集"
    netPP.AdList = ""
    netPP.MediaType = "1"
End Sub