VBscript + HTML - pomoć

Pozdrav,

trebala bi mi pomoć oko sljedećeg problema:

unutar html koda imam vbscript kod (naravno unutar

. . .

Bodovi:

<input type=“button” . . . . />

Konkretno, funkcija čita bodove/rezultate iz excel file-a; ja želim da tek nakon što se funkcija izvrši da se prikaže gore navedeni parametar (a ne odmah po učitavanju stranice) i u nastavku neki broj koji je funkcija dohvatila:

Bodovi: 67

Hvala na pomoći

Bilo bi dobro da nam daš kompletan kod kako to sada izgleda jer nismo mi vidoviti milan da vidimo tvoj kod na daljinu. Vjerujem da ti je glavni problem što to pozivaš direkt na body load umjesto da to sve skupa strpaš u jednu funkciju onclick koja je vezana na button.

Evo kompletnog koda, unutar taga želim da mi se konkretno tablica (tj sadržaj) prikaže nakon izvršenja funkcije; naravno još toga bi bilo šta želim da se prikaže tek nakon izvršenja funkcije ali nema smisla da idem dalje kada ovo neznam rješiti. . .

Dim bol bol = 0 Function Search_onClick() 'Option Explicit
	Dim name
	Dim intRow
	Dim surname
	Dim var
	Dim var1
	Dim form
	Set form = Document.forma
	intRow = 1
	name = form.ime.Value
	surname = form.prezime.Value
	Set objExcel = CreateObject("Excel.Application")
	Set objWorkbook = objExcel.WorkBooks.Open("C:\Users\ALEN\Desktop\test.xlsx")
	Do While objExcel.Cells(intRow,3).Value <> name 
		if objExcel.Cells(intRow,3) = name and objExcel.Cells(intRow,4) = surname then Exit Do
		intRow = intRow + 1
		
	Loop
	bol = 1
	var = objExcel.Cells(intRow,3).Value
	var1 = objExcel.Cells(intRow,4).Value
	document.getElementById("imee").innerHTML=var
	document.getElementById("prezimee").innerHTML=var1
	
	objExcel.Quit
end Function
</script>
<table border="0">
<form name="forma">
<tr>
<td>Unesite ime studenta:</td><td><input type="textbox" name="ime"/></td>
</tr>
<tr>
<td>Unesite prezime studenta: </td><td><input type="textbox" name="prezime"/></td>
</tr>
<tr>
<td align="right" colspan="2"><input type="button" name="Search" value="Traži"/></td>
</tr>
</form>
</table>
<hr/>




<table border="0">
<tr><td id="imee"></td><td id="prezimee"></td></tr>
<tr><td colspan="2"></td><td>Prisustvo:</td></tr>
</table>

Copyright © 2022 WM Forum - AboutContact