Fråga : Etiketten uppdateras, textboxes är inte?

Inte sure vad går på. Detta är inte a! Page.IsPostBack utfärdar, den måste att göra med mitt anmärker, och uppdatera textboxes med rekvisitan av det object.

I har en etikett som visar mitt sändningsID, och som fungerar fint. Emellertid resten av förmiddagen för data som I går tillbaka till textboxesna, är inte visningen upp. Jag har avbuggat helvetet ut ur denna, och datan bestämt appliceras till textbox.texten korrekt, men den är inte där på webpagen.

I kan ändra backcoloren, gränsar, Etc. på textboxesna, men kan inte göra den att visa någon text??

If som jag tappar i en etikett, jag kan tilldela något till den, och den visar upp fine.
> för
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
" codeBody " class= " lineLeft " för >

Återgång Details

" klar "

Svar : Etiketten uppdateras, textboxes är inte?

Hade en typo.  Försök som detta behar.

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
På felmeritförteckning därefter

Const ADS_SCOPE_SUBTREE = 'sökande 2 uppsätta som mål anmärker, och all suben jämnar


Dunkel objRootDSE: Fastställd objRootDSE = GetObject (”LDAP: //RootDSE”)
strDNSDomain = byter ut (byt ut (objRootDSE.Get (”defaultNamingContext”),”, DC= ", ”. ”), ”DC=”, "")

strADsPath = ”LDAP: /” & objRootDSE.Get (”defaultNamingContext”)

'Förbind till aktivarkivet
Fastställd objConnection = CreateObject (”ADODB.Connection”)
Fastställd objCommand = CreateObject (”ADODB.Command”)
objConnection.Provider = ”ADsDSOObject”,
objConnection.Open ”aktivarkivfamiljeförsörjare”,
Uppsättning objCommand.ActiveConnection = objConnection
objCommand.Properties (”sidan storleksanpassar”), = 1000
objCommand.Properties (”Searchscope”) = ADS_SCOPE_SUBTREE

 
Dunkel objOU: Fastställd objOU = GetObject (”LDAP: /” & TARGET_OU)
 
Dunkel objExcel: Fastställd objExcel = CreateObject (”Excel.Application”)
Dunkel objWorkbook: Fastställd objWorkbook = objExcel.Workbooks.Open (EXCEL_FILE)
 
'Starten på ror 2, efter titelraden.
Dunkel intRow: intRow = 2
 
Gör till objExcel.Cells (intRow, 1). Värdera = "",
		  
	Dunkel strUserName: strUserName = objExcel.Cells (intRow, 1). Värdera
	Dunkel strDisplayName: strDisplayName = objExcel.Cells (intRow, 2). Värdera
	Dunkel strFirstName: strFirstName = objExcel.Cells (intRow, 3). Värdera
	Dunkel strLastName: strLastName = objExcel.Cells (intRow, 4). Värdera
	Dunkel strDS: strDS = objExcel.Cells (intRow, 5). Värdera  
	'Dunkel strOffice: strOffice = objExcel.Cells (intRow, 6). Värdera
	Dunkel strPWD: strPWD = objExcel.Cells (intRow, 7). Värdera
			
	'SökandeANNONSområdet som verifierar den vanligt kända användaren, inte finns redan
	objCommand.CommandText = ”VALD distinguishedName FRÅN '” & strADsPath & _,
	””VAR objectCategory='user” OCH cn='" & strDisplayName & ”'”,
	Fastställd objRecordSet = objCommand.Execute
	Om objRecordSet.EOF därefter
					 
		Dunkel objUser: Fastställd objUser = objOU.Create (”användare”, ”CN=” & strDisplayName)
		objUser.Put ”sAMAccountName”, strUserName
		objUser.Put ”userPrincipalName”, strUserName & ”@” & strDNSDomain
		objUser.Put ”displayName”, strDisplayName
		objUser.Put ”sn”, strLastName
		objUser.Put ”givenName”, strFirstName
		objUser.Put ”beskrivning”, strDS
		'objUser.Put ”physicalDeliveryOfficeName”, strOffice
		”homeDrive” objUser.Put, ”X: ”,
		”homeDirectory” objUser.Put,” \ \ shadowcom.local \ system \ profilerar \ ”& strUsername
		objUser.SetInfo
		'Separat sektion til importaf-lösenord til brugerne
		objUser.userAccountControl = 512
		objUser.SetPassword-strPWD
		objUser.AccountDisabled = falskt
		objUser.SetInfo
	Avsluta om
		
	intRow = intRow + 1
Kretsa
 
objExcel.ActiveWorkbook.Save EXCEL_FILE
objExcel.ActiveWorkbook.Close
objExcel.Quit
Andra lösningar  
 
programming4us programming4us