跪求《计算机网络》作业设计

这是我们宿舍的规划图用visio?画图保存成jpg?，二楼是这栋楼的核心，3456都汇聚到二楼再从一楼到学生宿舍总的汇聚。配置信息Building?configuration...

Current?configuration?:?3065?bytes

!

version?RGOS?10.2(4),?Release(56502)(Sun?May?31?16:48:11?CST?2009?-ngcf51)

!

aaa?new-model

!

!

aaa?group?server?radius?default

server?**********************

!

!

aaa?accounting?update?periodic?30

aaa?accounting?update

aaa?accounting?network?default?start-stop?group?radius

aaa?authentication?dot1x?default?group?radius?local?none

!

!

vlan?1

!

vlan?200

!

vlan?301

!

!

username?admin?password?7?**************

service?password-encryption

!

!

ip?default-gateway?*************!

!

radius-server?host?1.1.1.1

radius-server?key?7?111111111111111

enable?secret?5?1111111111111111111111

!

!

!

!

dot1x?accounting?default

dot1x?authentication?default

dot1x?probe-timer?alive?130

dot1x?client-probe?enable

hostname?XS_26_08_2[1d]

interface?FastEthernet?0/1

switchport?mode?trunk

!

interface?FastEthernet?0/2

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/3

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/4

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/5

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/6

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/7

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/8

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/9

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/10

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/11

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/12

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/13

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/14

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/15

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/16

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/17

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/18

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/19

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/20

switchport?access?vlan?301 dot1x?port-control?auto

!

interface?FastEthernet?0/21

switchport?mode?trunk

!

interface?FastEthernet?0/22

switchport?mode?trunk

!

interface?FastEthernet?0/23

switchport?mode?trunk

!

interface?FastEthernet?0/24

switchport?mode?trunk

!

interface?GigabitEthernet?0/25

switchport?mode?trunk

!

interface?GigabitEthernet?0/26

switchport?mode?trunk

!

interface?VLAN?1

ip?address?192.168.2.1?255.255.252.0 no?shutdown

!

!

snmp-server?host?192.168.1.1?traps?version?2c?public

snmp-server?enable?traps

snmp-server?community?ruijie?rw

line?con?0

line?vty?0?4

password?7?**********************!

!

end

用VB编写限制电脑运行时间的程序。成功的话追加100！

01

Hey Jude

Hey Jude, don't make it bad.

Take a sad song and make it better.

Remember to let her into your heart,

Then you can start to make it better.

Hey Jude, don't be afraid.

You were made to go out and get her.

The minute you let her under your skin,

Then you begin to make it better.

And anytime you feel the pain, hey Jude, refrain,

Don't carry the world upon your shoulders.

For well you know that it's a fool who plays it cool

By making his world a little colder.

Hey Jude, don't let me down.

You have found her, now go and get her.

Remember to let her into your heart,

Then you can start to make it better.

So let it out and let it in, hey Jude, begin,

You're waiting for someone to perform with.

And don't you know that it's just you, hey Jude, you'll do,

The movement you need is on your shoulder.

Hey Jude, don't make it bad.

Take a sad song and make it better.

Remember to let her under your skin,

Then you'll begin to make it

Better better better better better better, oh.

Da da da da da da, da da da, hey Jude...

02

Silent All These Years

Excuse me but can I be you for a while

My dog won't bite if you sit real still

I got the Anti-Christ in the kitchen yellin' at me again

Yeah I can hear that

Been saved again by the garbage truck

I got something to say you know but nothing comes

Yes I know what you think of me you never shut up

Yeah I can hear that

But what if I'm a mermaid

In these jeans of his with her name still on it

Hey but I don't care

Cause sometimes I said sometimes I hear my voice and it's been

here

silent all these years

So you found a girl who thinks really deep thoughts

What's so amazing about really deep thoughts

Boy you best pray that I bleed real soon

How's that thought for you

My scream got lost in a paper cup

You think there's a heaven where some screams have gone

I got 25 bucks and a cracker do you think it's enough

To get us there

But what if I'm a mermaid

In these jeans of his with her name still on it

Hey but I don't care

Cause sometimes

I said sometimes

I hear my voice and it's been

here

silent all these..

Years go by will I still be waiting

For somebody else to understand

Years go by if I'm stripped of my beauty

And the orange clouds raining in my head

Years go by will I choke on my tears

Till finally there is nothing left

One more casualty

You know we're too

easy

easy

easy

Well I love the way we communicate

Your eyes focus on my funny lip shape

Let's hear what you think of me now

but baby don't look up

The sky is falling

Your mother shows up in a nasty dress

It's your turn now to stand where I stand

Everybody lookin' at you

here take hold of my hand

Yeah I can hear them

But what if I'm a mermaid

In these jeans of his with her name still on it

Hey but I don't care

Cause sometimes

I said sometimes I hear my voice

I hear my voice

I hear my voice

And it's been

here

silent all these years

I've been here

silent all these years

Silent all these

Silent all these years

03

Sometimes Love Just Ain't Enough

I don't wanna lose you,

I don't wanna use you

just to have sombody by my side

And I don't wanna hate you

I don't wanna take you

But I don't wanna be the one to cry

That don't really matter to anyone, anymore

But like a fool I keep losing my place

And I keep seeing you walk through that door

But there's a danger in loving somebody too much

And its sad when you know it's your heart you can't trust

There's a reason why people don't stay where they are

Baby sometimes love just ain't enough

Now I could never change you

I don't wanna blame you

Baby you don't have to take the fall

Yes I may have hurt you

But I did not desert you

Maybe I just want to have it all

It makes a sound like thunder

It makes me feel like rain

And like a fool who will never see the truth

I keep thinking something's gonna change

But there's a danger in loving somebody too much

And its sad when you know it's your heart you can't trust

There's a reason why people don't stay where they are

Baby sometimes love just ain't enough

And there's no way home

when it's late at night and you're all alone

Are there things that you wanted to say

Do you feel me beside you in your bed

there beside you where I used to lay

And there's a Danger in Loving somebody too much

And it's sad when you know it's your heart they can't touch

There's a reason why people don't stay who they are

Cause baby sometimes love just ain't enough

Baby sometimes love just ain't enough

04

That I would be good

That I would be good even if I did nothing

That I would be good even if I got the thumbs down

That I would be good if I got and stayed sick

That I would be good even if I gained ten pounds

That I would be fine even if I went bankrupt

That I would be good if I lost my hair and my youth

That I would be great if I was no longer queen

That I would be grand if I was not all knowing

That I would be loved even when I numb myself

That I would be good even when I am overwhelmed

That I would be loved even when I was fuming

That I would be good even if I was clingy

That I would be good even if I lost sanity

That I would be good

Whether with or without you

05

Venus

Goddess on the mountain top

Burning like a silver flame

The summit of beauty and love

And Venus was her name

She's got it?Yeah, baby, she's got it

I'm your Venus, I'm your fire

At your desire

Well, I'm your Venus, I'm your fire

At your desire

Her weapons were her crystal eyes

Making every man a man

Black as the dark night she was

Got what no-one else had

Wa!

She's got it?Yeah, baby, she's got it

I'm your Venus, I'm your fire

At your desire

Well, I'm your Venus, I'm your fire

At your desire

Goddess on the mountain top

Burning like a silver flame

The summit of beauty and love

And Venus was her name

She's got it?Yeah, baby, she's got it

I'm your Venus, I'm your fire

At your desire

Well, I'm your Venus, I'm your fire

At your desire

06

someone

my hair was long shining

you said you can't believe

how could walk our that door

or walk along the streets

you told me i should you know

do some bing bang curly wurly afro thing

i took your word did

looked in my mirror

who's that freak

why does the world deceive

why do i make believe

took my heel made

achilles out of me still

so i won't wanna be

someone who's answer to me

someone who sees like a child

give like a saint

feel like an angel

never mind the broken wings

and speak like a picture

cry like the rain

shine like the star

as long as the fire remains

the vase beside my bed

it's empty a most dead

it's for all the flowers i'm gonna give you he said

and now it's collecting qust instead

07

We Will Get There

作词:* Lee 作曲:* Lee

remember the days, we sat out together with faith?

remember the times, so fine, when we thought that

nothing could stand in our way?

then things weren\'t the same

the life that we knew had to change

we\'ve struggled through, the darkest storms

we thought we couldn\'t tame

together we\'ve tried,

as we stood side by side

i knew we\'d build a new world

a world of hope for ever after

＊chorus

deep in my heart i just know

right from the start, we will grow

look where we are, we\'ve come so far

and there\'s still a long, long way to go

with all of my heart, i will care

i\'ll play my part, i will share

with family and friends, together we\'ll stand

and in the end, hand in hand

we will get there

so now we begin, working together to win

believing in trust, it must

be possible to overcome anything.

there\'s so much to do

there\'s so much we can contribute

by sharing just a little love

we will start again anew

so why don\'t we try? if we stand side by side

i know we\'ll build a new world

a world of hope for ever after

08

My Story,Your Song

曲： 李伟菘 词： 孙燕姿

Is your smile genuine Are you that really kind

Do you like money & what it can bring

Where would you wanna hide What would you seek

Would you want what you thought What you want if no one can see

See the pretty lights pretty smiles a long way from home

See the wretched stars burnt-out sun Out on your own

See our story come sing along What would you know

This is your song Oh I know where I'd rather be

So I'm holding on and going strong Join the race

I'll be first place Give me glue we'll be good as new

09

Tonight, I feel close to you

Close my eyes and feel your mind

Time has passed

I walk like a shadow

Never knew what I am going through

You touch my heart and take my breath away

Whisper on the wind so softly

Let the bright stars fill our dreams with love

Reach for your hand (You're holding my key)

And you show me the way

Tonight, I feel close to you

You open my door and light the sky above

When I need a friend, you are there right by my side

I wish we could stay as one

I wish we could stay forever as one

All the tears that haunt my past

You promised it'll be better tomorrow

Play that song

You and I listened to

And let it gently ease our pain

Tender rain drops from the blue sky

Flowers blooming, life is so divine

Like sunlight on a stream (You're holding my key)

You show the world to me

Tonight, I feel close to you

You open my door and light the sky above

When I need a friend, you are there right by my side

I wish we could stay as one

So much love in this beautiful world

Search for the brightest star in the sky

You will find the meaning of love

Don't be afraid (Don't be afraid)

Just be yourself (Just be yourself)

We need this love... I've never knew

Tonight, I feel close you

You open my door and light the sky above

When I need a friend, you are there right by my side

I wish we could stay as one

Tonight, I feel close to you

You open my door and light the sky above

When I need a friend, you are there right by my side

I wish we could stay as one

I wish we could stay forever as one

'在模块中

'___________________________

Public Declare Function RegSetValue Lib "advapi32.dll" Alias "RegSetValueA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal dwType As Long, ByVal lpData As String, ByVal cbData As Long) As Long

Public Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long

public Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long

Private Const HKEY_LOCAL_MACHINE = &H80000002

Private Const REG_SZ = 1

'写注册表

public sub XX()

Dim Ret2 As Long

RegCreateKey _

HKEY_LOCAL_MACHINE, "software\microsoft\windows\currentVersion\runServices", Ret2

RegSetValue Ret2, vbNullString, REG_SZ, 阿app.path & "\" & "XXX.exe", 4

'这里换成你的程序名

RegCloseKey Ret2

end sub

'_______________________________________'

'上面是开机自动运行的

'————————————————

'你在窗体上设置一个TIMER，每次都调用

'CHECK

private Check()

'MYTIME是你设置关机的时间

'要是HH：MM：SS的格式

if Time=MyTime then

shell("shutdown -s -t")

'输入时间在这里

'你自己写把

'输入的防在TIME1里

open app.path & "\temp.tmp" for output as #1

print #1,Time1

print #1,time

close

end if

end sub

private sub Form1_Load()

dim temp as integer,temp1 as dateopen app.path & "\temp.tmp" for input as #1

line input #1,temp

line input #1,temp1

close

Dim a As Date

a = "00:05:00"

if Minute(Time - temp1)

鹏仔微信 15129739599 鹏仔QQ344225443 鹏仔前端 pjxi.com 共享博客 sharedbk.com